- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 权限实现不了问题 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=184532)
-- 发布时间：2022/12/12 21:46:00
-- 权限实现不了问题
此主题相关图片如下：表字段权限问题.jpg
-- 发布时间：2022/12/12 21:47:00
--
请上传实例说明
-- 发布时间：2022/12/12 21:48:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:权限.zip |
-- 发布时间：2022/12/12 23:07:00
--
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:系统管理-用户-2020-5-29版.zip |
-- 发布时间：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楼的项目代码和自己的项目对比一下
-- 发布时间：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
-- 发布时间：2022/12/13 11:33:00
--
再上实例，请帮调试一下，谢谢
-- 发布时间：2022/12/13 11:40:00
--
7楼用法设置的是控件，很明显不存在“单价”这个控件。控件的设置和表格列的设置完全是不停的用法，不要混用
-- 发布时间：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