GetBiosInfo – Retrieve information about the bios

Const HKEY_LOCAL_MACHINE = &H80000002' Return information about the Bios (NT only)'' Requires the GetRegistryValue routineSub GetBiosInfo(BiosDate As String, BiosVersion As String)    ' These keys appear to exist only on NT systems    BiosDate = GetRegistryValue(HKEY_LOCAL_MACHINE, _        "HardwareDescriptionSystem", "SystemBiosDate", "")    BiosVersion = GetRegistryValue(HKEY_LOCAL_MACHINE, _        "HardwareDescriptionSystem", "SystemBiosVersion", "")End Sub

Share the Post:
Share on facebook
Share on twitter
Share on linkedin

Overview

Recent Articles: