以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  列权限问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=160438)

--  作者:xswy
--  发布时间:2021/2/2 16:23:00
--  列权限问题
用户ABC
表T
数据列123456
用户A可以编辑12
用户B只能编辑34
用户C可以编辑56
用户C编辑完6逻辑性打勾以后,这一行不能再修改。
如何实现

根据例子
Select Case User.Name
    Case
 "A
"
        
Select Case e.Col.Name
            Case
 "1","2"

                e.Cancel = False

        
End Select
    
Case "B"
        
Select Case e.Col.Name
            Case
 "3","4"

                e.Cancel = 
False
        
End Select
End
 Select
If
 e.Col.Name = "5","6" Then
    If User.Name <> "C" Then
        e.Cancel = 
False
    
End If
End
 If



[此贴子已经被作者于2021/2/2 16:39:33编辑过]

--  作者:有点蓝
--  发布时间:2021/2/2 16:36:00
--  
If e.Row("6") = True
    e.Cancel = True
    Return
End If
Select Case e.Col.Name
    Case "1","2"
        If User.Name <> "A"
            e.Cancel = True
        End If
    Case "3","4"
        If User.Name <> "B"
            e.Cancel = True
        End If
    Case "5","6"
        If User.Name <> "C"
            e.Cancel = True
        End If
End Select

--  作者:xswy
--  发布时间:2021/2/2 16:55:00
--  
非常感谢,已解决~