Foxtable(狐表)用户栏目专家坐堂 → [求助][原创]目录树排序不能正常显示


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

主题:[求助][原创]目录树排序不能正常显示

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


加好友 发短信
等级:婴狐 帖子:29 积分:371 威望:0 精华:0 注册:2023/3/20 13:01:00
[求助][原创]目录树排序不能正常显示  发帖心情 Post By:2025/4/23 22:21:00 [只看该作者]

左边目录树没有按年降序则能正常显示目录树,右边则只有第一个能正常显示目录树,其余的项则不能正常显示。

如果把第二个目录树代码,将公司名称与文档类型对调,按年降序则张三个目录树又可以正常显示。并且数据量大了还会报错。



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


加好友 发短信
等级:婴狐 帖子:29 积分:371 威望:0 精华:0 注册:2023/3/20 13:01:00
  发帖心情 Post By:2025/4/23 22:27:00 [只看该作者]

这个附件是报错说明

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


加好友 发短信
等级:婴狐 帖子:29 积分:371 威望:0 精华:0 注册:2023/3/20 13:01:00
  发帖心情 Post By:2025/4/23 22:28:00 [只看该作者]

报错说明

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


加好友 发短信
等级:婴狐 帖子:29 积分:371 威望:0 精华:0 注册:2023/3/20 13:01:00
  发帖心情 Post By:2025/4/23 22:29:00 [只看该作者]

第一个目录树没有按年降序则能正常显示目录树,第二个目录树则只有第一个能正常显示目录树,其余的项则不能正常显示。第三个目录树是将公司名称和文档类型对调,按年降序则张三个目录树又可以正常显示。如果数据量些,第二个目录树还会报错。


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


加好友 发短信
等级:婴狐 帖子:29 积分:371 威望:0 精华:0 注册:2023/3/20 13:01:00
  发帖心情 Post By:2025/4/23 22:29:00 [只看该作者]

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


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


加好友 发短信
等级:婴狐 帖子:29 积分:371 威望:0 精华:0 注册:2023/3/20 13:01:00
  发帖心情 Post By:2025/4/23 22:38:00 [只看该作者]

刚上传文件如果用文档管理表的数据,则只会出现第二个目录树显示不正常。如果把文档管理表换成表B的数据则会报错。如果将第二个目录树的,这段代码trv.BuildTree(dt, "公司名称|年|月|文档类型","","年 desc") 改成trv.BuildTree(dt, "公司名称|年|月|文档类型"),则第二个目录树不会报错。只是不会按日期降序显示目录树。注:数据表还是用表B

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


加好友 发短信
等级:超级版主 帖子:113574 积分:578377 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2025/4/24 9:11:00 [只看该作者]

改为:trv.BuildTree(dt, "公司名称|年|月|文档类型", "", "公司名称,年 desc,月,文档类型")


示例二

生成目录树的时候,不仅可以指定生成条件,还可以根据需要指定排序列,需要注意的时,你根据多少列生成目录树,就得指定多少个排序列,例如:

Dim tv As WinForm.TreeView
tv
 =e.Form.Controls("TreeView1")
tv
.BuildTree("产品""类别|品名", "", "类别,价格 DESC")

表示根据产品表的类别和品名生成目录树,相同类别的产品,按价格由高到低的顺序排列。


如果你单单指定根据价格排序:

Dim tv As WinForm.TreeView
tv
 =e.Form.Controls("TreeView1")
tv
.BuildTree("产品""类别|品名", "", "价格 DESC")

生成的目录树有可能会出现错乱。


[此贴子已经被作者于2025/4/24 9:10:53编辑过]

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


加好友 发短信
等级:婴狐 帖子:29 积分:371 威望:0 精华:0 注册:2023/3/20 13:01:00
  发帖心情 Post By:2025/4/24 10:33:00 [只看该作者]

多谢!怪自己

 回到顶部