Foxtable(狐表) → 用户栏目 → 专家坐堂 → 系统注册


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

主题：系统注册
帅哥哟，离线，有人找我吗？
狐狸爸爸
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：管理员 帖子：47448 积分：251054 威望：0 精华：91 注册：2008/6/17 17:14:00 		  发帖心情 Post By：2011/9/15 14:57:00 [显示全部帖子]

一样，首次启动记录一下日期，以后每次启动比较这个日期，如果超过10天，就禁止进入。
 回到顶部
帅哥哟，离线，有人找我吗？
狐狸爸爸
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：管理员 帖子：47448 积分：251054 威望：0 精华：91 注册：2008/6/17 17:14:00 		  发帖心情 Post By：2011/9/15 15:25:00 [显示全部帖子]

Dim dt As Date = GetConfigValue("StartDate" & ComputerId, Date.Today) '注意默认值设置为今天，也就是没有记录过日期的话，就返回今天的时间
If dt = Date.Today Then ‘如果日期等于今天，也就是没有记录过日期
    SaveConfigValue("StartDate" & ComputerId, dt) ’那么记录如期，就是今天的日期
End If
output.show(dt)
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.03201 秒, 5 次数据查询