以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  帮忙看下代码哪写错啦  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=43334)
--  作者：myzzip
--  发布时间：2013/12/4 17:20:00
--  帮忙看下代码哪写错啦
Dim t1 As Date = e.Form.Controls("DateTimePicker1").value
Dim t2 As Date = e.Form.Controls("DateTimePicker2").value
Dim s1 As Double =DataTables("销售明细").Compute("Sum(数量)", "产品名称 =\'A气\'And 会员卡 <> 0 And #" & t2 & "# <= 销售日期 >= #" & t1 & "#")
MessageBox.Show(s1)
--  作者：逛逛
--  发布时间：2013/12/4 17:26:00
--  

目测

第一个AND 前少一个空格

 

第二个 销售日期的条件的写法
--  作者：myzzip
--  发布时间：2013/12/4 17:26:00
--  
销售日期的条件怎么写？这样写不对吗？
--  作者：狐狸爸爸
--  发布时间：2013/12/4 17:27:00
--  
Dim t1 As Date = e.Form.Controls("DateTimePicker1").value
Dim t2 As Date = e.Form.Controls("DateTimePicker2").value
Dim s1 As Double =DataTables("销售明细").Compute("Sum(数量)", "产品名称 =\'A气\'And 会员卡 <> 0 And 销售日期 <= #" & t2 & "# And  销售日期 >= #" & t1 & "#")
MessageBox.Show(s1)