以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  统计不了图片!或者说,有内容与无内容,统计不出来。  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=71178)

--  作者:sbfqpidt
--  发布时间: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("销售代表分客户电话次数统计")

--  作者:大红袍
--  发布时间:2015/7/6 17:49: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.Filter = "拜访内容 is not null and 现场图片 is not null"
g2.Build()

 


--  作者:大红袍
--  发布时间:2015/7/6 17:51:00
--  

 如果要单独和分别统计,就需要生成表以后,循环每一个单元格重新计算。

 

 具体的你做个例子发上来。


--  作者:sbfqpidt
--  发布时间:2015/7/7 9:23:00
--  
大红袍老师好!
    谢谢您的指引!
    按您说的,我上例子,在例子里,能实现统计功能。
    可是,在我的系统里,却统计不出来。
    一、实例能出结果:
         
图片点击可在新窗口打开查看此主题相关图片如下:实例能出结果.png
图片点击可在新窗口打开查看
         
图片点击可在新窗口打开查看此主题相关图片如下:实例代码.png
图片点击可在新窗口打开查看

    二、工作系统不能出结果:
         
图片点击可在新窗口打开查看此主题相关图片如下:仍不出结果.png
图片点击可在新窗口打开查看
         一次只能上传三个图,还有图在后面传。
         

--  作者:sbfqpidt
--  发布时间:2015/7/7 9:25:00
--  
     二、工作系统不能出结果续图
           
图片点击可在新窗口打开查看此主题相关图片如下:系统结构.png
图片点击可在新窗口打开查看
           
图片点击可在新窗口打开查看此主题相关图片如下:系统代码.png
图片点击可在新窗口打开查看

--  作者:sbfqpidt
--  发布时间:2015/7/7 9:28:00
--  
抱歉,我的工作系统,不能整个上传。只能发图了。
老师见多识广,帮忙分析一下原因!谢谢!
--  作者:大红袍
--  发布时间:2015/7/7 9:41:00
--  

 请导出表格,单独做一个例子发上来


--  作者:sbfqpidt
--  发布时间:2015/7/7 16:38:00
--  用另外再建查询表的办法可以统计了。
谢谢老师!
    我用另外的办法解决了:
    将要被统计的数据表,用另外再建查询表的办法引入,可以统计了!不过查询表是重复的,要隐藏起来。
   但根本原因,还是不知道。没事,暂时能用就行!等以后我有点经验了,再慢慢探索、慢慢发现是什么原因造成的。我也会在论坛里毫不保守地发表出来的。就象各位老师一样,给后来者以最大的帮助!
    谢谢!
[此贴子已经被作者于2015/7/7 16:39:52编辑过]