Win32_Service vbscript sample code | ActiveXperts Network Monitor
The foundations for Manageability in Windows is Windows Management Instrumentation (WMI; formerly WBEM) and WMI extensions for Windows Driver Model (WDM).
ActiveXperts Network Monitor provides the ability to build monitor check routines based on WMI. ActiveXperts has collected more than a hundred WMI samples. You can use these samples as a base for new check routines you can write yourself. The Win32_Service WMI class can be used in ActiveXperts Network Monitor to monitor your servers.
Description
The Win32_Service WMI class represents a service on a Windows computer system. A service application conforms to the interface rules of the Service Control Manager (SCM) and can be started by a user automatically at system boot through the Services control panel utility, or by an application that uses the service functions included in the Windows API. Services can execute even when no user is logged on to the system.
Sample Code
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_Service",,48)
For Each objItem in colItems
Wscript.Echo "AcceptPause: " & objItem.AcceptPause
Wscript.Echo "AcceptStop: " & objItem.AcceptStop
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "CheckPoint: " & objItem.CheckPoint
Wscript.Echo "CreationClassName: " & objItem.CreationClassName
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "DesktopInteract: " & objItem.DesktopInteract
Wscript.Echo "DisplayName: " & objItem.DisplayName
Wscript.Echo "ErrorControl: " & objItem.ErrorControl
Wscript.Echo "ExitCode: " & objItem.ExitCode
Wscript.Echo "InstallDate: " & objItem.InstallDate
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "PathName: " & objItem.PathName
Wscript.Echo "ProcessId: " & objItem.ProcessId
Wscript.Echo "ServiceSpecificExitCode: " & objItem.ServiceSpecificExitCode
Wscript.Echo "ServiceType: " & objItem.ServiceType
Wscript.Echo "Started: " & objItem.Started
Wscript.Echo "StartMode: " & objItem.StartMode
Wscript.Echo "StartName: " & objItem.StartName
Wscript.Echo "State: " & objItem.State
Wscript.Echo "Status: " & objItem.Status
Wscript.Echo "SystemCreationClassName: " & objItem.SystemCreationClassName
Wscript.Echo "SystemName: " & objItem.SystemName
Wscript.Echo "TagId: " & objItem.TagId
Wscript.Echo "WaitHint: " & objItem.WaitHint
Next
