以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  ylm老师,请教您一下....  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=1512)

--  作者:菜鸟foxtable
--  发布时间:2008/12/29 18:11:00
--  ylm老师,请教您一下....
你在项目发布栏发的自定义登陆实例..我研究了半天,搞不明白到底如何设置代码使权限内打勾的项目生效....
能否指点一二?

帮助文档里都是诸如:If User.Name <> "张经理"或者If User.Group <> "经理"又或者If User.Type = UserTypeEnum.Administrator的例子....

如果设置了
If tables("用户权限").Cols("开通") = True Then
之类的语句,又如何与登陆用户关联?真的头大....

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

--  作者:ylm
--  发布时间:2008/12/31 12:01:00
--  
大至思路是这样的:

你在登陆后将用户名写入一个全局变量,不就等于有了 User.Name 差不多了。
诸如:If User.Name <> "张经理"改成If Vars( 全局变量名 ) <> "张经理"

同时,用Find查找该用户对应的用户组,也写入用户组全局变量。

做好上述工作后,以后每一要控制权限的操作,在执行前先用Find查找用户权限表中对应用户组全局变量是否有开通该权限,if分别处理....

 

我也没仔细考虑过,你试试看看吧