server sql 判断是否是当天_判断sql server 是否在开启服务状态
vb編寫的軟件,在系統(tǒng)開機(jī)時(shí),應(yīng)用程序會(huì)比sqlserver啟動(dòng)快,造成連接不上數(shù)據(jù)庫的錯(cuò)誤。
有什么辦法可以先判斷一下sql server服務(wù)的狀態(tài),如果沒開啟先開啟服務(wù),在去連接sql服務(wù)。
從網(wǎng)上找了一段,在vb里運(yùn)行不了。
Private Sub Form_Load()
interger result
OLEObject loo_SQLServer
'loo_SQLServer = CREATE OLEObject
result = loo_SQLServer.ConnectToNewObject("SQLDMO.SQLServer ")
If result <> 0 Then
MsgBox "提示", "創(chuàng)建OLE對(duì)象時(shí)產(chǎn)生錯(cuò)誤"
Return
Else
loo_SQLServer.Name = "xiang6963"
If loo_SQLServer.Status = 3 Then
'服務(wù)停止
loo_SQLServer.Start(false,"xiang6963", "sa","123")
ElseIf loo_SQLServer.Status = 2 Then
'服務(wù)暫停
loo_SQLServer.Continue()
End If
'啟動(dòng)之后再次判斷是否成功
If loo_SQLServer.Status = 2 Or loo_SQLServer.Status = 3 Then
MsgBox "錯(cuò)誤", "啟動(dòng)服務(wù)失敗"
End If
End If
loo_SQLServer.DisconnectObject()
destroy loo_SQLServer
End Sub
總結(jié)
以上是生活随笔為你收集整理的server sql 判断是否是当天_判断sql server 是否在开启服务状态的全部內(nèi)容,希望文章能夠幫你解決所遇到的問題。
- 上一篇: python中的join函数连接data
- 下一篇: pageinfo对合并list进行分页_