数据库恢复的问题

Question

MainDM.MainADOC.Connected:=false;
  MainDM.MainADOC.DefaultDatabase:='master';
  MainDM.MainADOC.Connected:=true;
  with ADOQuery1 do
  begin
    try
      close;
      sql.Clear;
      sql.Add('use master drop database xzyfgl');
      execsql;
    except
      showmessage('删除失败！');
      Abort;
    end;    try
      close;
      sql.Clear;
      sql.Add('use master restore database xzyfgl from disk=:V_Path with replace') ;
      Parameters.ParamByName('v_Path').value := edit2.text;
      ExecSQL;
      showmessage('恢复成功！');
    except
      showmessage('恢复失败');
    end; 
  end;
  
  MainDM.MainADOC.Connected:=false;
  MainDM.MainADOC.DefaultDatabase:='xzyfgl';
  MainDM.MainADOC.Connected:=true;程序不包错但就是
恢复不成功，请各位打下分析以下

Answer 1

sql.Add('use master drop database xzyfgl');
不能在sql中一次执行两条语句
sql.Add('use master');
execsql;
close;
sql.cear;
sql.add('drop database xzyfgl');
execsql;

Answer 2

恢复时首先查看是否有进程在使用xzyfgl,用sp_who或者在master..sysprocesses中察看，如果有kill process