VBS脚本查询电脑SN序列号的方法

打开"记事本"以后拷贝以下vbs代码，保存以后并将扩展名改为 .vbs

strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2")
Set colItems = objWMIService.InstancesOf("Win32_BIOS")
For Each objItem In colItems
      WScript.Echo "SerialNumber: " & objItem.SerialNumber
Next

双击打开该vbs文件即可显示电脑SN信息，如下图所示，可快速查询笔记本以及台式机SN了。