vb如何实现SQL2005数据库的备份与还原

Question

还原出错。请调整
Private Sub ExBtn1_Click()
Call sql2005
Dim backupfilename As String '备份数据库存放地址以及名称backupfilename = "c:\yi.bak"
sql = "backup database yizhi to disk='" & backupfilename & "'"
conn.Execute (sql)
conn.CloseMsgBox "成功备份"
End SubPrivate Sub ExBtn2_Click()
Call sql2005
Dim backupfilename As String '备份数据库存放地址以及名称backupfilename = "c:\yi.bak"
sql = "restore database yizhi from disk='" & backupfilename & "'"
conn.Execute (sql)
conn.CloseMsgBox "成功还原"
End Sub

Answer 1

注意以下小问题~
1，设置连接方式
2，数据库用户的权限
等~~