标题：可视化授权

帮助和实例中的可视化授权是针对主表,我想在表C的模式窗口中的表进行可视化授权

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:可视化授权.rar

什么意思?狐爸的可视化授权是可以针对所有表.

对主表窗口的表有用,对模式窗口的表不起作用

做个商业版的示例来看看

模式窗口在表C,李四登录后应锁窗口中表C

 

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:可视化授权.table

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:可视化授权.table

我希望李四在表C模式窗口中的表C应该锁定表,不能编辑.(不是主表的锁定)

那你直接复制项目属性中的代码贴到AfterLoad事件中就可以了。

 

如：

 

For Each dr As DataRow In DataTables("授权表").Select("用户名 = '" & User.Name & "'" )
    If dr.IsNull("列名") Then
        For Each t As Table In Tables
            If t.DataTable.Name = dr("表名") Then
                t.Visible = Not dr("不可见")
                t.AllowEdit = Not dr("不可编辑")
            End If
        Next
    Else
        For Each t As Table In Tables
            If t.DataTable.Name = dr("表名") Then
                For Each c As Col In t.Cols
                    If c.Name = dr("列名") Then
                        c.Visible = Not dr("不可见")
                        c.AllowEdit = Not dr("不可编辑")
                    End If
                Next
            End If
        Next
    End If
Next

老六，下载5楼的文件看看，你会不会打开此项目时会运行演示文件？

呵呵，收到