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


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

主题：递归函数问题
帅哥哟，离线，有人找我吗？
fubblyc
 小大  11楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

我说的全部生成，是指该行的 二级 三级 全部生成，不是所有行全部生成。因为记录是一条一条进去的。

 回到顶部
帅哥哟，离线，有人找我吗？
fubblyc
 小大  12楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

恩恩。我找到办法了，就是 select 一级卡号不为空且 另一列不为1的所有行就可以。
在递归的时候，把递归之后的行的某一列 的值 更新为 1  就OK。
谢谢大红袍老师，Hyphen老师，jspta老师。
 回到顶部
帅哥哟，离线，有人找我吗？
fubblyc
 小大  13楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

刚才测试了下，只能 select 一级卡号不为空 。

且 另一列不为1的所有行  这段代码不行。先这样，回头再来研究 with ..
 回到顶部
帅哥哟，离线，有人找我吗？
fubblyc
 小大  14楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

谢谢大红袍老师，我没有加载数据到项目，直接用sqlcommand  找到这些行。

    Dim cmd As New SQLCommand
    cm d.C
    
    Dim dt As DataTable
    CM D.CommandText = "Selec t * FROM {vipconsumer} WHERE fchrVIPCusDefine27 is not null "
    dt= cmd.ExecuteReader(True)
For Each dr As DataRow In dt.DataRows
    Functions.Execute("递归函数",dt,dr,dr("fnarconsumercode"),1)
Next
    dt.Save    
 回到顶部
帅哥哟，离线，有人找我吗？
fubblyc
 小大  15楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

大红袍老师，一模一样的代码，在我数据源就能实现三级递归，在客户数据源数据表里没有显示出三级递归。不知道是什么原因。检查过了，客户的数据表也是有主键，能保存。那这大概会是什么原因导致的呢？代码应该是没问题，问题点应该是在客户的数据表。。因为我的数据表是可以实现的。表也是一样的，我从客户那里复制过来的。

 回到顶部
帅哥哟，离线，有人找我吗？
fubblyc
 小大  16楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

感恩！！！

 回到顶部
总数 17 上一页 1 2
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04688 秒, 5 次数据查询