以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  分权加载代码 报错  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=113417)

--  作者:yifan3429
--  发布时间:2018/1/15 17:29:00
--  分权加载代码 报错
---------------------------
错误
---------------------------
编译错误:没有为“Public Function IsRole(nm As String) As Boolean”的参数“nm”指定参数。
错误代码:If User.IsRole = "管理员" Then
---------------------------
确定   
---------------------------

报错代码  IsRole  更换成  name   就不会报错



If User.IsRole = "管理员" Then
    DataTables("终端用户").LoadFilter = ""
Else
    DataTables("终端用户").LoadFilter = "团队 like \'%" & user.name & "%\'"
End If
DataTables("终端用户").Load()




我还想增加一个条件  根据 建档人列 等于 登陆用户 加载登陆人所属的行
排在第二

--  作者:有点甜
--  发布时间:2018/1/15 17:33:00
--  

改成这样

 

If User.IsRole("管理员") Then