Juan,
If you have Windows NT 4 SP 4 or later, you can use WMI like this:
local loWMI, loItems, loItem, loLocator
loLocator = CREATEOBJECT('WBEMScripting.SWBEMLocator')
loWMI = loLocator.ConnectServer()
loItems = loWMIService.ExecQuery("Select * from Win32_BIOS where PrimaryBIOS = TRUE")
For Each loItem in loItems
? "Caption: " , loItem.Caption
? "CurrentLanguage: " , loItem.CurrentLanguage
? "Description: " , loItem.Description
? "Manufacturer: " , loItem.Manufacturer
? "Name: " , loItem.Name
? "ReleaseDate: " , loItem.ReleaseDate
? "SerialNumber: " , loItem.SerialNumber
? "SMBIOSBIOSVersion: " , loItem.SMBIOSBIOSVersion
? "SMBIOSMajorVersion: " , loItem.SMBIOSMajorVersion
? "SMBIOSMinorVersion: " , loItem.SMBIOSMinorVersion
? "SMBIOSPresent: " , loItem.SMBIOSPresent
? "Status: " , loItem.Status
? "Version: " , loItem.Version
Next
"The five senses obstruct or deform the apprehension of reality."
Jorge L. Borges?
"Premature optimization is the root of all evil in programming."
Donald Knuth, repeating C. A. R. Hoare
"To die for a religion is easier than to live it absolutely"
Jorge L. Borges
