Retrieving BIOS Information using VBScript

VBScript under Windows Script Host is very powerful. Most daily administrative tasks can be implemented and performed using VBScript, which comes at each Windows Versions from and after Win98.

BIOS is a specific program that runs after a computer starts.

' Retrieving BIOS Information

Dim strComputer, colBIOS, objBIOS, i
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")

Set colBIOS = objWMIService.ExecQuery _
    ("Select * from Win32_BIOS")

For each objBIOS in colBIOS
    Wscript.Echo "Build Number: " & objBIOS.BuildNumber
    Wscript.Echo "Current Language: " & objBIOS.CurrentLanguage
    Wscript.Echo "Installable Languages: " & objBIOS.InstallableLanguages
    Wscript.Echo "Manufacturer: " & objBIOS.Manufacturer
    Wscript.Echo "Name: " & objBIOS.Name
    Wscript.Echo "Primary BIOS: " & objBIOS.PrimaryBIOS
    Wscript.Echo "Release Date: " & objBIOS.ReleaseDate
    Wscript.Echo "Serial Number: " & objBIOS.SerialNumber
    Wscript.Echo "SMBIOS Version: " & objBIOS.SMBIOSBIOSVersion
    Wscript.Echo "SMBIOS Major Version: " & objBIOS.SMBIOSMajorVersion
    Wscript.Echo "SMBIOS Minor Version: " & objBIOS.SMBIOSMinorVersion
    Wscript.Echo "SMBIOS Present: " & objBIOS.SMBIOSPresent
    Wscript.Echo "Status: " & objBIOS.Status
    Wscript.Echo "Version: " & objBIOS.Version
    For i = 0 to Ubound(objBIOS.BiosCharacteristics)
        Wscript.Echo "BIOS Characteristics: " & _
            objBIOS.BiosCharacteristics(i)
    Next
Next

Example output:

Microsoft (R) Windows Script Host Version 5.8
Copyright (C) Microsoft Corporation. All rights reserved.

Build Number: 
Current Language: en-US
Installable Languages: 1
Manufacturer: LENOVO
Name: Default System BIOS
Primary BIOS: True
Release Date: 20111206000000.000000+000
Serial Number: R9MYPT3
SMBIOS Version: 8AET56WW (1.36 )
SMBIOS Major Version: 2
SMBIOS Minor Version: 6
SMBIOS Present: True
Status: OK
Version: LENOVO - 1360
BIOS Characteristics: 7
BIOS Characteristics: 9
BIOS Characteristics: 11
BIOS Characteristics: 12
BIOS Characteristics: 15
BIOS Characteristics: 16
BIOS Characteristics: 19
BIOS Characteristics: 24
BIOS Characteristics: 26
BIOS Characteristics: 27
BIOS Characteristics: 28
BIOS Characteristics: 29
BIOS Characteristics: 30
BIOS Characteristics: 32
BIOS Characteristics: 33
BIOS Characteristics: 40
BIOS Characteristics: 42
BIOS Characteristics: 48
BIOS Characteristics: 58
BIOS Characteristics: 61
BIOS Characteristics: 64
BIOS Characteristics: 77

***** script completed - exit code: 0 *****

–EOF (The Ultimate Computing & Technology Blog) —