12-30-04 10:52 PM
I'm tryin to get a list of receive functions in a BTS remote server by using
WMI and the next script
'Dim oLocator, oServices, oRcvFunction, oRcvFunctionInstance
'oLocator = CreateObject("WbemScripting.SWbemLocator")
'oServices = oLocator.ConnectServer("BTSSERVER",
"root/MicrosoftBizTalkServer", "TRANSAR\Biztalk", "MSIOMEGA")
'oRcvFunction =
oServices.Get("MicrosoftBizTalkServer_ReceiveFunction")
'For Each oRcvFunctionInstance In oRcvFunction.Instances_
' With oRcvFunctionInstance
' .DisableReceiveFunction = False
' .Put_(1) 'wbemChangeFlagUpdateOnly
' End With
'Next
But, when the oRcvFunction.Instances_ is called there's an COM interop
exception.
Is there something else I need to install at server in order to communicate
with the server using WMI ?
[ Post a follow-up to this message ]
|