vb編寫的軟件，在系統開機時，應用程序會比sqlserver啟動快，造成連接不上數據庫的錯誤。

有什么辦法可以先判斷一下sql server服務的狀態，如果沒開啟先開啟服務，在去連接sql服務。

從網上找了一段，在vb里運行不了。

Private Sub Form_Load()

interger result

OLEObject loo_SQLServer

'loo_SQLServer = CREATE OLEObject

result = loo_SQLServer.ConnectToNewObject("SQLDMO.SQLServer ")

If result <> 0 Then

MsgBox "提示", "創建OLE對象時產生錯誤"

Return

Else

loo_SQLServer.Name = "xiang6963"

If loo_SQLServer.Status = 3 Then

'服務停止

loo_SQLServer.Start(false,"xiang6963", "sa","123")

ElseIf loo_SQLServer.Status = 2 Then

'服務暫停

loo_SQLServer.Continue()

End If

'啟動之后再次判斷是否成功

If loo_SQLServer.Status = 2 Or loo_SQLServer.Status = 3 Then

MsgBox "錯誤", "啟動服務失敗"

End If

End If

loo_SQLServer.DisconnectObject()

destroy loo_SQLServer

End Sub

總結

以上是生活随笔為你收集整理的server sql 判断是否是当天_判断sql server 是否在开启服务状态的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。