Foxtable(狐表)用户栏目专家坐堂 → 分级加载树想按二列进行加载


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

主题:分级加载树想按二列进行加载

帅哥,在线噢!
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110743 积分:563641 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/9/19 16:55:00 [显示全部帖子]

只能手工递归处理,类似:http://www.foxtable.com/webhelp/topics/2502.htm

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110743 积分:563641 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/9/20 13:34:00 [显示全部帖子]

就看到抄了帮助的代码,连表名列名都还不知道改,没看到有想了什么?

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目121.zip



 回到顶部
帅哥,在线噢!
有点蓝
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110743 积分:563641 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/9/20 14:32:00 [显示全部帖子]

我这边有

Dim nd As WinForm.TreeNode = args(0)
Dim dt As DataTable = args(1)
Dim rt As String = args(2)
For Each dr As DataRow In dt.Select("第一列='" & rt & "' and 第二列 like '" & nd.Name & ".%' and len(第二列)=" & nd.Name.Length + 3, "第二列")
    Dim km As String = dr("第二列")
    
         Dim cd As Winform.TreeNode = nd.Nodes.Add(km, km & " " & dr("第三列"))
        Functions.Execute("AddChildren", cd, dt, rt)

Next

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110743 积分:563641 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/9/20 14:51:00 [显示全部帖子]

内部函数不可能会自动删除。联系客服核对一下激活码

 回到顶部
帅哥,在线噢!
有点蓝
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110743 积分:563641 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/9/20 15:31:00 [显示全部帖子]

那就先添加一个全部,然后把后面的节点都添加到全部里就行了。

 回到顶部
帅哥,在线噢!
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110743 积分:563641 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/9/20 15:56:00 [显示全部帖子]

例子里就有怎么添加节点的用法。如果连怎么添加节点都看不懂,建议重头学一下开发指南

 回到顶部