以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  窗口中的语句为什么无法从控件中获取输入的日期呢?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=139302)

--  作者:yellboy
--  发布时间:2019/8/10 11:43:00
--  窗口中的语句为什么无法从控件中获取输入的日期呢?
Dim date1 As Date = e.Form.Controls("DateTimePicker1").value
Dim sql As String = "Select * FRO M {hun} where ch_date = \'date1\'"
Dim b As New CrossTableBuilder("任务表",sql, "jc") 
b.HGroups.AddDef("ph_num")
b.VGroups.AddDef("ch_date","{0}日")
b.Totals.AddDef("hsxishu") 
b.HorizontalTotal = True
b.VerticalTotal = True
b.Build()
Tables("检测任务_table1").DataSource = b.build()

请教专家
窗口中的语句为什么无法从控件中获取输入的日期呢?数据库设置没有问题。前面2句没起作用 ,第2句的select 语句如果换成固定日期是可以执行的。

--  作者:有点蓝
--  发布时间:2019/8/10 13:50:00
--  
参考:http://www.foxtable.com/webhelp/topics/1284.htm

Dim sql As String = "Select * FROM {hun} where ch_date = \'" & date1 & "\'"

--  作者:akkio99
--  发布时间:2019/8/15 16:57:00
--  
图片点击可在新窗口打开查看 你好棒啊。。谢谢