Foxtable(狐表)用户栏目专家坐堂 → [求助]如何调用外部数据源里的用户


  共有3321人关注过本帖树形打印复制链接

主题:[求助]如何调用外部数据源里的用户

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/8/15 17:48:00 [显示全部帖子]

 取决于你的外部数据源的表结构是怎样的,不同的表结构,代码也不同,你做个例子发上来吧。


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/8/15 17:51: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()

 

改成下面这段

 

Dim trv1 As WinForm.TreeView = e.Form.Controls("TreeView1")
Dim
trv2 As WinForm.TreeView = e.Form.Controls("TreeView2")
trv1.BuildTree(
"授权","分组|权限")
trv1.BuildTree("外部用户表","组别|用户名")
Trv1.Nodes(
0
).Expand()
trv2.ExpandAll()


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/8/18 11:04:00 [显示全部帖子]

 这句去掉

 

If User.Type <> UserTypeEnum.User Then ' 如果是开发者或者管理员
    Return True '则具备所有权限
End If

 

--------------

 

下面的 User.Name User.Group 改成对应的 _UserName _UserGroup

 


 回到顶部