If e.Col.Name = "XZH" Then If User.Roles <> "部门负责人" Then If e.Row("XMGLDW") <> User.GROUP OrElse e.Row("JBR") <> User.NAME Then '在编辑某行前,会自动判断负责此行的部门列是否和登录用户所属分组相同,如果不同,则取消编辑. e.Cancel = True End If End If Else If e.Row("XMGLDW") <> User.GROUP OrElse e.Row("JBR") <> User.NAME Then '在编辑某行前,会自动判断负责此行的部门列是否和登录用户所属分组相同,如果不同,则取消编辑. e.Cancel = True End If End If
加好友 
发短信
Post By：2015/2/6 16:41:00 [显示全部帖子]
