Dim sql As String
Dim sqlcn As SqlConnection
sqlcn = New SqlConnection
sqlcn.ConnectionString = "workstation id=SG;packet size=4096;integrated security=SSPI;data source=SG;persis" & _
"t security info=False;initial catalog=student "
Dim backstring As String = "restore database student from disk = 'c:\Program Files\Microsoft SQL Server\MSSQL\BACKUP\1.bak' "
Dim com As New SqlClient.SqlCommand(backstring)
Try
With com
.Connection = New SqlClient.SqlConnection(sqlcn.ConnectionString)
.Connection.Open()
.ExecuteReader()
.Connection.Close()
End With
MsgBox("還原成功",MsgBoxStyle.Information + MsgBoxStyle.OKOnly,"恭喜恭喜")
Catch ex As Exception
com.Connection.Close()
MsgBox(Err.Description,MsgBoxStyle.Critical + MsgBoxStyle.OKOnly,"錯誤")
阿門!一直顯示“數(shù)據(jù)庫正在使用中,未能或得對數(shù)據(jù)庫的排它訪問權“ 怎么改下就好啦!
可是結束 數(shù)據(jù)庫進程!還能進入VB做的系統(tǒng)么?蒼天!加入我要還原的是SG呢?怎么辦?數(shù)據(jù)庫沒用戶使用!它就連接不上!怎么進入系統(tǒng)?更不用說還原的功能!能給我下代碼?