Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共15 条记录, 每页显示 10 条, 页签: [1] [2]
[浏览完整版]

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

1楼
zhuxinhui 发表于:2024/9/19 16:26:00
分级加载树想按二列进行加载
图片点击可在新窗口打开查看此主题相关图片如下:微信截图_20240919162337.png
图片点击可在新窗口打开查看

2楼
有点蓝 发表于:2024/9/19 16:55:00
只能手工递归处理,类似:http://www.foxtable.com/webhelp/topics/2502.htm
3楼
zhuxinhui 发表于:2024/9/20 11:39:00

图片点击可在新窗口打开查看此主题相关图片如下:微信截图_20240920113443.png
图片点击可在新窗口打开查看
想得头痛
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.foxdb


4楼
有点蓝 发表于:2024/9/20 13:34:00
就看到抄了帮助的代码,连表名列名都还不知道改,没看到有想了什么?

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


5楼
zhuxinhui 发表于:2024/9/20 13:44:00
首先多谢先
发到论坛都是个例子
6楼
zhuxinhui 发表于:2024/9/20 14:21:00
内部函数都是没有的
图片点击可在新窗口打开查看此主题相关图片如下:微信截图_20240920141828.png
图片点击可在新窗口打开查看
一直出错

7楼
有点蓝 发表于: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
8楼
zhuxinhui 发表于:2024/9/20 14:48:00
还是不行,内部函数会自动删除的
9楼
zhuxinhui 发表于:2024/9/20 14:48:00
我是想根据第一列和第二列生成目录树
10楼
有点蓝 发表于:2024/9/20 14:51:00
内部函数不可能会自动删除。联系客服核对一下激活码
共15 条记录, 每页显示 10 条, 页签: [1] [2]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .04297 s, 4 queries.