lcComputer = "." >loWMIService = Getobject("winmgmts:" ; > + "{impersonationLevel=impersonate}!\\" + lcComputer + "\root\cimv2") >colBIOS = loWMIService.ExecQuery ; > ("Select * from Win32_BIOS") >For Each loBIOS In colBIOS > ?"Build Number: " + loBIOS.BuildNumber > ?"Current Language: " + loBIOS.CurrentLanguage > ?"Installable Languages: " + TRANSFORM(loBIOS.InstallableLanguages) > ?"Manufacturer: " + loBIOS.Manufacturer > ?"Name: " + loBIOS.Name > ?"Primary BIOS: " + TRANSFORM(loBIOS.PrimaryBIOS) > ?"Release Date: " + TRANSFORM(loBIOS.ReleaseDate) > ?"Serial Number: " + loBIOS.SerialNumber > ?"SMBIOS Version: " + loBIOS.SMBIOSBIOSVersion > ?"SMBIOS Major Version: " + transf(loBIOS.SMBIOSMajorVersion) > ?"SMBIOS Minor Version: " + TRANSFORM((loBIOS.SMBIOSMinorVersion)) > ?"SMBIOS Present: " + TRANSFORM(loBIOS.SMBIOSPresent) > ?"Status: " + loBIOS.Status > ?"Version: " + loBIOS.Version > For i = 0 To 100 > ?"BIOS Characteristics: " + ; > TRANSFORM(loBIOS.BiosCharacteristics(i)) > Next >Next