以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  计划时间间隔问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=173101)

--  作者：wssylxb --  发布时间：2021/11/15 14:59:00 --  计划时间间隔问题 您好老师： 计划的执行时间间隔想根据客户的设置而定，可以这样设置不？ 在全局代码中设置： Public Dim CJMS As  String AfterOpenProject设置： JG=Tables("采集模式设定").Rows(0)("间隔设定") MyTimers("计划1").Interval = JG*3600*1000  其中JG 是客户输入的小时数

--  作者：狐狸爸爸 --  发布时间：2021/11/15 15:00:00 --   可以

--  作者：wssylxb --  发布时间：2021/11/15 15:00:00 --   打错了 在全局代码中设置： Public Dim JG As  Integer

--  作者：有点蓝 --  发布时间：2021/11/15 15:16:00 --   Public CJMS As  String

--  作者：wssylxb --  发布时间：2021/11/15 15:39:00 --   谢谢！

--  作者：wssylxb --  发布时间：2021/11/15 16:44:00 --   老师：JG 设置是1，就是一小时，计划管理中的计划间隔是2分钟，现在还是2分钟执行计划，就是语句没有执行呀！ MyTimers("计划1").Interval = JG*3600*1000  其中JG 是客户输入的小时数  我把语句换成 MyTimers("计划1").Interval = 300000 后5分钟后执行了计划。说明这个语句起作用。上边的没有运行，不知如何解决？谢谢老师！

--  作者：有点蓝 --  发布时间：2021/11/15 17:14:00 --   先停止计时器，再启动 MyTimers("计划1").Enabled = false MyTimers("计划1").Interval = JG*3600*1000 MyTimers("计划1").Enabled = true

--  作者：wssylxb --  发布时间：2021/11/15 17:37:00 --   谢谢蓝版主！！

--  作者：wssylxb --  发布时间：2021/11/16 17:02:00 --   蓝老师：按您的指导计划可以按照用户输入的时间执行了。但有点问题还麻烦您，我把JG类型改成单精度小数或者双精度小数就不行，提示找不到字段:“UserCode.JG”。不知为什么？

--  作者：有点蓝 --  发布时间：2021/11/16 17:09:00 --   改哪里，怎么改的