标题: VBS获取硬盘序列号
作者: Demon
链接: https://demon.tw/programming/vbs-harddisk-serialnumber.html
版权: 本博客的所有文章,都遵守“署名-非商业性使用-相同方式共享 2.5 中国大陆”协议条款。
VBS调用WMI获取硬盘序列号,没什么技术含量,核心是Win32_PhysicalMedia类。
'SerialNumber 'By Demon 'https://demon.tw On Error Resume Next strComputer = "." Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2") Set colItems = objWMIService.ExecQuery("Select * from Win32_PhysicalMedia",,48) Dim objItem 'as Win32_PhysicalMedia For Each objItem in colItems WScript.Echo "SerialNumber: " & objItem.SerialNumber Next
参考链接:http://msdn.microsoft.com/en-us/library/windows/desktop/aa394346%28v=vs.85%29.aspx
赞赏微信赞赏支付宝赞赏
随机文章: