If User.IsRole("经理") = False Then
Filter = n事务时间 & ">='" & _表首 & "' and " & n事务时间 & "<='" & _表尾 & "' and (" & n事务对象 & "='" & user.name & "' or " & n公开 & "= -1 or ','+" & n公开部门 & "+',' like '%," & user.group & ",%' or ','+" & n公开个人 & "+',' like '%," & user.name & ",%' )" 'SQL Server数据源
Else
Filter = n事务时间 & ">='" & _表首 & "' and " & n事务时间 & "<='" & _表尾 & "' and (" & n事务部门 & "='" & user.group & "' or " & n公开 & "= -1 or ','+" & n公开部门 & "+',' like '%," & user.group & ",%' or ','+" & n公开个人 & "+',' like '%," & user.name & ",%' )" 'SQL Server数据源
End If
End If
End If
Filter 这里 Or " & n公开 & "= -1 Or ','+" & n公开部门 & "+',' like '%," & user.group & " 我感觉这里有明显的 语法错误,很久没用狐,忘记Filter 的语法规则了
至少" & n公开 & "= -1 Or ', 这么应该是明显错误的," & n公开 & "= '-1 'Or 这样改对吗?