Получить серийный номер ПК из реестра
Я пытаюсь получить серийный номер ПК пользователя из сценария VBS и отобразить его в msgbox. Мне известны методы командной строки (wmic bios getserialnumber), и мне известны аппаратные методы (например, просмотр наклейки или коробки). Я проверил реестр (HKLM\HARDWARE\DESCRIPTION\System\BIOS) но безрезультатно. Как я могу использовать VBS (без вызова командного файла) для отображения серийного номера пользователя?
Я также ищу место в реестре для серийного номера, я могу обойти сценарий, мне просто нужно знать, где искать
1 ответ
Вот код VBScript, чтобы найти серийный номер машины, которую вы используете:
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery( _
"SELECT * FROM Win32_ComputerSystemProduct")
For Each objItem in colItems
msgbox "This Device: " & objItem.IdentifyingNumber, vbOkayOnly, "Serial Number"
Next
Это сделает msgbox, который отображает серийный номер в стандартном формате. Спасибо за вашу помощь