1.用户管理中定义了角色:一般用户;高级用户
2.在数据表中增加了一列“创建人”,同时取值为当前用户名称。e.DataRow("创建人") = User.Name
3.想实现:“高级用户”可以看到所有行;其他人只能看到("创建人") 等于当前登录用户的行
如下图:王海龙登录后只能看到("创建人") =王海龙的行;王文山登录后只能看到("创建人") =王文山的行;康向湘是高级用户可以看到所有行
此主题相关图片如下:qq截图20231125145921.jpg
[此贴子已经被作者于2023/11/25 15:15:23编辑过]
参考:
http://www.foxtable.com/webhelp/topics/2346.htm、
http://www.foxtable.com/webhelp/topics/2256.htm
If User.IsRole("高级用户") Then
DataTables("订单").LoadFilter = ""
Else
DataTables("订单").LoadFilter = "创建人 = '" & User.Name & "'"
End If
DataTables("订单").Load()
[此贴子已经被作者于2023/11/25 16:45:40编辑过]