专家坐堂-窗口表权限Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以文本方式查看主题

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

--  作者：125651911
--  发布时间：2022/3/25 0:07:00
--  窗口表权限
参考“可视化授权的实现”，完成授权，怎样让窗口表同步授权表的权限？

比如：授权表内的订单主表\\金额列锁定，订单明细表\\单价和金额列也锁定
窗口内的table1绑定订单主表，table2绑定订单主表.订单明细表，
需要窗口的table11和table2与授权表内的订单主表和订单明细表权限同步。

--  作者：有点蓝
--  发布时间：2022/3/25 8:51:00
--
到窗口afterload调用授权代码对窗口表进行授权，比如

dim dr As DataRow = DataTables("授权").find("表名 = \'订单主表\'" )
if dr isnot nothing then
If dr.IsNull("列名") Then
Tables("窗口1_table11").AllowEdit = Not dr("不可编辑")
Else
Tables("窗口1_table11").Cols(dr("列名")).Visible = Not dr("不可见")
Tables("窗口1_table11").Cols(dr("列名")).AllowEdit = Not dr("不可编辑")
End If
end if