批处理和vbs还没强大到这个程度。
只能从Win32_ComputerSystem类中获得一点简单信息
vbs- Set wmiObjSet = GetObject("winmgmts:{impersonationLevel=impersonate}"). _
- InstancesOf("Win32_ComputerSystem")
- For Each colSettings In wmiObjSet
- ' 判斷溫度狀態
- Select Case colSettings.ThermalState
- Case 1: WScript.Echo "其他"
- Case 2: WScript.Echo "未知"
- Case 3: WScript.Echo "安全"
- Case 4: WScript.Echo "警告"
- Case 5: WScript.Echo "嚴重"
- Case 6: WScript.Echo "無法復原"
- End Select
- Next
复制代码 找软件去,又好用又准确。 |