Если вы не возражаете против небольшого vbscript, приведенный ниже код вернет все, что Windows знает о BIOS. Я не могу взять кредит на код - он исходит непосредственно из приложения Microsoft Scriptomatic .
Скопируйте приведенный ниже код в файл с именем BIOS-Info.vbs (или как вы хотите его назвать), а затем в командной строке введите: cscript BIOS-info.vbs
VBScript код следующим образом:
On Error Resume Next Const wbemFlagReturnImmediately = &h10 Const wbemFlagForwardOnly = &h20 arrComputers = Array(".") For Each strComputer In arrComputers WScript.Echo WScript.Echo "==========================================" WScript.Echo "Computer: " & strComputer WScript.Echo "==========================================" Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2") Set colItems = objWMIService.ExecQuery("SELECT * FROM Win32_BIOS", "WQL", _ wbemFlagReturnImmediately + wbemFlagForwardOnly) For Each objItem In colItems strBiosCharacteristics = Join(objItem.BiosCharacteristics, ",") WScript.Echo "BiosCharacteristics: " & strBiosCharacteristics strBIOSVersion = Join(objItem.BIOSVersion, ",") WScript.Echo "BIOSVersion: " & strBIOSVersion WScript.Echo "BuildNumber: " & objItem.BuildNumber WScript.Echo "Caption: " & objItem.Caption WScript.Echo "CodeSet: " & objItem.CodeSet WScript.Echo "CurrentLanguage: " & objItem.CurrentLanguage WScript.Echo "Description: " & objItem.Description WScript.Echo "IdentificationCode: " & objItem.IdentificationCode WScript.Echo "InstallableLanguages: " & objItem.InstallableLanguages WScript.Echo "InstallDate: " & WMIDateStringToDate(objItem.InstallDate) WScript.Echo "LanguageEdition: " & objItem.LanguageEdition strListOfLanguages = Join(objItem.ListOfLanguages, ",") WScript.Echo "ListOfLanguages: " & strListOfLanguages WScript.Echo "Manufacturer: " & objItem.Manufacturer WScript.Echo "Name: " & objItem.Name WScript.Echo "OtherTargetOS: " & objItem.OtherTargetOS WScript.Echo "PrimaryBIOS: " & objItem.PrimaryBIOS WScript.Echo "ReleaseDate: " & WMIDateStringToDate(objItem.ReleaseDate) WScript.Echo "SerialNumber: " & objItem.SerialNumber WScript.Echo "SMBIOSBIOSVersion: " & objItem.SMBIOSBIOSVersion WScript.Echo "SMBIOSMajorVersion: " & objItem.SMBIOSMajorVersion WScript.Echo "SMBIOSMinorVersion: " & objItem.SMBIOSMinorVersion WScript.Echo "SMBIOSPresent: " & objItem.SMBIOSPresent WScript.Echo "SoftwareElementID: " & objItem.SoftwareElementID WScript.Echo "SoftwareElementState: " & objItem.SoftwareElementState WScript.Echo "Status: " & objItem.Status WScript.Echo "TargetOperatingSystem: " & objItem.TargetOperatingSystem WScript.Echo "Version: " & objItem.Version WScript.Echo Next Next Function WMIDateStringToDate(dtmDate) WScript.Echo dtm: WMIDateStringToDate = CDate(Mid(dtmDate, 5, 2) & "/" & _ Mid(dtmDate, 7, 2) & "/" & Left(dtmDate, 4) _ & " " & Mid (dtmDate, 9, 2) & ":" & Mid(dtmDate, 11, 2) & ":" & Mid(dtmDate,13, 2)) End Function