以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  求助:关于权限分配的实例求助?(已解决)  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=39464)

--  作者:jiterp
--  发布时间:2013/8/24 21:51:00
--  求助:关于权限分配的实例求助?(已解决)

找了论坛很久,没发现一个很快上手的权限实例,我理了一下思路,根据帮助里的树型权限分配实例进行梳理。

1、菜单导航做一个表,按登录用户和分组来过滤,并形成树型菜单。这一点感谢 有点甜 老师帮忙指正,已达效果:

 

以下是菜单过滤代码:
Dim dj As WinForm.TreeView = e.Form.Controls("单据查询菜单")
dj.BuildTree("菜单","子模块|菜单","[用户] Like \'*" & User.group & "*\' or [用户] Like \'*" & User.name & "*\'")


2、然后做一个按用户分配菜单权限,如下图所示:

图片点击可在新窗口打开查看此主题相关图片如下:未命名4.jpg
图片点击可在新窗口打开查看

我看了帮助上的树形分配权限这个例子,实际就是这个功能,但是我想完全对调一下,按用户来进行分配菜单权限会更适应刚入门的用户。做到以下几个功能会更直观:
1)点用户(这里也可以延伸设分组),直接查看该用户所有的菜单权限,相当于做个选择节点查询。
2)在分配权限时,直观,勾选即把该用户添加到菜单对应用的用户栏里,去掉勾选就从用户栏里清除,一切都以保存按钮做结束。

只可惜我是新手,还没弄明白怎么弄,希望老师帮个忙,因为这个权限实例搞定了,会给入门的一个很直观的学习成就感。以下上传实例。 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:权限分配实例.foxdb

[此贴子已经被作者于2013-8-26 9:26:40编辑过]

--  作者:jiterp
--  发布时间:2013/8/25 14:23:00
--  

在线等,因为我的作品就差这一步了!


图片点击可在新窗口打开查看此主题相关图片如下:未命名2.jpg
图片点击可在新窗口打开查看


--  作者:有点甜
--  发布时间:2013/8/25 21:36:00
--  
 添加的例子,至于删除的例子,不适合你这个例子。

 
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:xxx2013年8月25日.foxdb


 参考目录树授权。


--  作者:jiterp
--  发布时间:2013/8/26 1:12:00
--  
以下是引用有点甜在2013-8-25 21:36:00的发言:
 添加的例子,至于删除的例子,不适合你这个例子。

 
 下载信息  [文件大小:448.0 KB  下载次数:3]
图片点击可在新窗口打开查看点击浏览该文件:xxx2013年8月25日.foxdb


 参考目录树授权。

我已经自己搞定了,全部用的是SQL语句来执行的,效果图如下:


图片点击可在新窗口打开查看此主题相关图片如下:未命名1.jpg
图片点击可在新窗口打开查看

 

[此贴子已经被作者于2013-8-26 9:25:57编辑过]

--  作者:zerov
--  发布时间:2014/4/21 23:40:00
--  
能上传例子给大家分享吗?