高手请进！如何备份数据库！（请付原代码，在线等待）

Question

如何用vb编写备份sql数据库代码，并如何还原！

Answer 1

'sql server  备份方法
If CN.State = adStateOpen Then CN.Close
    CN.ConnectionTimeout = 10
    connstr = "Driver={SQL Server};Server=" & LocalServer & ";UID=" & LocalUser & ";PWD=" & LocalPw & ";DATABASE=" & LocalDb
    CN.Open connstr
Nowtime = Format(Now, "hh-mm-ss")
dd = str(Date)
riqi = dd + "-" + NowtimeSql = "BACKUP DATABASE tablename TO disk='D:\mssql7\BACKUP\tablename" & riqi & "' with noinit"
CN.Execute (Sql)

Answer 2

还原的时候，连接master数据库执行 restore database name from disk='...........