Foxtable(狐表)用户栏目专家坐堂 → 项目打开起始不加载表后可视化授权问题


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

主题:项目打开起始不加载表后可视化授权问题

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


加好友 发短信
等级:一尾狐 帖子:454 积分:3217 威望:0 精华:0 注册:2019/11/3 22:21:00
项目打开起始不加载表后可视化授权问题  发帖心情 Post By:2022/2/17 12:04:00 [只看该作者]

1、打开项目时同时加载所有表,可视化授权有效
2、起始不加载表,使用时才加载表,可视化授权表失效

啥原因,有解决办法吗?
[此贴子已经被作者于2022/2/17 12:04:39编辑过]

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


加好友 发短信
等级:超级版主 帖子:107873 积分:548728 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/2/17 13:40:00 [只看该作者]

可视化授权判断表格是否加载,如果不加载就不要判断权限

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


加好友 发短信
等级:一尾狐 帖子:454 积分:3217 威望:0 精华:0 注册:2019/11/3 22:21:00
  发帖心情 Post By:2022/2/17 19:37:00 [只看该作者]

后续加载的就不能判断出来是否加载,导致无效吗?


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


加好友 发短信
等级:超级版主 帖子:107873 积分:548728 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/2/17 19:54:00 [只看该作者]

后续加载的,在加载后再查询权限表进行授权

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


加好友 发短信
等级:一尾狐 帖子:454 积分:3217 威望:0 精华:0 注册:2019/11/3 22:21:00
  发帖心情 Post By:2022/2/17 21:43:00 [只看该作者]

版主,能来段代码吗?

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


加好友 发短信
等级:超级版主 帖子:107873 积分:548728 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/2/17 21:50:00 [只看该作者]

datatables.load("表A")

   dim dr As DataRow = DataTables("授权").find("表名 = '表A'" )
if dr isnot nothing then
        If dr.IsNull("列名") Then
            Tables("表A").Visible = Not dr("不可见")
            Tables("表A").AllowEdit = Not dr("不可编辑")
        Else
            Tables("表A").Cols(dr("列名")).Visible = Not dr("不可见")
            Tables("表A").Cols(dr("列名")).AllowEdit = Not dr("不可编辑")
        End If
end if

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


加好友 发短信
等级:一尾狐 帖子:454 积分:3217 威望:0 精华:0 注册:2019/11/3 22:21:00
  发帖心情 Post By:2022/2/17 22:37:00 [只看该作者]

谢谢

 回到顶部