数据库恢复问题?
Dim Get_Dsn_str As String = "Provider=Sqloledb;data source=localhost;Initial Catalog=Northwind;User Id=sa;Password=;Connect Timeout=30"
Dim path As String
Dim r_conn As New OleDbConnection(Get_Dsn_str)
Dim restorecmd As New OleDbCommand()
path = Text_path.Text & "\test.bak"
r_conn.Open()
restorecmd = New OleDbCommand("Restore database test from disk=" & "'" & path & "'", r_conn)
restorecmd.ExecuteNonQuery()
以上是一段数据恢复代码。恢复会出错,不知为啥原因。