Foxtable(狐表)用户栏目专家坐堂 → 权限实现不了问题


  共有7278人关注过本帖树形打印复制链接

主题:权限实现不了问题

帅哥哟,离线,有人找我吗?
lgz518
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1271 积分:8670 威望:0 精华:0 注册:2019/6/13 9:57:00
权限实现不了问题  发帖心情 Post By:2022/12/12 21:46:00 [只看该作者]


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

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/12/12 21:47:00 [只看该作者]

请上传实例说明

 回到顶部
帅哥哟,离线,有人找我吗?
lgz518
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1271 积分:8670 威望:0 精华:0 注册:2019/6/13 9:57:00
  发帖心情 Post By:2022/12/12 21:48:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:权限.zip


 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/12/12 23:07:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:系统管理-用户-2020-5-29版.zip


 回到顶部
帅哥哟,离线,有人找我吗?
lgz518
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1271 积分:8670 威望:0 精华:0 注册:2019/6/13 9:57:00
  发帖心情 Post By:2022/12/12 23:28:00 [只看该作者]

.NET Framework 版本:4.0.30319.42000
Foxtable 版本:2022.8.18.1
错误所在事件:项目,LoadUserSetting
详细错误信息:
未找到列 [用户名]。


报错,还是不行

 回到顶部
帅哥,在线噢!
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/12/13 8:34:00 [只看该作者]

很明显列名不对。自己导出4楼的项目代码和自己的项目对比一下

 回到顶部
帅哥哟,离线,有人找我吗?
lgz518
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1271 积分:8670 威望:0 精华:0 注册:2019/6/13 9:57:00
  发帖心情 Post By: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
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1271 积分:8670 威望:0 精华:0 注册:2019/6/13 9:57:00
  发帖心情 Post By:2022/12/13 11:33:00 [只看该作者]

再上实例,请帮调试一下,谢谢
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:权限.zip



 回到顶部
帅哥,在线噢!
有点蓝
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/12/13 11:40:00 [只看该作者]

7楼用法设置的是控件,很明显不存在“单价”这个控件。控件的设置和表格列的设置完全是不停的用法,不要混用

 回到顶部
帅哥哟,离线,有人找我吗?
lgz518
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1271 积分:8670 威望:0 精华:0 注册:2019/6/13 9:57:00
  发帖心情 Post By: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





 回到顶部
总数 26 1 2 3 下一页