Интересно а: AIDA64 - программа для определения "железа", показывает этот серийник материнки?
Вот, (.Vbs) скрипт- но он показывает совсем другое. Toshiba Satelite L500: ( Serial Number: 79515059K ).
А на старой машине 2005. года показывает те же самые: ( Serial Number: 00000000 ).
Код:
Set wshShell = WScript.CreateObject( "WScript.Shell" )
strComputerName = wshShell.ExpandEnvironmentStrings( "%COMPUTERNAME%" )
WScript.Echo "Computer Name: " & strComputerName
Set objWMIService = GetObject("winmgmts:\\" & strComputerName & "\root\CIMV2")
Set colItems = objWMIService.ExecQuery( _
"SELECT * FROM Win32_ComputerSystemProduct",,48)
theValue = ""
For Each objItem in colItems
theValue = objItem.IdentifyingNumber
Next
getPCSerialNumber = theValue
WScript.Echo "Serial Number: " & theValue
