以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  权限问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=152832)

--  作者:13796361423
--  发布时间:2020/7/23 12:15:00
--  权限问题
有一个“成绩表”, 有一列是班级,想要一班的班任只能看到一班的成绩,二班的班任只能看到二班的成绩 , 
BeforeLoadInnerTable里,
If e.DataTableName = "成绩表" Then
    e.Filter = "[_Identify] Is Null"
End If
然后在LoadUserSetting里,
If User.Name = "班任1" Then
    DataTables("成绩表").LoadFilter = ""
Else
    DataTables("成绩表").LoadFilter = "
If User.Name = "学校1" Then
    DataTables("成绩表").LoadFilter = ""
Else
    DataTables("成绩表").LoadFilter = "一班 = \'" & User.Name & "\'"
End If
DataTables("成绩表").Load()
 = \'" & User.Name & "\'"
End If
DataTables("成绩表").Load()

请问表达式有问题 吗?




--  作者:有点蓝
--  发布时间:2020/7/23 13:37:00
--  
LoadUserSetting

If User.Name = "班任1" Then
    DataTables("成绩表").LoadFilter = "班级=‘一班’"
ElseIf User.Name = "班任2" Then
    DataTables("成绩表").LoadFilter = "班级=‘二班’"
else
DataTables("成绩表").LoadFilter = “[_Identify] Is Null
end if
DataTables("成绩表").Load()