Foxtable(狐表)用户栏目专家坐堂 → [求助]目录树授权问题


  共有2404人关注过本帖平板打印复制链接

主题:[求助]目录树授权问题

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


加好友 发短信
等级:幼狐 帖子:172 积分:1188 威望:0 精华:0 注册:2015/8/5 16:45:00
[求助]目录树授权问题  发帖心情 Post By:2015/9/10 11:32:00 [只看该作者]

老师

我用例子里的目录树授权代码 用户数据表来自外部数据源

之前一直好好的 但是怎么会突然出现

未将对象引用设置到对象的实例。”的错误呢

 

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()


 回到顶部