Получить серийный номер ПК из реестра

Я пытаюсь получить серийный номер ПК пользователя из сценария 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, который отображает серийный номер в стандартном формате. Спасибо за вашу помощь

Другие вопросы по тегам