以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  求助  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=23597)

--  作者:wyd
--  发布时间:2012/9/13 18:47:00
--  求助

老师们,帮我修改下?

 

关于日期我希望是通过2个时间控件来录入

可是总是报错,无论我用不用cdate转换,

窗口的afterload:

Dim st As WinForm.DateTimePicker = e.Form.Controls("STime")
st.value = Date.Today()
Dim et As WinForm.DateTimePicker = e.Form.Controls("ETime")
et.value = Date.Today()

 

 

统计按钮代码一部分

Dim st As Date = e.Form.Controls("STime").value
Dim et As Date = e.Form.Controls("ETime").value
Dim bd1 As New SQLGroupTableBuilder("统计表1","入库")
bd1.C
Dim dt1 As fxDataSource
bd1.Groups.AddDef("品番")
bd1.Groups.AddDef("库位")
bd1.Totals.AddDef("数量","入库_数量") \'对数量进行统计
bd1.filter = "{入库}.日期 >= \'cdate(st)\' And {入库}.日期 <= \'cdate(et)\'"
dt1 = bd1.BuildDataSource()


--  作者:wyd
--  发布时间:2012/9/13 18:48:00
--  

报错截图


图片点击可在新窗口打开查看此主题相关图片如下:1241512.jpg
图片点击可在新窗口打开查看


--  作者:czy
--  发布时间:2012/9/13 18:56:00
--  
bd1.filter = "{入库}.日期 >= #" & cdate(st) & "# And {入库}.日期 <= #" & cdate(et) & "#"
--  作者:wyd
--  发布时间:2012/9/14 8:51:00
--  
谢谢,不过得把“#”换成“‘”