如何设置组权限？请求帮助，多谢！ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 如何设置组权限？请求帮助，多谢！

共有3150人关注过本帖树形打印复制链接主题：如何设置组权限？请求帮助，多谢！

吃亏是福

小大 11楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：51 积分：474 威望：0 精华：0 注册：2020/8/19 17:19:00

看到看不到，没法编辑啊 发帖心情

Post By：2020/9/7 6:41:00 [只看该作者]

ElseIf User.Group = "项目经理" Then '如果是""项目经理"组,能看自己行且可以编辑;能看所有"工程师"组行,但不可以编辑.

DataTables("工作日志基础数据").LoadFilter = "填报人 = '" & User.Group & "' or 填报人 = '工程师'" '该行执行完后，所有的行都看不到了

DataTables("工作日志基础数据").AllowEdit = True

有点蓝

小大 12楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：105948 积分：538809 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2020/9/7 8:36:00 [只看该作者]

使用的是or连接条件，增加的条件不可能会减少数据，只会增加。检查其它地方代码

吃亏是福

小大 13楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：51 积分：474 威望：0 精华：0 注册：2020/8/19 17:19:00

我感觉是数据没有读出“工作组” 发帖心情

Post By：2020/9/7 9:50:00 [只看该作者]

使用的是or连接条件，增加的条件不可能会减少数据，只会增加。检查其它地方代码

ElseIf User.Group = "项目经理" Then '如果是""项目经理"组,能看自己行且可以编辑;能看所有"工程师"组行,但不可以编辑.

DataTables("工作日志基础数据").LoadFilter = "填报人 = '" & User.Group & "' or 填报人 = '工程师'" '该行执行完后，所有的行都看不到了

DataTables("工作日志基础数据").AllowEdit = True

我感觉是数据过滤命令，没有读出填报人 = '" & User.Group & "' 工作组；也没有读出填报人 = '工程师'" 工作组

因为我单独用任何一个都读不出来数据

ElseIf User.Group = "项目经理" Then '如果是""项目经理"组,能看自己行且可以编辑;能看所有"工程师"组行,但不可以编辑.

DataTables("工作日志基础数据").LoadFilter = "填报人 = '" & User.Group & "' '该行执行完后，所有的行都看不到了

DataTables("工作日志基础数据").AllowEdit = True

ElseIf User.Group = "项目经理" Then '如果是""项目经理"组,能看自己行且可以编辑;能看所有"工程师"组行,但不可以编辑.

DataTables("工作日志基础数据").LoadFilter = "填报人 = '" 工程师 "' '该行执行完后，所有的行都看不到了

DataTables("工作日志基础数据").AllowEdit = True

[此贴子已经被作者于2020/9/7 9:53:26编辑过]

有点蓝

小大 14楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：105948 积分：538809 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2020/9/7 10:08:00 [只看该作者]

说明这个表根本就没有符合条件的数据，就是没有填报人为工程师或者项目经理的数据

吃亏是福

小大 15楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：51 积分：474 威望：0 精华：0 注册：2020/8/19 17:19:00

Post By：2020/9/7 10:48:00 [只看该作者]

此主题相关图片如下：微信图片_20200907105853.png

此主题相关图片如下：微信图片_20200907105638.png

If User.Group = "管理者" Then '如果是"管理者",能看所有人,可以编辑.
    DataTables("工作日志基础数据").LoadFilter = ""
    DataTables("工作日志基础数据").AllowEdit = True
ElseIf User.Group = "高管" Then '如果是"高管"组 ,能看所有人,但不可以编辑.
    DataTables("工作日志基础数据").LoadFilter = ""
    DataTables("工作日志基础数据").AllowEdit = False
ElseIf User.Group = "部门经理" Or User.Group = "内业" Then ''如果是""部门经理"组或者是"内业"组 ,能看所有人.
    DataTables("工作日志基础数据").LoadFilter = ""

DataTables("工作日志基础数据").AllowEdit = True

以上的分组都好用

ElseIf User.Group = "项目经理" Then '如果是""项目经理"组,能看自己行且可以编辑;能看所有"工程师"组行,但不可以编辑.

DataTables("工作日志基础数据").LoadFilter = "填报人 = '" & User.Group & "' or 填报人 = '工程师'" '该行执行完后，所有的行都看不到了

DataTables("工作日志基础数据").AllowEdit = True

这个登录的分组好用，条件语句里面的分组不好用。

登录的分组好用，条件语句里面的分组不好用

这个表有符合条件的数据，有填报人为工程师或者项目经理的数据

[此贴子已经被作者于2020/9/7 11:18:42编辑过]