Foxtable(狐表) → 用户栏目 → 专家坐堂 → 定时执行代码


  共有4570人关注过本帖树形打印复制链接

主题：定时执行代码
帅哥哟，离线，有人找我吗？
18920118515
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：76 积分：735 威望：0 精华：0 注册：2020/12/20 14:02:00 		定时执行代码  发帖心情 Post By：2022/11/23 13:31:00 [只看该作者]

老师，计划管理是间隔一段时间执行代码，我想实现在每晚的24：00执行一个代码，该如何操作，您给指导下

 回到顶部
帅哥，在线噢！
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：106680 积分：542589 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：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
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：76 积分：735 威望：0 精华：0 注册：2020/12/20 14:02:00 		  发帖心情 Post By：2022/11/23 13:53:00 [只看该作者]

谢谢老师

 回到顶部
帅哥哟，离线，有人找我吗？
ycs5801
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：942 积分：6803 威望：0 精华：0 注册：2009/6/24 9:44:00 		  发帖心情 Post By：2023/7/23 16:45:00 [只看该作者]

 定时任务时间间隔，60000毫秒。

 

设定星期天，小时：16,分钟：42

If (d.DayOfWeek = x AndAlso d.Hour = dr("小时") AndAlso d.Minute = dr("分钟")) Then

。。。

 

这样为什么会触发两次？
 回到顶部
帅哥，在线噢！
有点蓝
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：106680 积分：542589 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：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
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.03125 秒, 4 次数据查询