以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  新增行时是不是触发了DataRowLockedChanging  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=123697)

--  作者:tubairabbit
--  发布时间:2018/8/21 14:33:00
--  新增行时是不是触发了DataRowLockedChanging
DataRowLockedChanging设置了
If User.IsRole("审核岗") Then
Else
    messagebox.show("您没有权限更改行锁定状态.\'审核岗\'才能操作.")
    e.cancel = True
End If
但是用录入岗操作时,新增行时也会弹出这个提示。

是不是新增行时也触发了这个事件?

怎样让录入岗在新增行时,不受限制,不弹出此提示,但是操作锁定/解锁行时,弹出此提示并取消锁定/解锁操作呢?

--  作者:有点蓝
--  发布时间:2018/8/21 14:44:00
--  
临时解决方法

新增行这样操作:

vars("lock") = False
Tables("ZTGL").addnew()
vars("lock") = True


DataRowLockedChanging

if vars("lock") 
If User.IsRole("审核岗") Then
Else
    messagebox.show("您没有权限更改行锁定状态.\'审核岗\'才能操作.")
    e.cancel = True
End If
end if