| Ximena Cifuentes 2004-12-30, 5: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 ?
|