16 lines
476 B
Plaintext
16 lines
476 B
Plaintext
'***************************************************************************
|
|
'This script tests the manipulation of context values, in the case that the
|
|
'context value is an array type
|
|
'***************************************************************************
|
|
On Error Resume Next
|
|
while true
|
|
Set Locator = CreateObject("WbemScripting.SWbemLocator")
|
|
|
|
Set Service = Locator.ConnectServer()
|
|
|
|
if Err <> 0 Then
|
|
WScript.Echo Err.Description
|
|
Err.Clear
|
|
End if
|
|
|
|
wend |