主题：自定义用户和授权

教材P1688上有一个自定义用户登陆与权限的案例，P1677还有一个目录树授权案例。请问如果采用自定用户登录设置的话，目录树授权案例中的代码需要做哪些修改？

 

 

只需要把原本使用内部用户的变量User.NAME  换成自定义登录设定的变量 _Username 即可  _password同理.

 

 

 

窗口的AfterLoad事件代码为:

每次打开授权窗口后报错，我还以为是下面这个窗口afterload代码中的user信息需要修改？

 

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

别用自定义了，现在内置的用户管理，用户信息也可以存储在外部表中了：

 

http://www.foxtable.com/help/topics/2723.htm

 

一点都不用伤脑细胞。

你没有看到我2楼的回复吗?

bin, 我看到了您2楼的指点，在此之前我也将自定用——户登录窗口中的所有user.name等调整为了_username 等 但对P1678这段代码不知道如何调整。所以贴了出来。

循环所有内部表用户改为循环 外部用户表所有行

狐狸爸爸如果自己新建立的外部表用这个，如果是和别的数据库中的用户表对接不是不能使用这个了，比如和用友的数据库用户是不是就不能用这个，因为表的关键字字段名不一致。

那就只能用查询用户表,然后循环行的方法了.