ComputerSystem - WMI sample in VBScript

The foundations for Manageability in Windows 2019/2012/2008/ and Windows 10/8/7/Vista/XP are 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.

On this site, you can find many WMI samples.

The ComputerSystem WMI class can be used in ActiveXperts Network Monitor to monitor your servers.

---

ComputerSystem

Example(s)

Set objWMIService = GetObject("winmgmts:\\.\root\cimv2")

Set colItems = objWMIService.ExecQuery("Select * From Win32_ComputerSystem")

For Each objItem in colItems
	WScript.Echo "AdminPasswordStatus:" & objItem.AdminPasswordStatus
	WScript.Echo "AutomaticManagedPagefile:" & objItem.AutomaticManagedPagefile
	WScript.Echo "AutomaticResetBootOption:" & objItem.AutomaticResetBootOption
	WScript.Echo "AutomaticResetCapability:" & objItem.AutomaticResetCapability
	WScript.Echo "BootOptionOnLimit:" & objItem.BootOptionOnLimit
	WScript.Echo "BootOptionOnWatchDog:" & objItem.BootOptionOnWatchDog
	WScript.Echo "BootROMSupported:" & objItem.BootROMSupported
	WScript.Echo "BootupState:" & objItem.BootupState
	WScript.Echo "Caption:" & objItem.Caption
	WScript.Echo "ChassisBootupState:" & objItem.ChassisBootupState
	WScript.Echo "CreationClassName:" & objItem.CreationClassName
	WScript.Echo "CurrentTimeZone:" & objItem.CurrentTimeZone
	WScript.Echo "DaylightInEffect:" & objItem.DaylightInEffect
	WScript.Echo "Description:" & objItem.Description
	WScript.Echo "DNSHostName:" & objItem.DNSHostName
	WScript.Echo "Domain:" & objItem.Domain
	WScript.Echo "DomainRole:" & objItem.DomainRole
	WScript.Echo "EnableDaylightSavingsTime:" & objItem.EnableDaylightSavingsTime
	WScript.Echo "FrontPanelResetStatus:" & objItem.FrontPanelResetStatus
	WScript.Echo "HypervisorPresent:" & objItem.HypervisorPresent
	WScript.Echo "InfraredSupported:" & objItem.InfraredSupported
	WScript.Echo "InitialLoadInfo:" & objItem.InitialLoadInfo
	WScript.Echo "InstallDate:" & objItem.InstallDate
	WScript.Echo "KeyboardPasswordStatus:" & objItem.KeyboardPasswordStatus
	WScript.Echo "LastLoadInfo:" & objItem.LastLoadInfo
	WScript.Echo "Manufacturer:" & objItem.Manufacturer
	WScript.Echo "Model:" & objItem.Model
	WScript.Echo "Name:" & objItem.Name
	WScript.Echo "NameFormat:" & objItem.NameFormat
	WScript.Echo "NetworkServerModeEnabled:" & objItem.NetworkServerModeEnabled
	WScript.Echo "NumberOfLogicalProcessors:" & objItem.NumberOfLogicalProcessors
	WScript.Echo "NumberOfProcessors:" & objItem.NumberOfProcessors
	WScript.Echo "OEMLogoBitmap:" & objItem.OEMLogoBitmap
	WScript.Echo "OEMStringArray:" & objItem.OEMStringArray
	WScript.Echo "PartOfDomain:" & objItem.PartOfDomain
	WScript.Echo "PauseAfterReset:" & objItem.PauseAfterReset
	WScript.Echo "PCSystemType:" & objItem.PCSystemType
	WScript.Echo "PowerManagementCapabilities:" & objItem.PowerManagementCapabilities
	WScript.Echo "PowerManagementSupported:" & objItem.PowerManagementSupported
	WScript.Echo "PowerOnPasswordStatus:" & objItem.PowerOnPasswordStatus
	WScript.Echo "PowerState:" & objItem.PowerState
	WScript.Echo "PowerSupplyState:" & objItem.PowerSupplyState
	WScript.Echo "PrimaryOwnerContact:" & objItem.PrimaryOwnerContact
	WScript.Echo "PrimaryOwnerName:" & objItem.PrimaryOwnerName
	WScript.Echo "ResetCapability:" & objItem.ResetCapability
	WScript.Echo "ResetCount:" & objItem.ResetCount
	WScript.Echo "ResetLimit:" & objItem.ResetLimit
	WScript.Echo "Roles:" & objItem.Roles
	WScript.Echo "Status:" & objItem.Status
	WScript.Echo "SupportContactDescription:" & objItem.SupportContactDescription
	WScript.Echo "SystemStartupDelay:" & objItem.SystemStartupDelay
	WScript.Echo "SystemStartupOptions:" & objItem.SystemStartupOptions
	WScript.Echo "SystemStartupSetting:" & objItem.SystemStartupSetting
	WScript.Echo "SystemType:" & objItem.SystemType
	WScript.Echo "ThermalState:" & objItem.ThermalState
	WScript.Echo "TotalPhysicalMemory:" & objItem.TotalPhysicalMemory
	WScript.Echo "UserName:" & objItem.UserName
	WScript.Echo "WakeUpType:" & objItem.WakeUpType
	WScript.Echo "Workgroup:" & objItem.Workgroup
	WScript.Echo ""
	WScript.Echo "########"
	WScript.Echo ""
Next