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


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

主题:数据修改权限

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


加好友 发短信
等级:幼狐 帖子:84 积分:664 威望:0 精华:0 注册:2018/11/15 12:35:00
数据修改权限  发帖心情 Post By:2018/12/7 17:50:00 [只看该作者]

版主,请问一下数据表的有一列用户名,如何实现增加记录后这个列中自动增加所增这条记录的用户名,然后在窗口表单中只能修改自己本人的记录,别人的记录用灰色显示,并只能读取不能修改。谢谢。

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


加好友 发短信
等级:版主 帖子:74211 积分:372183 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/12/7 17:54:00 [只看该作者]


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


加好友 发短信
等级:幼狐 帖子:84 积分:664 威望:0 精华:0 注册:2018/11/15 12:35:00
  发帖心情 Post By:2018/12/7 18:27:00 [只看该作者]

谢谢版主。

 

如果不是当前用户,再让这些记录背景成灰色,这样可以吗?

 

If e.Row("业务员") <> User.Name Then
    e.Cancel =
True
End If


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


加好友 发短信
等级:六尾狐 帖子:1216 积分:8354 威望:0 精华:0 注册:2016/3/28 16:57:00
  发帖心情 Post By:2018/12/7 19:03:00 [只看该作者]

没有注意,但应该可以修改行颜色来实现。
e.Style = "样式1"
[此贴子已经被作者于2018/12/7 19:22:53编辑过]

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


加好友 发短信
等级:幼狐 帖子:84 积分:664 威望:0 精华:0 注册:2018/11/15 12:35:00
  发帖心情 Post By:2018/12/7 21:53:00 [只看该作者]

那底纹能改成灰色吗?


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


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

背景颜色
图片点击可在新窗口打开查看

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


加好友 发短信
等级:幼狐 帖子:84 积分:664 威望:0 精华:0 注册:2018/11/15 12:35:00
  发帖心情 Post By:2018/12/7 23:48:00 [只看该作者]

版主,能用代码加在这下面来实现吗?

 

If e.Row("username") <> User.Name Then
     e.Cancel =  True
 End If


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


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


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


加好友 发短信
等级:幼狐 帖子:84 积分:664 威望:0 精华:0 注册:2018/11/15 12:35:00
  发帖心情 Post By:2018/12/8 9:25:00 [只看该作者]

版主, 当前窗口表单中的记录不是当前用户编辑的,才灰色显示。这个条件如下加到下面中? 谢谢。

 

DataTables("表A").AddUserStyle("a", Color.Red, Color.White)


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


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

drawcell事件

If e.Row("username") <> User.Name Then
    e.Table.DataTable.AddUserStyle("样式1",Color.Gray,Color.red)
    e.Style = "样式1"
End If

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