Retrieves information about the motherboard device installed in a computer.
This script was tested using Object REXX 2.1.0 for Microsoft Windows, available from IBM.
strComputer = "." objWMIService = .OLEObject~GetObject("winmgmts:\\"||strComputer||"\root\CIMV2") do objItem over objWMIService~ExecQuery("Select * from Win32_MotherboardDevice") say "Availability:" objItem~Availability say "Caption:" objItem~Caption say "Config Manager Error Code:" objItem~ConfigManagerErrorCode say "Config Manager User Config:" objItem~ConfigManagerUserConfig say "Creation Class Name:" objItem~CreationClassName say "Description:" objItem~Description say "Device ID:" objItem~DeviceID say "Error Cleared:" objItem~ErrorCleared say "Error Description:" objItem~ErrorDescription say "Install Date:" objItem~InstallDate say "Last Error Code:" objItem~LastErrorCode say "Name:" objItem~Name say "PNP Device ID:" objItem~PNPDeviceID z = objItem~PowerManagementCapabilities if .NIL <> z then do x over z say objProperty.Name ": " x end say "Power Management Supported:" objItem~PowerManagementSupported say "Primary Bus Type:" objItem~PrimaryBusType say "Revision Number:" objItem~RevisionNumber say "Secondary Bus Type:" objItem~SecondaryBusType say "Status:" objItem~Status say "Status Info:" objItem~StatusInfo say "System Creation Class Name:" objItem~SystemCreationClassName say "System Name:" objItem~SystemName end
strComputer = "." objWMIService = .OLEObject~GetObject("winmgmts:\\"||strComputer||"\root\CIMV2") do objItem over objWMIService~ExecQuery("Select * from Win32_MotherboardDevice") say "Availability:" objItem~Availability say "Caption:" objItem~Caption say "Config Manager Error Code:" objItem~ConfigManagerErrorCode say "Config Manager User Config:" objItem~ConfigManagerUserConfig say "Creation Class Name:" objItem~CreationClassName say "Description:" objItem~Description say "Device ID:" objItem~DeviceID say "Error Cleared:" objItem~ErrorCleared say "Error Description:" objItem~ErrorDescription say "Install Date:" objItem~InstallDate say "Last Error Code:" objItem~LastErrorCode say "Name:" objItem~Name say "PNP Device ID:" objItem~PNPDeviceID z = objItem~PowerManagementCapabilities if .NIL <> z then do x over z say objProperty.Name ": " x end say "Power Management Supported:" objItem~PowerManagementSupported say "Primary Bus Type:" objItem~PrimaryBusType say "Revision Number:" objItem~RevisionNumber say "Secondary Bus Type:" objItem~SecondaryBusType say "Status:" objItem~Status say "Status Info:" objItem~StatusInfo say "System Creation Class Name:" objItem~SystemCreationClassName say "System Name:" objItem~SystemName end