以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  项目事件AfterOpenProject 要不同的用户打开不同的表如何设置参数？  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=10435)
--  作者：pc005637
--  发布时间：2011/6/5 10:47:00
--  项目事件AfterOpenProject 要不同的用户打开不同的表如何设置参数？
项目事件AfterOpenProject 要不同的用户打开不同的表 帮助文档里说明了禁止打开单个表的操作，如果是禁止打开多个表又如何设置参数？ http://help.foxtable.com/topics/2267.htm 是在tables()参数中设定吗？
[此贴子已经被作者于2011-6-5 10:48:12编辑过]
--  作者：pc005637
--  发布时间：2011/6/5 12:33:00
--  
在项目事件AfteOpenProject事件中设置代码：

If User.Name = "路人甲" Then
    Tables("表A").Visible = False
End If
If User.Name = "路人甲" Then
    Tables("表B").Visible = False
End If

If User.Name = "路人甲" Then
Tables("表C").Visible = False
End If
If User.Name = "路人乙" Then
    Tables("表A").Visible = False
End If
If User.Name = "路人乙" Then
    Tables("表B").Visible = False
End If

有没有高手指教一下？

如果项目里面的表很多，用户也很多的话．这个表达式就很复杂了．
[此贴子已经被作者于2011-6-5 12:33:29编辑过]
--  作者：e-png
--  发布时间：2011/6/5 14:31:00
--  
估计高手也就这样了，最多把人员分组判断。再复杂些就需要建立一个权限表了。
--  作者：kylin
--  发布时间：2011/6/5 19:47:00
--  

 Tables("表A").Visible = not(User.Name = "路人甲"  or User.Name = "路人乙")

 Tables("表B").Visible = not(User.Name = "路人甲"  or User.Name = "路人乙")

 Tables("表C").Visible = not(User.Name = "路人甲" )
--  作者：pc005637
--  发布时间：2011/6/6 17:59:00
--  
谢谢，这是个好方法。