SaveDialog1和ADOCommand1控键和代码 {procedure TForm9.Panel1Click(Sender: TObject); begin if SaveDialog1.Execute then edit2.Text:=SaveDialog1.FileName; end; procedure TForm9.Button2Click(Sender: TObject); begin ADOCommand1.CommandText:='backup database '+trim(edit1.Text)+' to DISK ='+''''+edit2.text+''''+'with init'; ADOCommand1.Execute; showmessage('备份成功'); end; procedure TForm9.Button1Click(Sender: TObject); begin close; end;end.} 可以实现数据库的备份,我现在想实现数据库的还原该怎么做啊??再谢~!!!
如果还原在原数据库上即可直接写"use master restore database databasename from disk=[backup_FilePath]" 如果还原到网络上另外的服务器上(即复制数据库),步骤如下; 1.检测有没有该数据库没有就Create Database databasename 2.通过"RESTORE FILELISTONLY FROM DISK = 备份文件名"分析文件中的DMF,LDF两个文件的物理地址路径 3.在还原数据库的服务器上创建该路径目录 4."use master restore database databasename from disk=[backup_FilePath]"即可!
ADOCommand1.CommandText:='backup database '+trim(edit1.Text)+' to DISK ='+''''+edit2.text+''''+'with init';
{procedure TForm9.Panel1Click(Sender: TObject);
begin
if SaveDialog1.Execute then
edit2.Text:=SaveDialog1.FileName;
end;
procedure TForm9.Button2Click(Sender: TObject);
begin
ADOCommand1.CommandText:='backup database '+trim(edit1.Text)+' to DISK ='+''''+edit2.text+''''+'with init';
ADOCommand1.Execute;
showmessage('备份成功');
end;
procedure TForm9.Button1Click(Sender: TObject);
begin
close;
end;end.}
可以实现数据库的备份,我现在想实现数据库的还原该怎么做啊??再谢~!!!
如果还原到网络上另外的服务器上(即复制数据库),步骤如下;
1.检测有没有该数据库没有就Create Database databasename
2.通过"RESTORE FILELISTONLY FROM DISK = 备份文件名"分析文件中的DMF,LDF两个文件的物理地址路径
3.在还原数据库的服务器上创建该路径目录
4."use master restore database databasename from disk=[backup_FilePath]"即可!