Computer Serial Number

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

Some of the bigger name band computers have serial numbers written in the
bios, is there a WMI Win32 class that can retrieve that serial number?
 
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_BIOS",,48)
For Each objItem In colItems
strBIOSTypeAndVersion = objItem.Caption
strManufacturer = objItem.Manufacturer
strServiceTagNumber = objItem.SerialNumber
Next
 
Back
Top