找回密码
 加入
搜索
查看: 11956|回复: 3

关于CPU温度检测

[复制链接]
发表于 2009-2-11 22:37:24 | 显示全部楼层 |阅读模式
以下是我在本论坛里找的CPU温度检测代码

现在有个问题就是我想检测CPU温度达到60度或以上才发送文本

而不是按现在的脚本检测完温度就发送文本

请问要怎么改呢?

Dim $temp
        $config=IniRead ("config.ini", "config", "存储路径", "")
    $objWMIService = ObjGet("winmgmts:\\.\root\WMI")
    $colItems = $objWMIService.ExecQuery("SELECT * FROM MSAcpi_ThermalZoneTemperature")
    $temp = ""
    For $objItem in $colItems
        $temp &= "CurrentTemperature: " & ($objItem.CurrentTemperature - 2732) / 10 & ""
    Next
        FileWriteLine($config & @ComputerName & ".txt", @YEAR&'-'&@MON&'-'&@MDAY&'-'&@HOUR&'点'&@MIN&'分'&@SEC&'秒' & "  温度:" & StringTrimLeft($temp,20) & "°C")

[ 本帖最后由 landays 于 2009-2-13 03:08 编辑 ]
发表于 2009-2-12 00:05:06 | 显示全部楼层
基础概念的学习最好不要从修改开始 忠告啊
 楼主| 发表于 2009-2-13 03:08:47 | 显示全部楼层
谢谢楼上两位
我是工作需要,急需这个脚本,自己看了帮助很久也没个头绪
所以来请人帮帮忙,总之多谢了。
发表于 2018-1-16 16:27:57 | 显示全部楼层
加载皮肤的论坛都有啊..
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-12-24 07:52 , Processed in 0.068396 second(s), 20 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表