- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 一列多人权限问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=89575)
-- 发布时间：2016/8/24 19:23:00
-- 一列多人权限问题
一列多人权限问题
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:权限问题.foxdb |
Case "按客户"
If User.Name = "管理员" Then
Select Case e.StripItem.Name
Case "按客户"
Tables("订单表").OpenLoadTree("客户|状态|订单名称")
Case "按日期"
Tables("订单表").OpenLoadTree("客户|状态|订单名称")
Case "按状态"
Tables("订单表").OpenLoadTree("客户|状态|订单名称")
End Select
ElseIf user.Group = "主要负责人" Then
Tables("订单表").OpenLoadTree("客户|状态|订单名称",100,100,True,"主要负责人 = \'" & User.Name & "\'")
ElseIf user.Group = "协助团队" Then
Tables("订单表").OpenLoadTree("客户|状态|订单名称",100,100,True,"协助 = \'" & User.Name & "\'") 如何判断一列内多个条件
End If
[此贴子已经被作者于2016/8/24 19:32:12编辑过]
-- 发布时间：2016/8/24 19:38:00
--
比如
Tables("订单表").OpenLoadTree("客户|状态|订单名称",100,100,True,"(\',\' + 设计师 + \',\') = \'," & User.Name & ",\'")
-- 发布时间：2016/8/24 22:47:00
--
---
[此贴子已经被作者于2016/8/26 14:03:22编辑过]
-- 发布时间：2016/8/24 22:50:00
--
应该是没问题的。你1楼贴的代码和你给的例子，不匹配，直接说你例子要实现什么。
-- 发布时间：2016/8/26 14:04:00
--
If User.Name = "张经理" Then
DataTables("订单").LoadFilter = ""
Else
DataTables("订单").LoadFilter = "业务员 = \'" & User.Name & "\'"
Else
DataTables("订单").LoadFilter = "协助团队 = \'" & User.Name & "\'" 这是一个多值列 会输入若干用户名 做出判断当前用户在里面 同意加载数据
End If
DataTables("订单").Load()
-- 发布时间：2016/8/26 14:08:00
--
If User.Name = "张经理" Then Else |
DataTables("订单").LoadFilter = "协助团队 like \'%" & user.Name & "%\'"
End If
DataTables("订单").Load()
才学习的，你试下看可以用不
[此贴子已经被作者于2016/8/26 14:08:51编辑过]