- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 在项目的BeforeLoadInnerTable事件里添加了代码 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=31764)
-- 发布时间：2013/4/20 7:23:00
-- 在项目的BeforeLoadInnerTable事件里添加了代码
If e.DataTableName = "表A" AndAlso e.User.Group = "a站点" Then
e.Filter = "[创建人] = \'" & e.User.Name & "\'"
ElseIf e.DataTableName = "
表A " AndAlso e.User.Group = "b站点" Then
e.Filter = "[创建人] = \'" & e.User.Name & "\'"
ElseIf e.DataTableName = "
表A " AndAlso e.User.Group = "c站点" Then
e.Filter = "[创建人] = \'" & e.User.Name & "\'"
ElseIf e.DataTableName = "
表A " AndAlso e.User.Group = "d站点" Then
e.Filter = "[创建人] = \'" & e.User.Name & "\'"
ElseIf e.DataTableName = "
表A " AndAlso e.User.Group = "e站点" Then
e.Filter = "[创建人] = \'" & e.User.Name & "\'"
ElseIf e.DataTableName = "
表A " AndAlso e.User.Group = "f站点" Then
e.Filter = "[创建人] = \'" & e.User.Name & "\'"
ElseIf e.DataTableName = "
表A " AndAlso e.User.Group = "g站点" Then
e.Filter = "[创建人] = \'" & e.User.Name & "\'"
End If
想达到的目的是加载表A的时候，当登陆用户的用户组为a站点、b站点、c站点、e站点、f站点、f站点时只加载登陆用户创建的行，为什么没有效果呢？依然加载全部数据，是哪里不对呢？
【上下都改成group就没问题了 列名里也相应改。】
共勉，共勉
[此贴子已经被作者于2013-4-20 8:23:03编辑过]
-- 发布时间：2013/4/20 7:48:00
--
[此贴子已经被作者于2013-4-20 8:23:31编辑过]