以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  怎样按权限加载数据  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=87851)
--  作者：czquickly
--  发布时间：2016/7/21 10:57:00
--  怎样按权限加载数据
http://www.foxtable.com/webhelp/scr/2405.htm
我按目录树形式的授权，对“任务安排”表进行了分部门查看权限设置。但是有些人需要同时看多个部门的数据，应该怎么进行数据的筛选？事件我是放在LoadUserSetting里。
下面的代码只能加载单一条件的数据。
If Functions.Execute("ShouQuan","任务安排","A组查看") Then
DataTables("项目进度").LoadFilter = "责任部门 = \'A组\'"
elseif Functions.Execute("ShouQuan","任务安排","B组查看") Then
DataTables("项目进度").LoadFilter = "责任部门 = \'B组\'"
elseif Functions.Execute("ShouQuan","任务安排","C组查看") Then
DataTables("项目进度").LoadFilter = "责任部门 = \'C组\'
End If
假如想同时查看A组B组信息，要怎么把加载条件串联起来？
参考http://www.foxtable.com/webhelp/scr/1058.htm里代码还是不太会
--  作者：大红袍
--  发布时间：2016/7/21 11:02:00
--  

Dim filter As String = "1=2 "
If Functions.Execute("ShouQuan","任务安排","A组查看") Then
    filter &= " or 责任部门 = \'A组\'"
End If
If Functions.Execute("ShouQuan","任务安排","B组查看") Then
    filter &= " or  责任部门 = \'B组\'"
End If
If Functions.Execute("ShouQuan","任务安排","C组查看") Then
    filter &= " or  责任部门 = \'C组\'"
End If

DataTables("项目进度").LoadFilter = filter

DataTables("项目进度").Load

 
--  作者：czquickly
--  发布时间：2016/7/21 11:05:00
--  

Dim filter As String = "1=2 "是啥意思？

怎么理解
[此贴子已经被作者于2016/7/21 11:05:25编辑过]
--  作者：大红袍
--  发布时间：2016/7/21 11:14:00
--  
以下是引用czquickly在2016/7/21 11:05:00的发言：

Dim filter As String = "1=2 "是啥意思？

怎么理解
[此贴子已经被作者于2016/7/21 11:05:25编辑过]

 

1=2 的意思是，不加载任何数据，目的是为了和后面的 or ... or 连接起来使用。
--  作者：czquickly
--  发布时间：2016/7/21 11:18:00
--  
好像理解了，应该就是随便写了查不到任何值得条件，然后靠OR的条件把其它的数据加进来