請教： 如何用程序代碼對sql server進行備份與還原？

Question

用bcp命令把表生成文件(.txt)
反之一样

Answer 1

用SQL　DMO进行操作
详细查看books on line

Answer 2

需要安装SQL客户端,然后用用SQL DMO

Answer 3

Dim serverObj       As New SQLDMO.SQLServer
Dim RestoreObj      As New SQLDMO.Restore
serverObj.Connect "aaa", UserID, Password
RestoreObj.Database = "bbb"
RestoreObj.Files = BackUpFile
RestoreObj.Action = SQLDMORestore_Database
RestoreObj.SQLRestore serverObj

Answer 4

aaa是服务器名称
bbb是数据库名称

Answer 5

sql语句里有关于备份和还原的功能
Syntax
Backing up an entire database:BACKUP DATABASE { database_name | @database_name_var } 
TO < backup_device > [ ,...n ] 
[ WITH 
    [ BLOCKSIZE = { blocksize | @blocksize_variable } ] 
    [ [ , ] DESCRIPTION = { 'text' | @text_variable } ] 
    [ [ , ] DIFFERENTIAL ] 
    [ [ , ] EXPIREDATE = { date | @date_var } 
        | RETAINDAYS = { days | @days_var } ] 
    [ [ , ] PASSWORD = { password | @password_variable } ] 
    [ [ , ] FORMAT | NOFORMAT ] 
    [ [ , ] { INIT | NOINIT } ] 
    [ [ , ] MEDIADESCRIPTION = { 'text' | @text_variable } ] 
    [ [ , ] MEDIANAME = { media_name | @media_name_variable } ] 
    [ [ , ] MEDIAPASSWORD = { mediapassword | @mediapassword_variable } ] 
    [ [ , ] NAME = { backup_set_name | @backup_set_name_var } ] 
    [ [ , ] { NOSKIP | SKIP } ] 
    [ [ , ] { NOREWIND | REWIND } ] 
    [ [ , ] { NOUNLOAD | UNLOAD } ] 
    [ [ , ] RESTART ] 
    [ [ , ] STATS [ = percentage ] ] 
]Syntax
Restore an entire database:RESTORE DATABASE { database_name | @database_name_var } 
[ FROM < backup_device > [ ,...n ] ] 
[ WITH 
    [ RESTRICTED_USER ] 
    [ [ , ] FILE = { file_number | @file_number } ] 
    [ [ , ] PASSWORD = { password | @password_variable } ] 
    [ [ , ] MEDIANAME = { media_name | @media_name_variable } ] 
    [ [ , ] MEDIAPASSWORD = { mediapassword | @mediapassword_variable } ] 
    [ [ , ] MOVE 'logical_file_name' TO 'operating_system_file_name' ] 
            [ ,...n ] 
    [ [ , ] KEEP_REPLICATION ] 
    [ [ , ] { NORECOVERY | RECOVERY | STANDBY = undo_file_name } ] 
    [ [ , ] { NOREWIND | REWIND } ] 
    [ [ , ] { NOUNLOAD | UNLOAD } ] 
    [ [ , ] REPLACE ] 
    [ [ , ] RESTART ] 
    [ [ , ] STATS [ = percentage ] ] 
]具体含义,请察看查询分析器的T-SQL 帮助

Answer 6

你运气正好 我刚做了一个，给你吧备份------------
  Dim transql As String
On Error Resume Next
transql = "use master " & _
"DISK INIT " & _
"Name='Device_1'," & _
"Physname=' " & Trim(Text1.Text) & " '," & _
"vdevno=10," & _
"size=102400"
cn.Execute (transql)
On Error GoTo err2
sql = "BACKUP DATABASE yourdatabase TO disk='" & Trim(Text1.Text) & "\yourdatabase_" & Format(CStr(Now), "yyyy-mm-dd-hh-mm-ss") & "' with noinit"cn.Execute (sql)其中 cn 是ado连接  
Text1.Text 是你要备份的路径恢复-------------------
   cnn.ConnectionTimeout = 10
    connstr = "Driver={SQL Server};Server=(local);UID=sa;PWD=;DATABASE=master"
    cnn.Open connstr
   DoEvents
   Label3.Caption = "正在恢复数据库......"
   Me.Refresh
    sql = "RESTORE DATABASE fcda FROM disk='" & Trim(Text1.Text) & "' "
 cnn.Execute (sql)我在sql2000 和win 通过