论坛 › 已解决问题区 › 如何每隔几分钟执行一次函数?

l4ever 发表于 2009-6-7 18:36:46

如何每隔几分钟执行一次函数?

本帖最后由 l4ever 于 2009-6-7 21:23 编辑

注意不能sleep.不然系统托盘右键菜单打不开的.
有其他办法吗?
我想24小时不停循环执行.

lynfr8 发表于 2009-6-7 19:21:43

AdlibEnable ( "函数名" [, 时间] )
时间 [可选参数] 指定每隔多少毫秒就调用函数一次.默认值为 250 毫秒.

或者借鉴以下代码：Global Const $iSeconds = 7200000
Global $iBeginTime = TimerInit()
While 1
      If TimerDiff($iBeginTime) >= $iSeconds Then
                MsgBox(4096, "提示", "您上网时间已超过2小时，请注意休息！")
                $iBeginTime = TimerInit()
      EndIf   
      Sleep(1000)
WEnd

l4ever 发表于 2009-6-7 21:23:03

非常感谢楼上的朋友

kn007 发表于 2009-6-7 21:59:19

学习了，我去试试ing

autothem 发表于 2009-6-7 22:06:01

不错，有用的函数，学习了

kn007 发表于 2009-6-7 22:16:15

AdlibEnable不会用，倒是你的代码不错

查看完整版本: 如何每隔几分钟执行一次函数?