以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  只要某组和开发都、管理员有删除行权限  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=104877)
--  作者：foxuser
--  发布时间：2017/8/7 16:36:00
--  只要某组和开发都、管理员有删除行权限
老师，请教下只要某组和开发者、管理员有删除行权限，其他用户不能删除行。
If user.Group<>"AA" Then
    e.Cancel=True
End If
这个代码，只有组的用户能删除行了，开发者、管理员删除行失效了
--  作者：有点甜
--  发布时间：2017/8/7 16:40:00
--  

If user.Type = UserTypeEnum.User AndAlso  user.Group<>"AA" Then
    e.Cancel=True
End If
--  作者：foxuser
--  发布时间：2017/8/7 16:59:00
--  
表属性可以生效，但在项目属性 全局表事件的BeforeDeleteDataRow 没生效，其他用户还是能删除行。使用免费版 
--  作者：有点甜
--  发布时间：2017/8/7 17:04:00
--  

你要开启全局表事件，才可以的。AfteOpenProject事件，加入

 

For Each dt As DataTable In DataTables
    dt.GlobalHandler.BeforeDeleteDataRow = true
Next