Foxtable(狐表)用户栏目专家坐堂 → 发布项目 加入使用时间 过期不能使用


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

主题:发布项目 加入使用时间 过期不能使用

帅哥哟,离线,有人找我吗?
Hyphen
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2016/8/6 8:56:00 [显示全部帖子]

增加一个内部表,设置一个时间列,发布前记录一个到期时间。

项目启动AfterOpenProject写代码

If Tables("表A").Rows(0)("时间列") < Date.Now Then
    msgbox("项目已到期")
    Syscmd.Project.Exit(False)
    Return
End If

 回到顶部