得到CPU序列号
运行环境:分辨率:1440×900 色深:32位 操作系统:Windows XP 按键精灵版本:7.00.3730
strout=""
Set objWMIService = GetObject("winmgmts:\\.\root\CIMV2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_Processor")
str=""
str=str & vbcrlf & "For Each objItem in colItems"
str=str & vbcrlf & " strOut = strOut & objItem.ProcessorId & vbcrlf"
str=str & vbcrlf & "Exit For"
str=str & vbcrlf & "Next"
Execute(str)
MessageBox "CPU序列号:"&strOut
按键精灵cpu
按键精灵把序列号写入txt
按键精灵 cpu
按键精灵+cpu
按键精灵如何获取cpu码
按键精灵 CPU系列号
按键精灵获取CPU ID插件
按键精灵获取CPU号叫密
按键精灵查看cpu
按键精灵+如何获取CPU