- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 如何跨表统计并自动汇总指定时间段的数据 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=93850)
-- 发布时间：2016/12/8 16:10:00
-- 如何跨表统计并自动汇总指定时间段的数据
如题
此主题相关图片如下：1h0kozlrqp0edtk4326z5s.png
-- 发布时间：2016/12/8 16:27:00
--
参考：http://www.foxtable.com/webhelp/scr/1472.htm
-- 发布时间：2016/12/8 18:38:00
--
蓝神，我是参考这个把没有时间限制的做出来了，但是自动生成某一个时间段的值应该怎么做呢
-- 发布时间：2016/12/8 20:42:00
--
计算条件加上时间段咯
Tables("订单").Compute("Sum(数量)", "日期 >= \'1/1/2016\' and 日期 <= \'2/1/2016\' ")
-- 发布时间：2016/12/13 8:58:00
--
If e.DataCol.Name = "客户_客户编码"
Then
Dim Filter1 As String = "[客户_客户编码] = \'" &
e.NewValue & "\'"
Dim d1 As Date = Date.Today
Dim month As Integer = d1.Month
Dim year As Integer = d1.Year
Dim day As Integer = d1.Day
Dim d2 As Date = New Date(Year, Month, 1)
e.DataRow("本月发货额") = DataTables("发货明细表").Compute("Sum("发货金额")", "发货时间 >= d2 and 发货时间 <= d1",
Filter1)
End If
想从发货明细表中自动计算并带入指定时间段的发货金额，到销售报表中，没学过编程，怎么编也编不对，还得麻烦您，帮我改一改，顺便把季度、半年、整年、上年的也告诉我吧，谢谢啦亲此主题相关图片如下：fl{x7ayqd$1xe%yhjtuy3k.png
-- 发布时间：2016/12/13 9:06:00
--
参考代码
If e.DataCol.Name = "客户_客户编码" Then
Dim d1 As Date = new Date(Date.today.Year, 1, 1)
Dim d2 As Date = d1.AddYears(1)
e.DataRow("本年发货额") = DataTables("发货明细表").Compute("Sum("发货金额")", "发货时间 >= #" & d1 & "# and 发货时间 < #" & d2 & "# and [客户_客户编码] = \'" & e.NewValue & "\'"
")
End If
http://www.foxtable.com/webhelp/scr/2720.htm
-- 发布时间：2016/12/13 9:56:00
--
还是不行
此主题相关图片如下：ndz}mqls%2~$)quv6%x%e0.png
-- 发布时间：2016/12/13 10:13:00
--
-- 发布时间：2016/12/13 14:01:00
--
真心不懂，还得你指导啊，没学过编程的菜鸟一枚。
-- 发布时间：2016/12/14 16:06:00
--