我正在尝试处理ADODB.Command对象的事件处理程序。当我指定前缀时,Wscript.CreateObject退出函数而不发出任何错误消息。从Wscript.CreateObject中删除前缀时,将创建ADODB.Command对象。
此外,当设置On Error Resume Next时,Wscript.CreateObject返回并清空对象。
有人可以告诉我我做错了什么吗?
代码:
DIM tsqlcmd
On Error Goto 0
SET tsqlcmd = WScript.CreateObject("ADODB.Command", "ehdlr_tsqlcmd_")
.....
Private Sub ehdlr_tsqlcmd_ExecuteComplete( RecordsAffected, pError, adStatus, pCommand, pRecordset, pConnection)
' place any code you desire here, for example
If adStatus = STATUS_adStatusOK Then
MsgBox( "tsqlcmd_ExecuteComplete Records affected = " & RecordAffected)
Else
MsgBox( "tsqlcmd_ExecuteComplete ExecuteComplete Status = " & adStatus)
End If
End Sub