Foxtable(狐表)用户栏目专家坐堂 → 不同用户打开不同的导航窗口


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

主题:不同用户打开不同的导航窗口

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


加好友 发短信
等级:四尾狐 帖子:932 积分:6531 威望:0 精华:0 注册:2014/6/25 10:48:00
不同用户打开不同的导航窗口  发帖心情 Post By:2022/7/14 11:05:00 [只看该作者]

老师,我设计了不同权限的导航窗口,当不同权限的用户登录时,打开对应授权的导航窗口,请麻烦老师指点一下,在哪些事件编辑什么样的代码,谢谢老师。

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


加好友 发短信
等级:狐精 帖子:3209 积分:21331 威望:0 精华:0 注册:2016/3/28 16:57:00
  发帖心情 Post By:2022/7/14 11:21:00 [只看该作者]

为什么要设计不同权限的导航窗口,一个导航窗口,不用的用户登录,加载不同的导航就行了啊。

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


加好友 发短信
等级:四尾狐 帖子:932 积分:6531 威望:0 精华:0 注册:2014/6/25 10:48:00
  发帖心情 Post By:2022/7/14 11:27:00 [只看该作者]

这样用户看起美观一些。同一个导航,设计不同用户可以打开不同节点的内容,但不相关的内容仍然会出现在导航窗口里。如果同一个导航窗口,不同权限的人登录,不涉及的权限内容如果能自动隐藏那也是可以的。

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


加好友 发短信
等级:超级版主 帖子:110750 积分:563676 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/7/14 11:55:00 [只看该作者]

查询权限,获取有权限的窗口打开

AfterOpenProject事件

dim dr as datarow = datatabls("权限").find("类型='导航' and 用户=‘" & user.name & "’")
if dr isnot nothing then
forms(dr("窗口名称")).open
end if

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


加好友 发短信
等级:三尾狐 帖子:689 积分:5362 威望:0 精华:0 注册:2012/8/25 20:50:00
  发帖心情 Post By:2022/7/14 15:30:00 [只看该作者]

在登录窗口就可以

Select Case _username 
Case "a" ,"b"
If DataTables.Contains("maintable1") = False Then 
    DataTables.Load("maintable1")
End If

If MainTable.Name = "maintable1" Then
Forms("...").Open()
End If

case "c","d"
...
end if


 回到顶部