___在执行完“恢复数据库”的语句后，再执行SQL查询语句___提示
本帖最后由 Biner 于 2013-10-26 06:41 编辑在执行完“恢复数据库”的语句后，再执行SQL查询语句___提示“连接失败”
procedure TForm1.BitBtn6Click(Sender: TObject);
var
s:string ;
begin
try
if OpenDialog1.Execute then
begin
s:=OpenDialog1.FileName ;
with DataModule2.ADOCommand1 do
begin
//数据库恢复的代码
CommandText := 'alter database 尊雅丽锦·网上服装商城 set offline with rollback immediate'; //让数据库离线
Execute ; //执行
CommandText := 'restore database 尊雅丽锦·网上服装商城 from disk = '''+s+''' with replace ' ; //恢复
Execute ; //执行
CommandText := 'alter database 尊雅丽锦·网上服装商城 set online with rollback immediate' ; //数据库重新上线
Execute ; //执行
end;
ShowMessage('数据库恢复成功...');
// 重新显示数据表 -------------执行这里的代码是提示 “连接中断 ” ，该怎么解决。
with DataModule2.ADOQuery1 do
begin
SQL.Clear ;
SQL.Add('select * from 尊雅服装来源表') ;
Open ;
end;
end;
except
ShowMessage('在恢复数据库时发生了不可预知的异常，请与软件开发人员联系');
end;
end;
可以确定的是，我恢复数据库的语句是正确的。
这个问题对我很重要，请知道的大哥大姐帮我看看哦！谢谢了哦
问题已经解决了 谢谢分享哈~！~ 谢谢分享哈~！~ 谢谢分享哈~！~
页:
[1]