当前位置：佛系糖果的博客 > 书籍文档 > 正文

VBS 脚本查询电脑序列号

小学生发布于 2019-01-13
分类：书籍文档
阅读(479)

热卖产品：

On Error Resume Next
strComputer = "."
strSerialNumber = 0
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_BIOS",,48)
For Each objItem in colItems
    strSerialNumber = objItem.SerialNumber
Next
WScript.Echo strSerialNumber

1

2

3

4

5

6

7

8

9

On Error Resume Next

strComputer = "."

strSerialNumber = 0

Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")

Set colItems = objWMIService.ExecQuery("Select * from Win32_BIOS",,48)

For Each objItem in colItems

strSerialNumber = objItem.SerialNumber

Next

WScript.Echo strSerialNumber

如无特殊说明均为原创，转载请附上原文地址。：佛系糖果的博客 » VBS 脚本查询电脑序列号

标签：CMD Windows 工具

作者：小学生

相关推荐

热门推荐

说点什么

Subscribe