以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 定时执行代码 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=184052) |
-- 作者:18920118515 -- 发布时间:2022/11/23 13:31:00 -- 定时执行代码 老师,计划管理是间隔一段时间执行代码,我想实现在每晚的24:00执行一个代码,该如何操作,您给指导下 |
-- 作者:有点蓝 -- 发布时间:2022/11/23 13:50:00 -- 间隔设置为1分钟,然后在代码里判断当前时间的小时和分钟值即可 if date.now.hour = 0 andalso date.now.minite = 0 then 如果要求不是那么严格,比如在00:00~00:30之间都可以执行一次,那么把间隔设置为30分钟即可,判断代码改为 if date.now.hour = 0 andalso (date.now.minite >= 0 orelse date.now.minite <30) then
|
-- 作者:18920118515 -- 发布时间:2022/11/23 13:53:00 -- 谢谢老师 |
-- 作者:ycs5801 -- 发布时间:2023/7/23 16:45:00 -- 定时任务时间间隔,60000毫秒。
设定星期天,小时:16,分钟:42 If (d.DayOfWeek = x AndAlso d.Hour = dr("小时") AndAlso d.Minute = dr("分钟")) Then 。。。
这样为什么会触发两次? |
-- 作者:有点蓝 -- 发布时间:2023/7/24 9:19:00 -- 调试 msgbox(x) msgbox(dr("小时")) msgbox(dr("分钟")) If (d.DayOfWeek = x AndAlso d.Hour = dr("小时") AndAlso d.Minute = dr("分钟")) Then
|