Foxtable(狐表)用户栏目专家坐堂 → 统计不了图片!或者说,有内容与无内容,统计不出来。


  共有2956人关注过本帖平板打印复制链接

主题:统计不了图片!或者说,有内容与无内容,统计不出来。

帅哥哟,离线,有人找我吗?
sbfqpidt
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:128 积分:1568 威望:0 精华:0 注册:2013/7/8 11:51:00
统计不了图片!或者说,有内容与无内容,统计不出来。  发帖心情 Post By:2015/7/6 17:36:00 [只看该作者]

老师好!统计不了图片!(一样的代码,一个能统计,一个不能统计!)

一、不能统计出结果的代码

'业务经理分日统计
Dim g2 As New CrossTableBuilder("业务经理报表", DataTables("业务经理跟踪表"))
g2.HGroups.AddDef("分管业务经理")
g2.VGroups.AddDef("拜访时间", "{0}月")
g2.VGroups.AddDef("拜访时间", DateGroupEnum.Day, "{0}")
g2.Totals.AddDef("拜访内容", AggregateEnum.Count, "报表")‘’‘’‘’‘’‘’‘’‘问题出在这儿!
g2.Totals.AddDef("现场图片", AggregateEnum.Count, "拍照")‘’‘’‘’‘’‘’‘’‘问题出在这儿!
g2.HorizontalTotal = True
g2.VerticalTotal = True
g2.Decimals = 0
g2.FromServer = True
g2.Build()

Tables("业务经理报表").AutoSizeCols() '设置自动列宽
'Tables("业务经理报表").OpenFilterTree("分管业务经理")'目录树
If User.Group <> "管理组"   '管理组之外的人,看不到"销售代表分客户电话次数统计"
    Tables("业务经理报表").Visible = False
End If
MainTable = Tables("业务经理报表")


二、能统计出结果的代码

'三个代表电话分日统计
Dim g As New CrossTableBuilder("销售代表分客户电话次数统计", DataTables("销售代表电话记录"))
g.HGroups.AddDef("录入人")
g.HGroups.AddDef("客户名称")
g.HGroups.AddDef("电话类型")
g.VGroups.AddDef("本次电话时间", "{0}月")
g.VGroups.AddDef("本次电话时间", DateGroupEnum.Day, "{0}")
g.Totals.AddDef("客户编号", AggregateEnum.Count, "电话次数")’‘。。。。。。。。。。。。。。能统计出结果的地方!
g.HorizontalTotal = True
g.VerticalTotal = True
g.Decimals = 0
g.FromServer = True
g.Build()

Tables("销售代表分客户电话次数统计").AutoSizeCols() '设置自动列宽
Tables("销售代表分客户电话次数统计").OpenFilterTree("录入人|客户名称")
If User.Group <> "管理组"   '管理组之外的人,看不到"销售代表分客户电话次数统计"
    Tables("销售代表分客户电话次数统计").Visible = False
End If
MainTable = Tables("销售代表分客户电话次数统计")

 回到顶部