Foxtable(狐表)用户栏目专家坐堂 → 用户权限


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

主题:用户权限

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


加好友 发短信
等级:婴狐 帖子:29 积分:221 威望:0 精华:0 注册:2021/11/9 14:00:00
用户权限  发帖心情 Post By:2021/11/9 17:49:00 [显示全部帖子]

老师您好,我想问一下能不能设置一下权限,可以让一部分用户不能编辑

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


加好友 发短信
等级:婴狐 帖子:29 积分:221 威望:0 精华:0 注册:2021/11/9 14:00:00
  发帖心情 Post By:2021/11/9 17:51:00 [显示全部帖子]

就好像我想全部用户都可以编辑,但是用户a跟用户b不能编辑,只能做为一个查看的一个账号

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


加好友 发短信
等级:婴狐 帖子:29 积分:221 威望:0 精华:0 注册:2021/11/9 14:00:00
  发帖心情 Post By:2021/11/10 8:44:00 [显示全部帖子]

If e.Row("用户名") <> "aa" Then
    e.Cancel = 
True
End If
老师这样写是不是让用户名为aa的不能编辑

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


加好友 发短信
等级:婴狐 帖子:29 积分:221 威望:0 精华:0 注册:2021/11/9 14:00:00
  发帖心情 Post By:2021/11/10 9:05:00 [显示全部帖子]

那老师row里面是什么意思
[此贴子已经被作者于2021/11/10 9:04:49编辑过]

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


加好友 发短信
等级:婴狐 帖子:29 积分:221 威望:0 精华:0 注册:2021/11/9 14:00:00
  发帖心情 Post By:2021/11/10 9:18:00 [显示全部帖子]

就是我有一张user的表专门是存用户的账号与密码的嘛,在用户管理里面的用户数据表里面导入的,然后我现在想如果用户名='aa',那么订单表 e.Cancel = True

 回到顶部
帅哥哟,离线,有人找我吗?
小web在练
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:29 积分:221 威望:0 精华:0 注册:2021/11/9 14:00:00
  发帖心情 Post By:2021/11/10 9:41:00 [显示全部帖子]

那老师这个放在哪里比较好,我是写了个录入窗口的双击直接打开窗口 e.Cancel = True,用PrepareEdit事件没什么作用啊,在录入窗口也是可以改数据的

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


加好友 发短信
等级:婴狐 帖子:29 积分:221 威望:0 精华:0 注册:2021/11/9 14:00:00
  发帖心情 Post By:2021/11/10 9:41:00 [显示全部帖子]

我想的是这个user.name不能编辑只能查看

 回到顶部
帅哥哟,离线,有人找我吗?
小web在练
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:29 积分:221 威望:0 精华:0 注册:2021/11/9 14:00:00
  发帖心情 Post By:2021/11/10 9:58:00 [显示全部帖子]

Dim ctl As WinForm.Control = e.Sender
Select
 Case ctl.BindingField
    Case 
"
A.第一列""A.第二列""A.第三列"
        If User.Name = 
"
张三" Then
            ctl.ReadOnly = BooleanEnum.False 
'
允许编辑
        Else
            ctl.ReadOnly = BooleanEnum.True 
'
禁止编辑
        End If
    Case 
"
A.第四列""A.第五列""A.第六列"
        If User.Name = 
"
李四" Then
            ctl.ReadOnly = BooleanEnum.False 
'
允许编辑
        Else
            ctl.ReadOnly = BooleanEnum.True 
'
禁止编辑
        End 
If

End
 Select
老师我想问一下我标注的地方可以写文本框的名称吗

 回到顶部
帅哥哟,离线,有人找我吗?
小web在练
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:29 积分:221 威望:0 精华:0 注册:2021/11/9 14:00:00
  发帖心情 Post By:2021/11/10 10:24:00 [显示全部帖子]

放在那里呀,老师

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


加好友 发短信
等级:婴狐 帖子:29 积分:221 威望:0 精华:0 注册:2021/11/9 14:00:00
  发帖心情 Post By:2021/11/10 10:43:00 [显示全部帖子]

不行啊老师,还是能上传

 回到顶部
总数 14 1 2 下一页