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