代碼如下，怎么還報錯了，求大俠指點
PBObject = CREATE OLEObject
ll_return = PBObject.ConnectToNewObject("SQLDMO.sqlserver")
IF ll_return = 0 THEN //連接成功
PBObject.name = ls_servername
Try
ll_status = PBObject.Status
Catch(RunTimeError rte)
Messagebox('提示','指定服務器無效,服務器名:' + ls_servername,StopSign!)
if IsValid(PBObject) then
PBObject.DisconnectObject()
Destroy PBObject
end if
End try
if ll_status = 2 then //SQL Server為暫停狀態
PBObject.Continue()
elseif ll_status = 3 then //SQL Server為停止狀態
PBObject.Start(false,ls_servername,"bypos","bypos")//啟動SQL Server
end if
else
messagebox("系統提示","未安裝SQL Server服務器或SQL Server系統已經損壞!")
if IsValid(PBObject) then
PBObject.DisconnectObject()
Destroy PBObject
end if
return -1
end if
if IsValid(PBObject) then
PBObject.DisconnectObject()
Destroy PBObject
end if
uj5u.com熱心網友回復：
報什么錯啊？uj5u.com熱心網友回復：
一、確定權限是否足夠；如果是win7要在應用上單擊右鍵以管理員身份運行;二、確定SQLDMO組件安裝成功,該代碼必須在服務器上運行，客戶端沒有SQLDMO的；
三、最好在外圍加個try
uj5u.com熱心網友回復：
報什么錯啊？測過了，挺正常的。看看PB8的建議吧轉載請註明出處，本文鏈接：https://www.uj5u.com/shujuku/68334.html
標籤：數據庫相關
上一篇：求pbws32.dll