01 2013 档案
摘要:MsgValue = ""Set objWMIService = GetObject("winmgmts:\\.\root\cimv2")'获取硬盘序列号Set colItems = objWMIService.ExecQuery("SELECT * FROM Win32_PhysicalMedia", , 48)For Each objItem In colItemsMsgValue = MsgValue & vbCrLf & "硬盘 = " & objItem.SerialNum
阅读全文
摘要:http://blog.chinaunix.net/uid-20710081-id-3360235.html
阅读全文

浙公网安备 33010602011771号