Foxtable(狐表)用户栏目专家坐堂 → 如何将统计表1的数据利用filler 填充到主表


  共有4383人关注过本帖树形打印复制链接

主题:如何将统计表1的数据利用filler 填充到主表

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


加好友 发短信
等级:三尾狐 帖子:760 积分:4714 威望:0 精华:0 注册:2011/12/17 18:37:00
如何将统计表1的数据利用filler 填充到主表  发帖心情 Post By:2013/10/27 20:42:00 [只看该作者]

例子如下:  统计表是交叉统计生成的

 

 

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:月份统计 - 副本.foxdb


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2013/10/27 20:59:00 [只看该作者]

 例子没有统计表4,运行的时候出错。

 什么问题?不能直接用filler?

 回到顶部
帅哥哟,离线,有人找我吗?
jianjingmaoyi
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:760 积分:4714 威望:0 精华:0 注册:2011/12/17 18:37:00
  发帖心情 Post By:2013/10/27 21:04:00 [只看该作者]

不好意思 误删了

 

  我的意思是利用统计表4的表数据用交叉统计的方法生成统计表  并   filler 到 主表中

 

 

 下载信息  [文件大小:   下载次数: ]
点击浏览该文件:月份统计 - 副本.foxdb


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2013/10/27 21:33:00 [只看该作者]

 在最后加一段代码。

''''''''''''''''''''''''''''''''''''''''
Dim scols As String = ""
For Each c As Col In Tables("统计表1").cols
    If c.Caption.EndsWith("月") Then
        scols += c.Name & ","
    End If
Next

Dim f As new Filler
f.SourceTable = DataTables("统计表1")
f.SourceCols = "统计部门,项目,报表名称,统计类型,数据统计项目," & scols & "合计"
f.DataTable = DataTables("主表")
f.DataCols = "统计部门,项目,报表名称,统计类型,数据统计项目,一月,二月,三月,四月,五月,六月,七月,八月,九月,十月,十一月,十二月,累计"
f.Fill()

 回到顶部
帅哥哟,离线,有人找我吗?
jianjingmaoyi
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:760 积分:4714 威望:0 精华:0 注册:2011/12/17 18:37:00
  发帖心情 Post By:2013/10/27 21:40:00 [只看该作者]

可以了. 我同时也写出来了.不过还是要谢谢


 回到顶部