按键精灵观察程序的内容是否更新，更新就执行脚本

更新时间2018-05-10 11:29:34

程序更新内容的时间是十分钟一次，不要使用十分钟延时循环执行，不懂解决时间差！请各位大神指教一下！谢谢！

Dim 系统时间, 时间差_分

系统时间 = now//获取系统时间

Do

    时间差_分 = DateDiff("n", 系统时间, now)//系统时间的分和当前时间的分比较

    If 时间差_分 >= 10 Then        

        系统时间 = now

        //

        //

        //这里写上要执行的代码

        //

    End If

    For 60//每一分钟判断 变量时间差_分有没有到10

        //TracePrint "已经运行 " & DateDiff("s", 系统时间, now) & "秒"

        Delay 1000

    Next

Loop

相关标签:按键精灵