Foxtable(狐表)用户栏目专家坐堂 → 关于帮助中的复杂的网络编号


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

主题:关于帮助中的复杂的网络编号

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


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

1、编号不需要去追求绝对连续,相对连续就行了。

2、第二个问题,获得今天是星期几,然后从你的表中取得这个日期的事件范围,最好判断现在的事件是否在这个事件范围内。


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

Dim d1 As String = Format(Date.now,"HH:ss")

Dim dr As DataRow = DataTables("登录时间").Find("登录期限 ='" & Format(Date.Now, "dddd")  & “‘”)

If dr IsNot Nothing AndAlSo d1 >= Format(dr("登录开始时间"),"HH:SS") AndAlso d1 <= Format(dr("登录结束时间"),"HH:SS") Then      

     MessageBox.Show("通过")

Else      

     MessageBox.Show("不通过")

End If


 回到顶部