Returns information about the processors installed on 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_Processor") say "Address Width:" objItem~AddressWidth say "Architecture:" objItem~Architecture say "Availability:" objItem~Availability say "Caption:" objItem~Caption say "Config Manager Error Code:" objItem~ConfigManagerErrorCode say "Config Manager User Config:" objItem~ConfigManagerUserConfig say "Cpu Status:" objItem~CpuStatus say "Creation Class Name:" objItem~CreationClassName say "Current Clock Speed:" objItem~CurrentClockSpeed say "Current Voltage:" objItem~CurrentVoltage say "Data Width:" objItem~DataWidth say "Description:" objItem~Description say "Device ID:" objItem~DeviceID say "Error Cleared:" objItem~ErrorCleared say "Error Description:" objItem~ErrorDescription say "Ext Clock:" objItem~ExtClock say "Family:" objItem~Family say "Install Date:" objItem~InstallDate say "L2 Cache Size:" objItem~L2CacheSize say "L2 Cache Speed:" objItem~L2CacheSpeed say "Last Error Code:" objItem~LastErrorCode say "Level:" objItem~Level say "Load Percentage:" objItem~LoadPercentage say "Manufacturer:" objItem~Manufacturer say "Max Clock Speed:" objItem~MaxClockSpeed say "Name:" objItem~Name say "Other Family Description:" objItem~OtherFamilyDescription 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 "Processor Id:" objItem~ProcessorId say "Processor Type:" objItem~ProcessorType say "Revision:" objItem~Revision say "Role:" objItem~Role say "Socket Designation:" objItem~SocketDesignation say "Status:" objItem~Status say "Status Info:" objItem~StatusInfo say "Stepping:" objItem~Stepping say "System Creation Class Name:" objItem~SystemCreationClassName say "System Name:" objItem~SystemName say "Unique Id:" objItem~UniqueId say "Upgrade Method:" objItem~UpgradeMethod say "Version:" objItem~Version say "Voltage Caps:" objItem~VoltageCaps end
strComputer = "." objWMIService = .OLEObject~GetObject("winmgmts:\\"||strComputer||"\root\CIMV2") do objItem over objWMIService~ExecQuery("Select * from Win32_Processor") say "Address Width:" objItem~AddressWidth say "Architecture:" objItem~Architecture say "Availability:" objItem~Availability say "Caption:" objItem~Caption say "Config Manager Error Code:" objItem~ConfigManagerErrorCode say "Config Manager User Config:" objItem~ConfigManagerUserConfig say "Cpu Status:" objItem~CpuStatus say "Creation Class Name:" objItem~CreationClassName say "Current Clock Speed:" objItem~CurrentClockSpeed say "Current Voltage:" objItem~CurrentVoltage say "Data Width:" objItem~DataWidth say "Description:" objItem~Description say "Device ID:" objItem~DeviceID say "Error Cleared:" objItem~ErrorCleared say "Error Description:" objItem~ErrorDescription say "Ext Clock:" objItem~ExtClock say "Family:" objItem~Family say "Install Date:" objItem~InstallDate say "L2 Cache Size:" objItem~L2CacheSize say "L2 Cache Speed:" objItem~L2CacheSpeed say "Last Error Code:" objItem~LastErrorCode say "Level:" objItem~Level say "Load Percentage:" objItem~LoadPercentage say "Manufacturer:" objItem~Manufacturer say "Max Clock Speed:" objItem~MaxClockSpeed say "Name:" objItem~Name say "Other Family Description:" objItem~OtherFamilyDescription 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 "Processor Id:" objItem~ProcessorId say "Processor Type:" objItem~ProcessorType say "Revision:" objItem~Revision say "Role:" objItem~Role say "Socket Designation:" objItem~SocketDesignation say "Status:" objItem~Status say "Status Info:" objItem~StatusInfo say "Stepping:" objItem~Stepping say "System Creation Class Name:" objItem~SystemCreationClassName say "System Name:" objItem~SystemName say "Unique Id:" objItem~UniqueId say "Upgrade Method:" objItem~UpgradeMethod say "Version:" objItem~Version say "Voltage Caps:" objItem~VoltageCaps end