我按帮助的设置了。自定义用户与权限管理
但我现在想用目录树把。自定义的用户读取出来。
要怎么实现呢。
除了把 User.Name User.Group
换成_UserName _UserGroup
------
帮助里的:目录树形式的授权
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()
----------------------
这个遍历要如何改才能指向外部数据源
[此贴子已经被作者于2012-2-25 14:53:33编辑过]