专家坐堂-请教 SQL 查询语句日期变更书写格式Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  请教 SQL 查询语句日期变更书写格式  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=134187)

--  作者：lanbor
--  发布时间：2019/4/29 11:35:00
--  请教 SQL 查询语句日期变更书写格式

请教 SQL 查询语句日期变更书写格式
Dim Date1,Date2 As Date
Date2=Date.Now \'当前日期
Date1=Date2.AddDays(-30) \'当前日期减30天
Dim val As Integer
Dim g_stat As String =Nothing
Dim db00 As DataTable
Dim cmd As new SQLCommand \'找制程指令号
cmd.C
cmd.Comm andText = "SEL ECT * FROM {MO} as m1 inner join {ITEM} as i1 on m1.ITEM_ID=i1.ITEM_BUSINESS_ID WHERE m1.[STATUS] in (\'y\',\'Y\',\'3\') And m1.[DOC_DATE] between #" & date1 &“# And #& date2 &# ORDER BY m1.DOC_DATE" \' 这一句我总是出错。
请指教正确的书写格式
总是报告日期格式出错，但把日期条件取消就能正常查询的。

[此贴子已经被作者于2019/4/29 11:37:08编辑过]

--  作者：lanbor
--  发布时间：2019/4/29 12:01:00
--  看到以前的回复了，谢谢
Dim filter As String = " where 日期 >= \'"& dat1 & "\' and 日期 <= \'"& dat2 & "\'"

--  作者：有点甜
--  发布时间：2019/4/29 12:02:00
--

cmd.CommandText = "SELECT * FROM {MO} as m1 inner join {ITEM} as i1 on m1.ITEM_ID=i1.ITEM_BUSINESS_ID WHERE m1.[STATUS] in (\'y\',\'Y\',\'3\') And m1.[DOC_DATE] between #" & date1 & "# And #" & date2 & "# ORDER BY m1.DOC_DATE"