以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 发布项目 加入使用时间 过期不能使用 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=88623) |
-- 作者:281512373 -- 发布时间:2016/8/6 8:16:00 -- 发布项目 加入使用时间 过期不能使用 发布项目 加入 使用时间 过期不能使用 狐爸爸们求帮助 |
-- 作者:Hyphen -- 发布时间:2016/8/6 8:56:00 -- 增加一个内部表,设置一个时间列,发布前记录一个到期时间。 项目启动AfterOpenProject写代码 If Tables("表A").Rows(0)("时间列") < Date.Now Then msgbox("项目已到期") Syscmd.Project.Exit(False) Return End If |
-- 作者:281512373 -- 发布时间:2016/8/6 9:09:00 -- |