找回密码  加入

AUTOIT CN

搜索
查看: 213|回复: 8

隔天的定时,怎么实现

 关闭 [复制链接]
发表于 2021-4-9 14:02:31 来自手机 | 显示全部楼层 |阅读模式
比如今天晚上11点定时运行某一程序,3小时后再次运行,但隔天了,怎么实现?
发表于 2021-4-9 14:47:30 | 显示全部楼层
判断时间戳,或者获取网络时间,方法很多,最简单就是这个函数AdlibRegister ( "函数" [, 时间] )
发表于 2021-4-9 16:54:07 | 显示全部楼层
按时间定位,相隔48小时运行一次,最好选择定时任务。
发表于 2021-4-10 07:31:43 | 显示全部楼层
定时执行的,每次执行时,先把起始时间重置。
发表于 2021-4-10 16:01:02 | 显示全部楼层
调用系统的定时任务不就行了
发表于 2021-4-12 21:32:07 | 显示全部楼层
如果不怕占用资源,这样睡三个小时。哈哈
sleep(10800*1000)
发表于 2021-4-14 08:35:50 | 显示全部楼层
本帖最后由 chzj589 于 2021-4-14 08:54 编辑

  1. <blockquote>#include <Date.au3>
复制代码
  1. #include <Date.au3>
  2. #include <MsgBoxConstants.au3>

  3. Local $iSec, $iMin, $iHour, $iHoura, $iHouraa, $HO=23
  4. ; 随时间计算
  5. Local $iStartTicks = _TimeToTicks($HO, @MIN, @SEC)
  6. ; 计算 3小时后的时间值
  7. Local $iEndTicks = $iStartTicks + 3 * 3600 * 1000
  8. _TicksToTime($iEndTicks, $iHour, $iMin, $iSec)
  9. ;MsgBox($MB_SYSTEMMODAL, '', '3小时后的时间:' & $iHour & ":" & $iMin & ":" & $iSec)
  10. If $iHour > "24" Then
  11.         $iHoura=$iHour-24
  12. EndIf
  13. Local $iLength = StringLen($iHoura)
  14. If $iLength = "1" Then
  15.         $iHouraa="0" & $iHoura
  16. EndIf
  17. $Time = $iHouraa & ":" & $iMin & ":" & $iSec
  18. ;写入配置文件
  19. Local $sFilea2 = @ScriptDir & "\Time.ini"
  20. IniWrite($sFilea2, "1", "1", $Time)
  21. ; 读 ini 文件中字段为 "常规", 关键字为 "标题" 的值.
  22. Local $sRead = IniRead($sFilea2, "1", "1", "")
  23. $Timea = $HO & ":" & @MIN & ":" & @SEC
  24. If $Timea = $sRead Then
  25.         MsgBox(0, '运行时间', '启动程序:' & $Time)
  26. Else
  27.         MsgBox(0, '时间', '现在时间:' & $Timea & @CRLF & '启动程序:' & $Time)
  28. EndIf


复制代码

发表于 2021-4-14 09:19:01 | 显示全部楼层

分与秒个位数时需要补个零

  1. #include <Date.au3>
  2. #include <MsgBoxConstants.au3>
  3. Local $iSec, $iMin, $iHour, $iHoura, $iHouraa, $HO=@HOUR;23;
  4. ; 随时间计算
  5. Local $iStartTicks = _TimeToTicks($HO, @MIN, @SEC)
  6. ; 计算 3小时后的时间值
  7. Local $iEndTicks = $iStartTicks + 3 * 3600 * 1000
  8. _TicksToTime($iEndTicks, $iHour, $iMin, $iSec)
  9. ;MsgBox($MB_SYSTEMMODAL, '', '3小时后的时间:' & $iHour & ":" & $iMin & ":" & $iSec)
  10. If $iHour > "24" Then
  11.         $iHoura=$iHour-24
  12. Else
  13.         $iHoura=$iHour
  14. EndIf
  15. Local $iLength = StringLen($iHoura)
  16. If $iLength = "1" Then
  17.         $iHouraa="0" & $iHoura
  18.         Else
  19.         $iHouraa= $iHoura
  20. EndIf
  21. Local $iLength1 = StringLen($iMin)
  22. If $iLength1 = "1" Then
  23.         $iMina="0" & $iMin
  24.         Else
  25.         $iMina= $iMin
  26. EndIf
  27. Local $iLength2 = StringLen($iSec)
  28. If $iLength2 = "1" Then
  29.         $iSeca="0" & $iSec
  30.         Else
  31.         $iSeca= $iSec
  32. EndIf
  33. $Time = $iHouraa & ":" & $iMina & ":" & $iSeca
  34. ;写入配置文件
  35. Local $sFilea2 = @ScriptDir & "\Time.ini"
  36. IniWrite($sFilea2, "1", "1", $Time)
  37. ; 读 ini 文件中字段为 "常规", 关键字为 "标题" 的值.
  38. Local $sRead = IniRead($sFilea2, "1", "1", "")
  39. $Timea = @HOUR & ":" & @MIN & ":" & @SEC
  40. If $Timea = $sRead Then
  41.         MsgBox(0, '运行时间', '启动程序:' & $Time)
  42. Else
  43.         MsgBox(0, '时间', '现在时间:' & $Timea & @CRLF & '启动程序:' & $Time)
  44. EndIf

复制代码

您需要登录后才可以回帖 登录 | 加入

本版积分规则

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

GMT+8, 2021-5-7 19:05 , Processed in 0.156250 second(s), 19 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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