SCRIPTS Serial Number

Obtener Serial Number de una PC o Notebook. Get serial number
Puedes utilizar el siguiente scripts que te funcionara para obtener el serial number local o de un host remoto.
Copia el siguiente scripts en un blog de notas y guárdalo con extencion .vbs
******************


strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2")
Set colItems = objWMIService.ExecQuery( _
    "SELECT * FROM Win32_BaseBoard",,48)
For Each objItem in colItems
'    Wscript.Echo "-----------------------------------"
'    Wscript.Echo "Win32_BaseBoard instance"
'    Wscript.Echo "-----------------------------------"
    Wscript.Echo "SerialNumber: " & objItem.SerialNumber
Next