以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]目录树形式的授权  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=123919)

--  作者:czquickly
--  发布时间:2018/8/27 10:07:00
--  [求助]目录树形式的授权
根据目录树形式的授权章节做的授权表,右侧的名单无法按节点排序,按小组划分的,几十个小组在目录树下随机出现。
是不是在窗口的AfterLoad事件代码为:

Dim trv1 As WinForm.TreeView = e.Form.Controls("TreeView1")
Dim
trv2 As WinForm.TreeView = e.Form.Controls("TreeView2")
trv1.BuildTree(
"授权","分组|权限")
For
Each u As UserInfo In Users
    If
u.Type = UserTypeEnum.User Then
        If
trv2.Nodes.Contains(u.Group) = False Then
            trv2.Nodes.Add(u.Group)

        End
If
        trv2.Nodes(u.Group).Nodes.Add(u.Name)

    End
If
Next

Trv1.Nodes(
0
).Expand()
trv2.ExpandAll()里要先搜索出组,再排序,再添加到目录树中?需要怎么改?找不到相关帮助
图片点击可在新窗口打开查看此主题相关图片如下:qq截图20180827100302.jpg
图片点击可在新窗口打开查看


--  作者:有点甜
--  发布时间:2018/8/27 11:39:00
--  

方法一:自己做一个【用户表】把分组、姓名都输入到里面去,然后用下面的代码生成目录树

 

trv2.BuildTree("用户表","分组|姓名")

 

方法二:你需要根据什么逻辑对用户、分组进行排序?怎样生成的结果才是你满意的?尽量用【方法一】处理吧。


--  作者:czquickly
--  发布时间:2018/8/27 14:18:00
--  
用户表里部门信息包含在config列:Group 制造部-一部 PassWord EmIR4WbjrFGjO6SHZdBWwQ== Type 2,能不能按group排?
--  作者:有点甜
--  发布时间:2018/8/27 14:24:00
--  

1、你直接通过config列排序行不行?

 

2、如果config列排序不行,那就多加一个【排序】列,然后输入1、2、3、4的值进行排序。