专家坐堂-Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  筛选日期  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=116395)

--  作者：wyz20130512
--  发布时间：2018/3/23 20:23:00
--
For Each dr As DataRow In DataTables("工作日报").SQLSelect("[部门] = \'营销部\' And [日期] In (#" & Date.Today & "#,#" & Date.Today.AddDays(-1) & "#)")

若后台数据库为MSsql，则将其中的#号替换为\'

[此贴子已经被作者于2018/3/23 20:25:52编辑过]

--  作者：有点蓝
--  发布时间：2018/3/23 20:47:00
--
For Each dr As DataRow In DataTables("工作日报").sqlSelect("[部门] = \'营销部\'and "日期 >= #" & Date.Today.AddDays(-1) & "#"", "", "日期 Desc")

--  作者：有点甜
--  发布时间：2018/3/25 21:12:00
--

参考代码

For Each dr As DataRow In DataTables("工作日报").sqlSelect("[部门] = \'营销部\' and 日期 >= #" & Date.Today.AddDays(-1) & "#", "", "日期 Desc")