Foxtable(狐表)用户栏目专家坐堂 → 多个功能区不同功能组的权限代码要怎么控制


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

主题:多个功能区不同功能组的权限代码要怎么控制

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


加好友 发短信
等级:幼狐 帖子:170 积分:1372 威望:0 精华:0 注册:2016/12/28 19:32:00
多个功能区不同功能组的权限代码要怎么控制  发帖心情 Post By:2016/12/29 9:47:00 [显示全部帖子]


图片点击可在新窗口打开查看此主题相关图片如下:目录授权.jpg
图片点击可在新窗口打开查看
大神们,帮助提供了一个功能区的访问代码,如果有两个功能区或者多个功能这个代码要怎么改变呢


If Functions.Execute("ShouQuan","订单管理","批准订单") Then
   
'用于批准订单的代码
End If

再例如判断用户是否具备生产管理分组的全部权限:

If Functions.Execute("ShouQuan","生产管理","") Then
    '代码

End If


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


加好友 发短信
等级:幼狐 帖子:170 积分:1372 威望:0 精华:0 注册:2016/12/28 19:32:00
  发帖心情 Post By:2016/12/29 10:52:00 [显示全部帖子]


如图所示,工作菜单2,
图片点击可在新窗口打开查看此主题相关图片如下:1-2.jpg
图片点击可在新窗口打开查看
怎么样去设置?

代码如下:
If Functions.Execute("ShouQuan","业务管理","采购订单") Then
    Forms("采购订单").open()
End If

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


加好友 发短信
等级:幼狐 帖子:170 积分:1372 威望:0 精华:0 注册:2016/12/28 19:32:00
  发帖心情 Post By:2016/12/29 12:54:00 [显示全部帖子]

程序没有报错,但是代码没有运行成功,请看附件(附件一直无法上传)
[此贴子已经被作者于2016/12/29 12:55:40编辑过]

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


加好友 发短信
等级:幼狐 帖子:170 积分:1372 威望:0 精华:0 注册:2016/12/28 19:32:00
  发帖心情 Post By:2016/12/29 13:30:00 [显示全部帖子]


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

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

图片点击可在新窗口打开查看此主题相关图片如下:21.jpg
图片点击可在新窗口打开查看
奇怪了,我明明用自己定义的账号登录,怎么进入系统就变成了系统菜单下的账号呢,不解
有办法按照自己定义的账号登录吗?
[此贴子已经被作者于2016/12/29 14:30:58编辑过]

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


加好友 发短信
等级:幼狐 帖子:170 积分:1372 威望:0 精华:0 注册:2016/12/28 19:32:00
  发帖心情 Post By:2016/12/29 15:04:00 [显示全部帖子]

非常感谢,现在测试,已经OK了

 回到顶部