backup: bakcup database dbname to disk='\\machine\share\abc.bak' with init \\machine\share目录要有写权限。restore: restore database dbname from disk='\\machine\share\abc.bak' with replace, move 'dbname_dat' to 'c:\mssql7\data\dbname.mdf', move 'dbname_log' to 'c:\mssql7\data\dbname.log' 其中'c:\mssql7\data\'是服务器的目录,这点要注意
用SQL-DMO對象。下面是是一個小例子,更多的幫助可到SQL 目錄下的Sample里看。 Dim oSQL As SQLDMO.SQLServer Dim oBackup As SQLDMO.Backup Set oSQL = New SQLDMO.SQLServer oSQL.Connect "Nipsan", "sa", "" 'Nipsan是 SQL Server名字Set oBackup = New SQLDMO.Backup oBackup.Database = "Northwind" '備份Northwind資料庫 oBackup.Files = "C:\Zhou.bak" '備份到客戶端C:\,文件名為Zhou.bakoBackup.SQLBackup oSQLSet oBackup = NothingoSQL.DisConnect Set oSQL = Nothing
bakcup database dbname to disk='\\machine\share\abc.bak' with init
\\machine\share目录要有写权限。restore:
restore database dbname from disk='\\machine\share\abc.bak' with replace, move
'dbname_dat' to 'c:\mssql7\data\dbname.mdf',
move 'dbname_log' to 'c:\mssql7\data\dbname.log'
其中'c:\mssql7\data\'是服务器的目录,这点要注意
Dim oSQL As SQLDMO.SQLServer
Dim oBackup As SQLDMO.Backup
Set oSQL = New SQLDMO.SQLServer
oSQL.Connect "Nipsan", "sa", "" 'Nipsan是 SQL Server名字Set oBackup = New SQLDMO.Backup
oBackup.Database = "Northwind" '備份Northwind資料庫
oBackup.Files = "C:\Zhou.bak" '備份到客戶端C:\,文件名為Zhou.bakoBackup.SQLBackup oSQLSet oBackup = NothingoSQL.DisConnect
Set oSQL = Nothing
服务器上
我用的delphi 却不行, 我想vb 也是不行的吧, 待我仔细研究研究