Foxtable(狐表)用户栏目专家坐堂 → 用户权限设置问题


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

主题:用户权限设置问题

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


加好友 发短信
等级:幼狐 帖子:141 积分:1227 威望:0 精华:0 注册:2018/2/22 10:06:00
用户权限设置问题  发帖心情 Post By:2019/1/5 11:43:00 [只看该作者]

老师,我在权限设置中对用户角色采用多选结构,即一人多岗,现在有个问题
1- 有个资产管理主表,主表中有一列为“公司标记组”,体现内容为资产的所有方和使用方的标记,比如,资产所有方为GX;但使用方为IY,则“公司标记组”列体现为GX,IY
2- 我想实现对于角色者而言,如果角色仅为GX或者仅为IY,则均可加载该资产数据,否则不可
3- 但是,如果角色是多选,例如,角色为GX,XR,我想实现对于这个角色中任何一个角色只要在“资产管理主表”的“公司标记组”列中包含,则加载数据,例如角色GX,XR,则系统加载“公司标记组”列中包含GX或者XR的所有行
请问老师,如第三条所述,代码该如何修改,烦劳指导,以下是错误代码,该代码只适用单一角色,但是双角色不行,您受累给指导下

LoadUserSetting事件代码如下

DataTables("资产管理主表").LoadFilter = "',' + 公司标记组 + ',' like '%," & User.Roles.replace(",", "','") & ",%'"
 

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


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

Dim filter As String = " 1=2 "
For Each n As String In User.Roles.Split(",")
    filter = filter & "or ',' + 公司标记组 + ',' like '%," & n & ",%' "
Next
DataTables("资产管理主表").LoadFilter = filter

 回到顶部