以文本方式查看主题
- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 求个时间查询的代码~~ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=40389)
|
-- 作者:ee5090
-- 发布时间:2013/9/17 20:00:00
-- 求个时间查询的代码~~
如题,当选择了起始时间和结束时间后,点查询键,能够查询到选择的时间段内的行。 此主题相关图片如下:0033.jpg
|
-- 作者:有点甜
-- 发布时间:2013/9/17 20:22:00
--
比如你的表名是 订单表,列名是 日期
dim s_date as date = e.form.controls("起始日期").Value dim e_date as date = e.form.controls("结束日期").Value Tables("订单").Filter = "日期 >= #" & s_date & "# and 日期 <= #" & e_date & "#"
|
-- 作者:程兴刚
-- 发布时间:2013/9/17 20:25:00
--
Dim dt1 As Date = e.Form.Controls("开始日期").Value Dim dt2 As Date = e.Form.Controls("结束日期").Value Tables("表B").Filter = "name = \'" & e.Form.Controls("姓名").Value & "\' and 操作时间 > #" & dt1.AddDays(-1) & "# and 操作时间 < #" & dt2.AddDays(1) & "#"
|
-- 作者:ee5090
-- 发布时间:2013/9/17 21:30:00
--
太谢谢了。用你的代码,果然OK了。
|