If e.Row("整理收集人") <> User.name Then
messagebox.show("珍惜他人劳动成果!看看就好!")
Return
End If
e.Row.Load() '重新加载此行
If e.Row.IsNull("编辑者") = False AndAlso e.Row("编辑者") <> User.name Then '判断是否有人编辑
MessageBox.Show(e.Row("编辑者") & "正在编辑此行!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
Else
e.Row("编辑者") = User.name '设置编辑者列为当前用户
e.Row.Save() '并立即保存
Forms("编辑窗口").Open() '打开编辑窗口
End If
我想排除 开发者 的编辑权限不受此代码约束