| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]帮写句表事件代码 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=31997) |
| -- 作者：lsf5138 -- 发布时间：2013/4/24 9:40:00 -- [求助]帮写句表事件代码 有个“员工”表，“员工性名”列 如果要删除的员工性名为“管理员”提示当前用户不能删除，在删除行之前执行， |
| -- 作者：Bin -- 发布时间：2013/4/24 9:42:00 -- 在BeforeDeleteDataRow事件中添加如下代码 if e.datarow("员工姓名")="管理员" then MessageBox.SHow("不能删") e.Cancel=True end if
|
| -- 作者：lsy -- 发布时间：2013/4/24 10:37:00 -- 楼主的做法，管理员只能是一位了，管理员不要用作用户名，管理员是组名，每个员工都是平等的，都是用姓名或工号作用户名，只是分组不同，或角色不同。 首先，只有管理员权限的，才能删除员工表中的行，不是谁都能删，其次，即使是管理员，也不能自己删自己，这样，至少有一位管理员，否则会造成没有管理员。 If e.DataRow("员工姓名") = _UserName OrElse _UserGroup <> "系统管理" Then |