以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  定时执行代码  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=146623)
--  作者：yangwenghd
--  发布时间：2020/2/27 17:52:00
--  定时执行代码
老师，如果设置某个时候执行代码帮助应该学习哪一章呀，谢谢老师。
比如在项目打开的情况下，然后设置星期一到星期五 的早上9点 执行代码A，
--  作者：cd_tdh
--  发布时间：2020/2/27 20:17:00
--  
计划管理把吧
--  作者：cd_tdh
--  发布时间：2020/2/27 20:18:00
--  
用代码判断系统时间，到时候就执行就行
--  作者：有点蓝
--  发布时间：2020/2/28 9:18:00
--  
http://www.foxtable.com/webhelp/topics/0657.htm
--  作者：yangwenghd
--  发布时间：2020/2/28 12:32:00
--  
谢谢老师，那个可以北京时间或者电脑时间未基础吗？比如设置每周的星期一和星期二的某个点啊执行。不是这种计时执行，感谢 感谢
--  作者：有点蓝
--  发布时间：2020/2/28 14:48:00
--  
在计划管理里设置间隔为1小时，有多少毫秒自己转换一下。然后判断当前日期时间是不是星期一和星期二的某个点
--  作者：yangwenghd
--  发布时间：2020/2/28 14:54:00
--  
好的 谢谢老师，这个还可以想屏保那样吗？已经鼠标没有动开始计时。
--  作者：有点蓝
--  发布时间：2020/2/28 15:19:00
--  
结合这里的用法：http://www.foxtable.com/webhelp/topics/0665.htm
--  作者：yangwenghd
--  发布时间：2020/2/28 17:42:00
--  
老师， 有办法在SystemIdle里面执行红色的代码吗？
If LastInputTickCount > 3000 Then
    If forms("计划表窗口").Opened=False Then
        forms("计划表窗口").Open
    End If
    forms("计划表窗口").visible=True
    \'Forms("采订状态窗口").Controls("Panel02").Visible = False
   
    BaseMainForm.Visible = False
    \'Forms("采订状态窗口").Controls("Panel1").Visible = False
End If
--  作者：有点蓝
--  发布时间：2020/2/28 18:03:00
--  
If LastInputTickCount > 3000 Then
    If forms("计划表窗口").Opened=False Then
        forms("计划表窗口").Open
    End If
    forms("计划表窗口").visible=True
if forms("采订状态窗口").Opened
    \'Forms("采订状态窗口").Controls("Panel02").Visible = False
    
    BaseMainForm.Visible = False
    \'Forms("采订状态窗口").Controls("Panel1").Visible = False
end if
End If