以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  一直报警：你有没有权限操作  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=106726)
--  作者：恒隆君
--  发布时间：2017/9/14 16:50:00
--  一直报警：你有没有权限操作
Prepare edit事件
\' 刀具编号 列禁止输入， "刀具名称","申购人","申购日期","备注","成本中心","数量","采购原因","项目名称","要求到货日期","产品名称"，只允许 角色是"申购者"
编辑，但也只可当事人编辑自已的记录。

Select Case e.Col.name
    Case "刀具编号"
        e.Cancel = True
    Case "刀具名称","申购人","申购日期","备注","成本中心","数量","采购原因","项目名称","要求到货日期","产品名称"
        If  User.IsRole("申购者")=False AndAlso e.Row("申购人") IsNot Nothing  Then
            e.Cancel = True
           MessageBox.Show ("你有没有权限操作","提示")
 Return
            If e.Row("申购人") <> User.Name
            e.Cancel = True
           MessageBox.Show ("只有此条记录申请者可以修改","提示")

        End If
    End If
End Select
--  作者：blsu33
--  发布时间：2017/9/14 16:58:00
--  
 Prepare edit 不能用 MessageBox.Show，就是说你准备编辑 就要弹出MessageBox.Show，肯定死循环；
after edit ValidateEdit DataColChanging试试
--  作者：有点甜
--  发布时间：2017/9/14 18:22:00
--  

 代码写到StartEdit事件去

 

http://www.foxtable.com/webhelp/scr/0615.htm