Foxtable(狐表)用户栏目专家坐堂 → 同一个数据表,不同用户加载不同的列


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

主题:同一个数据表,不同用户加载不同的列

美女呀,离线,留言给我吧!
wtl123456
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:5 积分:184 威望:0 精华:0 注册:2018/8/6 8:45:00
同一个数据表,不同用户加载不同的列  发帖心情 Post By:2019/11/12 15:31:00 [只看该作者]

If _UserGroup = "管理员"  Then
    Filter =  filter
Else
    e.Form.controls("计划明细4").Table.DataTable.LoadPage = 0
    e.Form.controls("计划明细4").Table.DataTable.LoadFilter = filter
    e.Form.controls("计划明细4").Table.DataTable.Load
End If
 我想实现当用户名等于管理员的时候加载所有的 ,当用户等于刀具库或者 配刀库时只加载刀具数据列 代码不为空的 

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


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

接着上面的代码之后
If _UserGroup = "管理员"  Then
e.Form.controls("计划明细4").Table.SetColVisibleWidth(xxx指定管理员可见列
else
e.Form.controls("计划明细4").Table.SetColVisibleWidth(xxx指定非管理员可见列
end if

 回到顶部
美女呀,离线,留言给我吧!
wtl123456
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:5 积分:184 威望:0 精华:0 注册:2018/8/6 8:45:00
  发帖心情 Post By:2019/11/13 14:48:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:微信图片_20191113144224.png
图片点击可在新窗口打开查看
就是说我这个出入库明细表里面包含所有仓库的出入库记录,当用户组等于刀具库或者配刀库登录查询时只显示刀具代码 这一列不为空的 因为这一列是刀具特有的


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


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

dim filter as string
If _UserGroup = "刀具库" orelse _UserGroup = "配刀库" Then
    Filter =  "刀具代码 is not null"
End If
    e.Form.controls("计划明细4").Table.DataTable.LoadPage = 0
    e.Form.controls("计划明细4").Table.DataTable.LoadFilter = filter
    e.Form.controls("计划明细4").Table.DataTable.Load

 回到顶部