生成目录树选择sort参数结果重复？（上传了例子） - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 生成目录树选择sort参数结果重复？（上传了例子）

共有7103人关注过本帖树形打印复制链接主题：生成目录树选择sort参数结果重复？（上传了例子）

zpx_2012

小大 11楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：四尾狐帖子：976 积分：8521 威望：0 精华：0 注册：2012/2/9 16:35:00

Post By：2013/3/14 12:02:00 [只看该作者]

我说的就是这个问题，因为用户在使用时是看不到后面的数据表的，节点有时会上下移动调整位置，上下移动时我用了代码将移动后的相关节点顺序位置重新更新到后台表的“序号”列中，就想下次显示目录树时能按照“序号”列的顺序显示就好了，是不是真的有bug，还是我哪里弄错了。

don

小大 12楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：八尾狐帖子：1812 积分：12993 威望：0 精华：14 注册：2008/10/11 18:07:00

Post By：2013/3/14 12:11:00 [只看该作者]

Dim tr As WinForm.TreeView = Forms("窗口1").Controls("TreeView1")

'从"数据字典"表取数生成目录树

Dim dt As DataTable

Dim cmd As New SQLCommand

cmd.CommandText = "SELECT * From {表A} ORDER BY 序号"

dt = cmd.ExecuteReader()

Dim drs1 As New List(of DataRow)

Dim Ls1 As New List(of String)

Dim s1,s2 As String

Dim nd As WinForm.TreeNode

Ls1 = dt.GetUniqueValues("","数据名称")

For Each s1 In Ls1

nd = Tr.Nodes.Add(s1,s1)

drs1 = dt.Select("数据名称 = '" & s1 & "'","序号")

For Each dr As DataRow In drs1

nd.Nodes.Add(dr("值"),dr("值"))

hanxuntx

小大 13楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：九尾狐帖子：2609 积分：16926 威望：0 精华：11 注册：2011/9/20 16:13:00

Post By：2013/3/14 12:26:00 [只看该作者]

只能像don的方法处理了

用系统的处理就会有这种情况，有时候用“_Identify”也会这样

don

小大 14楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：八尾狐帖子：1812 积分：12993 威望：0 精华：14 注册：2008/10/11 18:07:00

Post By：2013/3/14 12:28:00 [只看该作者]

还可以:

Dim tr As WinForm.TreeView = Forms("窗口1").Controls("TreeView1")

Dim dt As DataTable

Dim cmd As New SQLCommand

cmd.CommandText = "SELECT 数据名称,Format(序号,'000') & 值 As 值 From {表A} ORDER BY 序号 "

dt = cmd.ExecuteReader()

tr.BuildTree(dt,"数据名称|值")

For Each nd As WinForm.TreeNode In tr.AllNodes

If nd.Level >0 Then

nd.Text = nd.Text.Substring(3)

End If

zpx_2012

小大 15楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：四尾狐帖子：976 积分：8521 威望：0 精华：0 注册：2012/2/9 16:35:00

Post By：2013/3/14 12:49:00 [只看该作者]

能这样实现也可以了，谢谢两位老师了！

下一主题 >> << 上一主题

总数 15 上一页 1 2

主题：生成目录树选择sort参数结果重复？（上传了例子）