Foxtable(狐表)用户栏目专家坐堂 → 授权表如何实现不可复制?


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

主题:授权表如何实现不可复制?

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


加好友 发短信
等级:一尾狐 帖子:454 积分:3241 威望:0 精华:0 注册:2019/11/3 22:21:00
授权表如何实现不可复制?  发帖心情 Post By:2022/1/1 22:24:00 [显示全部帖子]

代码如下:
If User.Type = UserTypeEnum.User Then
    For Each dr As DataRow In DataTables("yh1").Select("用户名 = '" & User.Name & "'" )
        If dr.IsNull("列名") Then
            Tables(dr("授权项目")).Visible = Not dr("不可见")
            Tables(dr("授权项目")).AllowEdit = Not dr("不可编辑")
            Tables(dr("授权项目")).AllowClipBoard = Not dr("不可复制")
        Else
            Tables(dr("授权项目")).Cols(dr("列名")).Visible = Not dr("不可见")
            Tables(dr("授权项目")).Cols(dr("列名")).AllowEdit = Not dr("不可编辑")
            Tables(dr("授权项目")).Cols(dr("列名")).AllowClipBoard = Not dr("不可复制")
        End If
    Next
End If
显示错误:AllowClipBoard  不是 tables的成员
 请问应当如何通过授权表来实现是否可复制的控制?
[此贴子已经被作者于2022/1/1 22:34:03编辑过]

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


加好友 发短信
等级:一尾狐 帖子:454 积分:3241 威望:0 精华:0 注册:2019/11/3 22:21:00
  发帖心情 Post By:2022/1/1 22:49:00 [显示全部帖子]

已明白,把tables 改为datatables 就可

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


加好友 发短信
等级:一尾狐 帖子:454 积分:3241 威望:0 精华:0 注册:2019/11/3 22:21:00
  发帖心情 Post By:2022/1/1 23:10:00 [显示全部帖子]

新问题:
换用户登录错误提示:
.NET Framework 版本:4.0.30319.42000
Foxtable 版本:2021.12.30.1
错误所在事件:项目,LoadUserSetting
详细错误信息:
未找到类型“DataTable”的公共成员“Cols”。

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


加好友 发短信
等级:一尾狐 帖子:454 积分:3241 威望:0 精华:0 注册:2019/11/3 22:21:00
  发帖心情 Post By:2022/1/2 12:45:00 [显示全部帖子]

已解决: 
 DataTables(dr("授权项目")).Cols(dr("列名")).AllowClipBoard = Not dr("不可复制")
修改为:
  DataTables(dr("授权项目")).AllowClipBoard = Not dr("不可复制")

 回到顶部