以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  请教有时间阶段的数据填充代码  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=184199)

--  作者:13315253800
--  发布时间:2022/11/28 11:30:00
--  请教有时间阶段的数据填充代码

请教有时间阶段的数据填充代码如下,但提示错误,请指导

Dim ed As WinForm.DateTimePicker\'定义日期输入框变量

ed = e.Form.Controls("DateTimePicker1")\'日期输入框

Dim ed1 As WinForm.DateTimePicker\'定义日期输入框变量

Ed1 = e.Form.Controls("DateTimePicker2")\'日期输入框

Dim f As New Filler

f.SourceTable = DataTables("订单") \'指定数据来源

f.SourceCols = "日期,产品,数量,金额" \'指定数据来源列

f.DataTable = DataTables("订单2") \'指定数据接收表

f.DataCols = "日期,产品,数量,金额" \'指定数据接收列

f.Filter = "日期 >= #ed.Value# And [日期] <= #ed1.Value# and 客户 = \'CS03\'"

f.Fill() \'填充数据

 

提示如下错误

.NET Framework 版本:4.0.30319.36543

Foxtable 版本:2022.8.18.1

错误所在事件:窗口,数据填充试验,Button1,Click

详细错误信息:

The string was not recognized as a valid DateTime. There is an unknown word starting at index 0.

 


--  作者:有点蓝
--  发布时间:2022/11/28 11:36:00
--  
先看2遍:http://www.foxtable.com/webhelp/topics/1284.htm

f.Filter = "日期 >= #" & ed.Value & "# And [日期] <= #" & ed1.Value & "# and 客户 = \'CS03\'"