主题：新人求助 急急急 【已解决】

我建立了一个用户组：业务员

还建立了一个表：客户资料

客户资料的：所属顾问就是业务员名字

 

我想实现的功能是 业务员登陆这个客户资料表 只显示属于此业务员的行（也就说只显示列“所属顾问”数据为此登陆业务员名的行）

 

我用如下代码无法实现 亲大家帮忙看看 不胜感激 例子在附件 麻烦大神帮忙看下！！

 

我在表事件beforeload 添加了如下代码

If User.Group = "业务员" '
    Dim fl As String = "[所属顾问] = '" & User.Name & "'"
    If e.DataTable.LoadFilter = "" Then
        e.DataTable.LoadFilter = fl
    ElseIf e.DataTable.LoadFilter.IndexOf(fl) < 0 Then '

        e.DataTable.LoadFilter = e.DataTable.Loadfilter & " And " & fl
    End If
End If

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目3.rar

 

PS 谢谢下面回复我的朋友 最后我是在帮助里面找到的 用

LoadUserSetting

这个事件和代码

 

If User.Group = "765" Then
DataTables("订单").LoadFilter = ""
Else
DataTables("客户资料").LoadFilter = "所属顾问 = '" & User.Name & "'"
End If
DataTables("客户资料").Load()

是啊 代码应该没问题的 就是不执行 汗

附件已上传 您帮忙看下 谢谢啦！！！！！

非常感谢楼上的朋友:-)

用这个事件可以实现我说的功能 不过只能以用户名来过滤 我用管理员登陆也看不到所有业务员的资料，我想用用户组来过滤 怎么实现呢，就是如果登陆用户是“业务员”组的用户 那就就只加载这个业务员下面的客户资料 如果登陆的用户是管理员则加载所有客户资料

 

盼回复！