以文本方式查看主题
- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]关于日期筛选 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=70590)
|
-- 作者:chenjiu6202
-- 发布时间:2015/6/24 18:52:00
-- [求助]关于日期筛选
此主题相关图片如下:714fqag%2_qvd{cxb1x4$g.png
上图这个表中,起始时间是time格式,如何获取6月24日18点以后所有的记录
请帮忙看看下面这段代码错在哪里了?
Dim cmd As New SQLCommand cmd.C cmd.CommandText = "Select GetDate()" Dim dt As Date dt = cmd.ExecuteScalar() Dim dy As Date = dt.Date Dim hy As String = " 18:00" Dim ht As Date = dy + hy Dim hy1 As Date = Format(ht,"HH:mm") Dim h As TimeSpan = ht - dt If h.TotalMinutes < 0 Then For Each mx As DataRow In DataTables("计划图").Select("起始日期 = #"& dt.Date &"# And 起始时间 >= #"& hy1 &"#") If mx("终到站") = "虎石" Dim z As String = mx("终到时间") Dim q As String = mx("起始时间") End If Next Else End If
|
-- 作者:大红袍
-- 发布时间:2015/6/24 19:49:00
--
试试
For Each mx As DataRow In DataTables("计划图").Select("起始日期 = #" & dt.Date & "# And 起始时间 >= #" & new Date(1900,1,1,18,0,0) & "#")
|
-- 作者:chenjiu6202
-- 发布时间:2015/6/25 8:14:00
--
袍哥,谢了,ok了,但是,你能给我说说是什么原理吗?或者有这个知识点的相关资料也行
|
-- 作者:大红袍
-- 发布时间:2015/6/25 9:44:00
--
以下是引用chenjiu6202在2015/6/25 8:14:00的发言:
袍哥,谢了,ok了,但是,你能给我说说是什么原理吗?或者有这个知识点的相关资料也行
没有日期的时间,默认的年月日,是1900年1月1日,必须这样拼凑才行。
|
-- 作者:chenjiu6202
-- 发布时间:2015/6/26 20:50:00
--
谢谢!袍哥,又学到了知识,真诚感谢!
|