Leaked source code of windows server 2003
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
|
|
'***************************************************************************'This script tests the enumeration of instances using XML/HTTP'***************************************************************************On Error Resume Next
Dim objLocatorSet objLocator = CreateObject("WbemScripting.SWbemLocator")
' Replace the first argument to this function with the URL of your WMI XML/HTTP server' For the local machine, use the URL as belowDim objServiceSet objService = objLocator.ConnectServer("[http://localhost/cimom]", "root\cimv2")
' Now enumerate the processors on your machinefor each processor in objService.InstancesOf ("Win32_processor") WScript.Echo "Processor:", processor.descriptionnext
|
