Foxtable(狐表)用户栏目专家坐堂 → 系统菜单授权


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

主题:系统菜单授权

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


加好友 发短信
等级:八尾狐 帖子:1988 积分:6286 威望:0 精华:0 注册:2017/11/8 17:37:00
系统菜单授权  发帖心情 Post By:2024/1/7 18:05:00 [只看该作者]

系统菜单授权不能根据设定生成
是哪里出错了,转换人时没有按授权生成菜单的
图片点击可在新窗口打开查看此主题相关图片如下:微信截图_20240107180216.png
图片点击可在新窗口打开查看

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


加好友 发短信
等级:超级版主 帖子:110544 积分:562604 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/1/7 20:19:00 [只看该作者]

请上传实例说明

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


加好友 发短信
等级:八尾狐 帖子:1988 积分:6286 威望:0 精华:0 注册:2017/11/8 17:37:00
  发帖心情 Post By:2024/1/8 9:01:00 [只看该作者]

系统菜单
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.rar


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


加好友 发短信
等级:超级版主 帖子:110544 积分:562604 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/1/8 9:14:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.zip


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


加好友 发短信
等级:八尾狐 帖子:1988 积分:6286 威望:0 精华:0 注册:2017/11/8 17:37:00
  发帖心情 Post By:2024/1/8 10:48:00 [只看该作者]

不知哪里错了,我现在使用的是外面的数据库时不能
图片点击可在新窗口打开查看此主题相关图片如下:微信截图_20240108104704.png
图片点击可在新窗口打开查看

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


加好友 发短信
等级:超级版主 帖子:110544 积分:562604 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/1/8 10:50:00 [只看该作者]

提示什么错误

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


加好友 发短信
等级:八尾狐 帖子:1988 积分:6286 威望:0 精华:0 注册:2017/11/8 17:37:00
  发帖心情 Post By:2024/1/8 11:01:00 [只看该作者]

什么都没有提示,就是系统的菜单全部显示不出来

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


加好友 发短信
等级:超级版主 帖子:110544 积分:562604 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/1/8 11:12:00 [只看该作者]

调试

DataTables("授权").LoadFilter = "分组 = '系统菜单'and 姓名='" & User.Name & "' "
DataTables("授权").LoadTop = Nothing
DataTables("授权").Load()
msgbox(DataTables("授权").DataRows.count)

For Each fdr As DataRow In DataTables("授权").DataRows
msgbox(fdr ("功能区") & "," & fdr ("能见"))
    RibbonTabs(fdr ("功能区")).Visible = (fdr ("能见") = "可见")
msgbox(RibbonTabs(fdr ("功能区")).Visible)
Next

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


加好友 发短信
等级:八尾狐 帖子:1988 积分:6286 威望:0 精华:0 注册:2017/11/8 17:37:00
  发帖心情 Post By:2024/1/8 11:42:00 [只看该作者]

真是想不懂,调了成日,看不出上面的同你发有什么差异
图片点击可在新窗口打开查看此主题相关图片如下:微信截图_20240108113648.png
图片点击可在新窗口打开查看

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


加好友 发短信
等级:超级版主 帖子:110544 积分:562604 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/1/8 11:58:00 [只看该作者]

把调试弹出的所有窗口按顺序截图发上来
[此贴子已经被作者于2024/1/8 11:58:31编辑过]

 回到顶部
总数 11 1 2 下一页