Foxtable(狐表)用户栏目专家坐堂 → [求助]导航下的表


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

主题:[求助]导航下的表

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


加好友 发短信
等级:一尾狐 帖子:486 积分:3668 威望:0 精华:0 注册:2013/3/13 8:49:00
[求助]导航下的表  发帖心情 Post By:2013/5/28 12:01:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:目录树授权57.table

导航下面的表 “学员管理”  想加个权限 让登录者打不开,一直没弄明白,求帮助


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


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2013/5/28 14:11:00 [只看该作者]

是想让普通登录者打不开吧?

Case "学员管理"
        If User.Type = UserTypeEnum.Administrator OrElse User.Type = UserTypeEnum.Developer Then
            Forms("学员管理").Show()
            MainTable  = Tables("学员管理")
        End If


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


加好友 发短信
等级:一尾狐 帖子:486 积分:3668 威望:0 精华:0 注册:2013/3/13 8:49:00
  发帖心情 Post By:2013/5/28 14:20:00 [只看该作者]

是呀  窗口已经加了权限   这个学员管理 表 如何加权限?


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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/5/28 14:50:00 [只看该作者]

你代码根本就是直接打开的,都没加权限控制肯定不可以啊,让你参考一下我发给你的那个例子,为什么就是不愿意呢?

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


加好友 发短信
等级:一尾狐 帖子:486 积分:3668 威望:0 精华:0 注册:2013/3/13 8:49:00
  发帖心情 Post By:2013/5/28 15:11:00 [只看该作者]

例子看好几遍了,就是打开表的地方 没看明白

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/5/28 15:16:00 [只看该作者]

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


Dim dr As DataRow
dr = DataTables("权限表").Find("用户ID='" & User.Name & "'And 模块名称 ='" & Args(0) & "' And 是否授权=True")
If dr IsNot Nothing Then
    Return True
End If
MessageBox.Show("此模块你不存在操作权限!", "警告!", MessageBoxButtons.Ok, MessageBoxIcon.Warning)
Return False

权限控制代码在内部函数里.

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


加好友 发短信
等级:一尾狐 帖子:486 积分:3668 威望:0 精华:0 注册:2013/3/13 8:49:00
  发帖心情 Post By:2013/5/28 15:36:00 [只看该作者]

表如何调用这个函数?  在那个事件里调用?

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/5/28 15:40:00 [只看该作者]

以下是引用anxue在2013-5-28 15:36:00的发言:
表如何调用这个函数?  在那个事件里调用?



例子中都有,你想放到点击按钮事件也可以.放到窗口加载事件也可以 http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=32903&skin=0

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


加好友 发短信
等级:一尾狐 帖子:486 积分:3668 威望:0 精华:0 注册:2013/3/13 8:49:00
  发帖心情 Post By:2013/5/28 16:40:00 [只看该作者]

窗口权限都明白了,就是在导航上直接打开表的权限没弄明白,表的函数不会调用。


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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/5/28 16:46:00 [只看该作者]

一样的 代码放在点击导航链接事件中即可.

 回到顶部