从注册表获取 PC 序列号

从注册表获取 PC 序列号

我正在尝试从 VBS 脚本获取用户 PC 的序列号,并将其显示在 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

这将创建一个以标准格式显示序列号的消息框。感谢大家的帮助

相关内容