delphi中实现Sqlserver2000数据库的备份与还原!

原创 2004年07月06日 09:52:00

备份:
var
FileName:string;
strsql:string;

begin
if openDialog1.Execute then
  begin
  FileName:=openDialog1.FileName;
  showmessage(FileName);
  try
  strsql:='backup database carxt to disk='''+FileName+'''';
  rs.Close;
  rs.SQL.Clear;
  rs.SQL.Add(strsql);
  rs.ExecSQL;
  if fileExists(FileName)then
  showmessage('已经将carxt备份为:'+FileName);
  except
  messageDlg('数据备份异常!',MTError,[mbok],0);
  end;
  end;

还原:
if openDialog1.Execute then
begin
try
conn.Connected:=false;//关闭carxt数据库
conn2.Open;
rs.Connection:=conn2;
rs.Close;
rs.SQL.Clear;
rs.SQL.Add('ALTER DATABASE carxt01 SET OFFLINE WITH ROLLBACK IMMEDIATE');
rs.ExecSQL;
rs.Close;
rs.SQL.Clear;
rs.SQL.Add('restore database carxt01 From disk='''+openDialog1.FileName+''' ');
rs.ExecSQL;
showmessage('顺利完成数据库还原!');
finally
rs.Close;
rs.SQL.Clear;
rs.SQL.Add('ALTER DATABASE carxt01 SET ONLINE WITH ROLLBACK IMMEDIATE');//重新连接数据库carxt01
rs.ExecSQL;
conn2.Connected:=false;//关闭master的连接
conn.Connected:=true;
rs.Connection:=conn;
end;
end;
end;

SQL SERVER 2000 数据库备份与还原

备份数据库,例如:BACKUP DATABASE Northwind    TO DISK = c:/Northwind.bak还原数据库,例如:--返回由备份集内包含的数据库和日志文件列表组成的结果...
  • feng19821209
  • feng19821209
  • 2006-08-29 16:32:00
  • 3451

数据库备份与还原(Delphi)

SQL Server 2000数据库备份与恢复(DELPHI版本)一、SQL语句说明备份数据库的SQL语句BACKUP DATABASE 数据库名 TO DISK = 文件名恢复数据库的SQL语句RE...
  • xtBurn
  • xtBurn
  • 2007-01-20 20:20:00
  • 2215

Delphi 中数据备份和恢复...

备份:procedure TMainForm.FileDataBackupExecute(Sender: TObject);var adoTemp: TADOQuery;begin  adoTemp ...
  • hanfn
  • hanfn
  • 2008-04-26 16:29:00
  • 207

如何将sql2000备份数据库还原到sql2008中

 今天安装了sql server2008,于是乎想将自己原来在2000下备份的数据还原一番,很自然想到了2000下还原数据库的方法:     1、先新建一个数据库,有些同学说这个新建的数据库在...
  • builderwfy
  • builderwfy
  • 2017-07-29 15:00:35
  • 3365

sql server自动备份与恢复系统(到FTP)源码

  • 2009年03月05日 23:43
  • 1.14MB
  • 下载

SQL2000/2005&2008中master数据库备份与恢复

在SQLServer2000数据库系统中,有多个系统数据库,如master,model,msdb,tempdb等。其中master数据库是最重要的数据库,存储的是SQL Server系统的所有系统级别...
  • mikean
  • mikean
  • 2015-11-27 10:33:01
  • 1806

Delphi数据库的备份及还原

实例应用1: //备份procedure TF_DataBaseBackUp.Btn_bfClick(Sender: TObject); var i:integer; begin if Save...
  • my98800
  • my98800
  • 2018-03-01 08:48:49
  • 48

sql2000备份数据库文件如何还原到sql2008数据库中

今天旧电脑坏了不能用了,以为将原来sql2000备份文件还原到新电脑上,新电脑装的是mssql20008,如何将2000备份文件还原到2008呢 步骤如下: 1.将sql2000备份文件先加上.b...
  • builderwfy
  • builderwfy
  • 2017-07-30 20:25:42
  • 864

C#实现SQLSERVER2000数据库备份还原的两种方法 (带进度条)

 C#实现SQLSERVER2000数据库备份还原的两种方法   : 方法一(不使用SQLDMO):      ///   ///备份方法   ///   SqlConnection conn = n...
  • long_feihong
  • long_feihong
  • 2009-10-19 19:14:00
  • 3600

Java实现sqlserver2005的数据库的备份与恢复

1.连接数据库的代码: package com.once.xfd.dbutil; import java.sql.Connection; import java.sql.DriverManager...
  • yellowxiaotian
  • yellowxiaotian
  • 2014-03-06 13:25:01
  • 1409
收藏助手
不良信息举报
您举报文章:delphi中实现Sqlserver2000数据库的备份与还原!
举报原因:
原因补充:

(最多只允许输入30个字)