Foxtable(狐表)用户栏目专家坐堂 → 递归函数之后的统计问题


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

主题:递归函数之后的统计问题

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


加好友 发短信
等级:九尾狐 帖子:2355 积分:16187 威望:0 精华:0 注册:2013/9/1 8:09:00
递归函数之后的统计问题  发帖心情 Post By:2016/1/19 8:41:00 [显示全部帖子]

各位老师好,一个问题研究许久没弄出来,贴出来向大家请教:
我用递归函数做了一个三级推荐奖励的表:

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

现在想按年月统计各个推荐人的各个级别推荐奖金,不知道怎么做,我把思路过程贴出来:
比如一级推荐奖金:

图片点击可在新窗口打开查看此主题相关图片如下:02.png
图片点击可在新窗口打开查看
二级推荐奖金:

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



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


加好友 发短信
等级:九尾狐 帖子:2355 积分:16187 威望:0 精华:0 注册:2013/9/1 8:09:00
  发帖心情 Post By:2016/1/19 8:43:00 [显示全部帖子]

三级推荐奖金:

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


最后想要类似这样的结果:

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


不知道要如何做呢。。。。原始数据是远程数据库的表


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


加好友 发短信
等级:九尾狐 帖子:2355 积分:16187 威望:0 精华:0 注册:2013/9/1 8:09:00
  发帖心情 Post By:2016/1/19 11:24:00 [显示全部帖子]

感恩Hyphen 老师,已经可以组合了!!

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


加好友 发短信
等级:九尾狐 帖子:2355 积分:16187 威望:0 精华:0 注册:2013/9/1 8:09:00
  发帖心情 Post By:2016/1/22 10:01:00 [显示全部帖子]

各位老师好,不知道这段代码是否有误,出现了 未找到 推荐人卡号  的列   的错误,搞半天没弄出来。。。。:



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


加好友 发短信
等级:九尾狐 帖子:2355 积分:16187 威望:0 精华:0 注册:2013/9/1 8:09:00
  发帖心情 Post By:2016/1/22 10:02:00 [显示全部帖子]

直接发代码发不上去,先截图。。。
图片点击可在新窗口打开查看此主题相关图片如下:qq截图20160122100122.png
图片点击可在新窗口打开查看

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


加好友 发短信
等级:九尾狐 帖子:2355 积分:16187 威望:0 精华:0 注册:2013/9/1 8:09:00
  发帖心情 Post By:2016/1/22 10:03:00 [显示全部帖子]

代码文本
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:新建文本文档 (2).txt


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


加好友 发短信
等级:九尾狐 帖子:2355 积分:16187 威望:0 精华:0 注册:2013/9/1 8:09:00
  发帖心情 Post By:2016/1/22 10:04:00 [显示全部帖子]

错误提示:

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


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


加好友 发短信
等级:九尾狐 帖子:2355 积分:16187 威望:0 精华:0 注册:2013/9/1 8:09:00
  发帖心情 Post By:2016/1/22 10:33:00 [显示全部帖子]

大红袍老师,你看:
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.foxdb
讲下面的代码在命令窗口中运行:
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:新建文本文档 (3).txt

出现这样的错误:

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


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


加好友 发短信
等级:九尾狐 帖子:2355 积分:16187 威望:0 精华:0 注册:2013/9/1 8:09:00
  发帖心情 Post By:2016/1/22 10:55:00 [显示全部帖子]

大红袍老师,我输入数据之后还是出现同样的问题,您可以试一下,数据是在远程数据库里,你那里也会有。。。

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

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


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


加好友 发短信
等级:九尾狐 帖子:2355 积分:16187 威望:0 精华:0 注册:2013/9/1 8:09:00
  发帖心情 Post By:2016/1/22 11:00:00 [显示全部帖子]

这句代码貌似没问题啊:
Dim dt1 As fxDataSource
bd1.FromServer = True
bd1.Groups.AddDef("一级推荐人卡号","推荐人卡号") '根据型号分组
bd1.Totals.AddDef("一级推荐人奖金","一级推荐奖金") '对数量进行统计
dt1 = bd1.BuildDataSource() 

 回到顶部
总数 12 1 2 下一页