以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  累计数据  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=75808)

--  作者:woshiabc
--  发布时间:2015/10/15 11:25:00
--  累计数据
用代码累计一个时间段的数据怎么写?比如说想合计表中某列上个星期的数据要怎么编代码?
PS:不想用狐表上面的数据统计功能

--  作者:大红袍
--  发布时间:2015/10/15 11:37:00
--  

参考

 

http://www.foxtable.com/help/topics/0681.htm

 

http://www.foxtable.com/help/topics/2720.htm

 


--  作者:woshiabc
--  发布时间:2015/10/15 13:30:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:jx_rp)lbo9z2n368v3@wjgv.png
图片点击可在新窗口打开查看
就像上面这样,想要点击合计就可以把选择时间段内的这个表的得分栏目累加。代码怎么写?
[此贴子已经被作者于2015/10/15 13:31:39编辑过]

--  作者:大红袍
--  发布时间:2015/10/15 14:31:00
--  
Dim dt1 As Date = e.Form.Controls("DateTimePicker1").Value
Dim dt2 As Date = e.Form.Controls("DateTimePicker2").value
Dim filter As String = "1=1"
If dt1 <> Nothing Then
    filter &= " and 日期 >= #" & dt1 & "#"
End If
If dt2 <> Nothing Then
    filter &= " and 日期 <= #" & dt2 & "#"
End If
e.Form.Controls("TextBox1").Text = DataTables("订单").Compute("sum(数量)", filter)