数据库不能恢复的问题

Question

就是用delphi7，在adoquery中输入恢复数据库的命令，出错，提示说数据库正在使用。想念大家都遇到过吧。请问，该怎么解决啊？

Answer 1

你自己的程序先得退出这个数据库(Close Connection),进入到系统库(SQL Server就是Master了),再Restore.

Answer 2

以SQL Server为例,还有一个方法,以SA身份进入Master,Kill连接该数据库的进程,再Restore.
祝你好运.

Answer 3

1。首先把adoconnection连接连到master数据库
2。再打开sql服务管理器，在master数据库中建立如下存储过程，
use  master 
go
create  proc  killspid  (@dbname  varchar(20))  
as  
begin  
declare  @sql  nvarchar(500),@temp varchar(1000)
declare  @spid  int  
set  @sql='declare  getspid  cursor  for    
select  spid  from  sysprocesses  where  dbid=db_id('''+@dbname+''')'  
exec  (@sql)  
open  getspid  
fetch  next  from  getspid  into  @spid  
while  @@fetch_status =0
begin  
  set @temp='kill  '+rtrim(@spid)
  exec(@temp)
fetch  next  from  getspid  into  @spid  
end  
close  getspid  
deallocate  getspid  
end  3。用adocommand调用存储过程，将其它打开该数据库的进程kill掉
use  master  
exec  killspid  '数据库名'如下：
try
  DataM.BackADOCommand.CommandText:='Use Master';
  DataM.BackADOCommand.Execute;
  DataM.BackADOCommand.CommandText:='exec killspid Gl';      //调用存储过程，将打开Gl数据库的进程kill掉
  DataM.BackADOCommand.Execute;
  DataM.BackADOCommand.CommandText:='restore database Gl from disk=''D:\Program Files\Microsoft SQL Server\MSSQL\BACKUP\gl.back'' with  recovery,Replace';
  DataM.BackADOCommand.Execute;
  DataM.BackADOCommand.CommandText:='Use Gl';
  DataM.BackADOCommand.Execute;
  label1.Caption:='恢复成功！';
except
  ShowMessage('数据库正在被使用！请确定已关闭其它管理程序！');
  Label1.Caption:='恢复失败！';
end;