以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  重定向后统计代码出错  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=61977)

--  作者:utcxray
--  发布时间:2014/12/23 13:59:00
--  重定向后统计代码出错
Dim b As New SQLCrossTableBuilder("统计表3","采购明细")
b.C
\'Dim y As Integer = Date.Today.Year
\'Dim dt1 As New Date(y, 1, 1)
\'Dim dt2 As New Date(y, 12, 31) 
\'Dim Filter As String
b.HGroups.AddDef("供应商") \'添加客户列用于水平分组
b.HGroups.AddDef("型号") \'添加客户列用于水平分组
\'b.HGroups.AddDef("数量") \'添加客户列用于水平分组
b.VGroups.AddDef("账期",DateGroupEnum.Year,"{0}年") \'添加日期列用于垂直分组,按年分组
b.VGroups.AddDef("账期","{0}月") \'添加日期列用于垂直分组
b.Totals.AddDef("数量")
b.Totals.AddExp("应付","数量 * 单价")
b.Totals.AddExp("已付","付款")
b.Totals.AddExp("未付","数量 * 单价 - iif(付款 is null, 0, 付款)")
b.Subtotal = True \'生成汇总模式
b.VerticalTotal= True
b.HorizontalTotal = True
b.Filter = "供应商 is not null and 账期 is not null"
\'b.Filter = "日期 >= #" & dt1 & "# And 日期 <= #" & dt2 & "#"
Tables("采购管理_Table6").DataSource = b.BuildDataSource()

图片点击可在新窗口打开查看此主题相关图片如下:无标题.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:无标题1.png
图片点击可在新窗口打开查看

过程:
以前是内部表,此语句执行正确,数据做了重定向“阳光MIS",代码中就加了b.C,现在执行结果为上图的出错信息。请解释下出错信息的原因。


--  作者:utcxray
--  发布时间:2014/12/23 14:00:00
--  
以前是内部表,此语句执行正确,数据做了重定向“阳光MIS",代码中就加了b.C,现在执行结果为上图的出错信息。请解释下出错信息的原因。
--  作者:utcxray
--  发布时间:2014/12/23 14:00:00
--  
b.C
--  作者:utcxray
--  发布时间:2014/12/23 14:01:00
--  
怎么回事啊,是 b.C
--  作者:utcxray
--  发布时间:2014/12/23 14:02:00
--  
b.c
--  作者:utcxray
--  发布时间:2014/12/23 14:03:00
--  
怎么回事啊,是这个语句
图片点击可在新窗口打开查看此主题相关图片如下:无标题.png
图片点击可在新窗口打开查看

--  作者:utcxray
--  发布时间:2014/12/23 14:10:00
--  
在线等,急
--  作者:有点甜
--  发布时间:2014/12/23 14:18:00
--  

sqlserver的话,这句

 

b.Totals.AddExp("未付","数量 * 单价 - iif(付款 is null, 0, 付款)")

 

改成

 

b.Totals.AddExp("未付","数量 * 单价 - IsNull(付款, 0)")


--  作者:utcxray
--  发布时间:2014/12/23 14:21:00
--  
有点甜,你开挂了吧图片点击可在新窗口打开查看。改完后正常图片点击可在新窗口打开查看
--  作者:utcxray
--  发布时间:2014/12/23 14:36:00
--  
还有个问题
图片点击可在新窗口打开查看此主题相关图片如下:无标题.png
图片点击可在新窗口打开查看