/*
WMI query to list all properties and values of the Win32_BIOS class
This Open Object Rexx script was generated using the WMI Code Generator, Version 1.30
http://www.robvanderwoude.com/updates/wmigen.html
*/

Parse Upper Arg strComputer .
If strComputer = "" Then strComputer = "."

objWMIService = .OLEObject~GetObject( "winmgmts://"||strComputer||"/root/CIMV2" )

Do objItem Over objWMIService~ExecQuery( "Select * from Win32_BIOS" )
	Say "Name                           : "||objItem~Name
	Say "Version                        : "||objItem~Version
	Say "Manufacturer                   : "||objItem~Manufacturer
	Say "SMBIOSBIOS Version             : "||objItem~SMBIOSBIOSVersion
	Say
End