以文本方式查看主题

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

--  作者:lgz518
--  发布时间:2022/12/12 21:46:00
--  权限实现不了问题

图片点击可在新窗口打开查看此主题相关图片如下:表字段权限问题.jpg
图片点击可在新窗口打开查看

--  作者:有点蓝
--  发布时间:2022/12/12 21:47:00
--  
请上传实例说明
--  作者:lgz518
--  发布时间:2022/12/12 21:48:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:权限.zip


--  作者:有点蓝
--  发布时间:2022/12/12 23:07:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:系统管理-用户-2020-5-29版.zip


--  作者:lgz518
--  发布时间:2022/12/12 23:28:00
--  
.NET Framework 版本:4.0.30319.42000
Foxtable 版本:2022.8.18.1
错误所在事件:项目,LoadUserSetting
详细错误信息:
未找到列 [用户名]。


报错,还是不行

--  作者:有点蓝
--  发布时间:2022/12/13 8:34:00
--  
很明显列名不对。自己导出4楼的项目代码和自己的项目对比一下
--  作者:lgz518
--  发布时间:2022/12/13 11:32:00
--  
列名是授权少一个名字,补上,还是不行,打开入库明细窗口,提示找不名称控件“单价”,单价是入库明细的表字段,是存在,按下错误提示后,又报错.NET Framework 版本:4.0.30319.42000
Foxtable 版本:2022.8.18.1
错误所在事件:窗口,入库明细,AfterLoad
详细错误信息:
未设置对象变量或 With 块变量。

入库明细,AfterLoad的代码

For Each dr As DataRow In DataTables("授权表").Select("用户名 = \'" & _UserName & "\' And 表名= \'" & e.Form.Name & "\'")
    e.Form.Controls(dr("列名")).Visible = Not dr("不可见")
    e.Form.Controls(dr("列名")).Enabled = Not dr("不可编辑")
Next


--  作者:lgz518
--  发布时间:2022/12/13 11:33:00
--  
再上实例,请帮调试一下,谢谢
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:权限.zip



--  作者:有点蓝
--  发布时间:2022/12/13 11:40:00
--  
7楼用法设置的是控件,很明显不存在“单价”这个控件。控件的设置和表格列的设置完全是不停的用法,不要混用
--  作者:lgz518
--  发布时间:2022/12/13 12:07:00
--  
帮助内表没下面的代码,窗口、按键、表、列都可以,那外部表应怎么处理?

For Each dr As DataRow In DataTables("授权表").Select("用户名 = \'" & _UserName & "\' And 表名= \'" & e.Form.Name & "\'")
    e.Form.Controls(dr("列名")).Visible = Not dr("不可见")
    e.Form.Controls(dr("列名")).Enabled = Not dr("不可编辑")
Next