| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 按用户组设置删除或增加行权限问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=128894) |
| -- 作者：3076469014 -- 发布时间：2018/12/17 18:41:00 -- 按用户组设置删除或增加行权限问题 老师：我用用户组在表中设置增加行和删除行，有些表执行，有些表不执行，代码如下，麻烦纠正我的错误点。另外我要是增加多个用户组需要怎么写？ 表事件/增加行BeforeAddDataRow If User.Group = "仓库" Then e.Cancel = True Messagebox.show("你无权增加!", "提示", MessageBoxButtons.OK, MessageBoxIcon.Information) End If 表事件/删除行BeforeDeleteDataRow If User.Group = "仓库" Then e.Cancel = True Messagebox.show("你无权删除!", "提示", MessageBoxButtons.OK, MessageBoxIcon.Information) End If |
| -- 作者：cd_tdh -- 发布时间：2018/12/17 18:52:00 -- 不应该，代码没问题 |
| -- 作者：3076469014 -- 发布时间：2018/12/17 18:55:00 -- 我是用可视化授权表格的，有些列需要授权修改，但是不能让用户组增加行或删除行，设置过程是边写边测代码的，同时设置2个用户组时，代码只执行一个用户组，另外一个组会失效 [此贴子已经被作者于2018/12/17 18:55:47编辑过]
|
| -- 作者：有点蓝 -- 发布时间：2018/12/17 20:30:00 -- 多个分组这样判断 或者 If User.Group = "仓库" orelse User.Group = "行政" Then
|