以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]窗口权限问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=69581)

--  作者:czgtiger
--  发布时间:2015/6/7 18:33:00
--  [求助]窗口权限问题
按帮助上的例子,发现,权限设置只对主表有用,对子表不起作用,是哪里出了问题呢?请高人指教
--  作者:大红袍
--  发布时间:2015/6/7 19:27:00
--  
 指哪里,什么意思。
--  作者:czgtiger
--  发布时间:2015/6/7 19:42:00
--  

录入窗口与权限管理》中,输入框的授权这一节,其中表A的录入,我在窗口中设置了表A,表A.表B,表A中的输入者表A.表B的输入者不一定是同一个人,为了区分,把表A.表B的输入者改成记录人。然后按帮助中的代码写进去,发现对表A起作用,对表A.表B不起作用

Dim ctl As WinForm.Control = e.Sender
Select
Case ctl.BindingField
    Case
"A.第一列", "A.第二列", "A.第三列"
        If User.Name =
"张三" Then
            ctl.ReadOnly = BooleanEnum.False
\'允许编辑
        Else
            ctl.ReadOnly = BooleanEnum.True
\'禁止编辑
        End If
    Case
"A.表B.第一列"

        If User.Name = "李四" Then
            ctl.ReadOnly = BooleanEnum.False
\'允许编辑
        Else
            ctl.ReadOnly = BooleanEnum.True
\'禁止编辑
        End
If
End
Select


--  作者:大红袍
--  发布时间:2015/6/7 20:00:00
--  

 不明白你什么意思,你msgbox看一下ctl.BindingField的值是什么。

 

 代码没什么问题。


--  作者:czgtiger
--  发布时间:2015/6/7 20:47:00
--  

大红袍老师,如果在窗口有个控件是table,绑定的表是子表,table子表中的内容修改,也要实现不是本人就不能修改,如何实现呢?


--  作者:大红袍
--  发布时间:2015/6/7 20:49:00
--  

http://www.foxtable.com/help/topics/2247.htm

 


--  作者:czgtiger
--  发布时间:2015/6/7 20:57:00
--  
非常感谢,现在我明白是怎样的了