delphi sqlserver 2008 数据备份和还原

关于网友提出的“ delphi sqlserver 2008 数据备份和还原
”问题疑问，本网通过在网上对“ delphi sqlserver 2008 数据备份和还原
”有关的相关答案进行了整理，供用户进行参考，详细问题解答如下：

问题： delphi sqlserver 2008 数据备份和还原
描述:

delphisqlserver数据备份还原

备份和还原都显示成功，但是根本没有用，比如说我先备份，然后删除其中一个表的数据，在恢复，根本恢复不了
代码如下：
数据备份：
procedure TForm24.Button1Click(Sender: TObject);
begin
  inherited;
  SaveDialog1.Title:='请选择数据备份位置';
  if SaveDialog1.Execute then
    Edit1.Text:=SaveDialog1.FileName;
end;
procedure TForm24.Button2Click(Sender: TObject);
begin
 inherited;
  if Trim(Edit1.Text)='' then Exit;
  try
    F_dm.back.CommandText:='backup database 商品进货管理系统 to disk='+''''+Trim(Edit1.Text)+'''';
    F_dm.back.Execute;
    Application.MessageBox('备份数据成功','提示',mb_ok);
  except
    Application.MessageBox('备份数据失败','提示',mb_ok);
  end;
  
end;
数据恢复：
procedure TForm25.Button1Click(Sender: TObject);
begin
  inherited;
  Opendialog1.Title:='请选择数据恢复文件';
  if Opendialog1.Execute then
    Edit1.Text:=Opendialog1.FileName;
end;
procedure TForm25.Button2Click(Sender: TObject);
begin
  inherited;
  f_dm.ADOConnection1.Close;
  f_dm.ADOConnection1.Connected:=False;
  if Application.MessageBox('恢复前请先备份，是否开始恢复？','提示',mb_yesno)=id_no then
    Exit;
  if Trim(Edit1.Text)='' then Exit;
  try
    try
      F_dm.back.CommandText:='use master restore database 商品进货管理系统 from disk='+''''+Trim(Edit1.Text)+''''+'with replace';
      F_dm.back.Execute;
      Application.MessageBox('恢复数据成功','提示',mb_ok);
    finally
      F_dm.back.CommandText:='use 商品进货管理系统';
      F_dm.back.Execute;
    end;
  except
    Application.MessageBox('恢复数据失败','提示',mb_ok);
  end;
end;

---

解决方案1:

先要关闭数据库，再恢复

解决方案2:

你的数据备份方式有点问题。
所谓数据备份是将整个MSSQL2008Server中的数据库文件，备份下来。