主题：用户登录数据加载问题

在项目事件

BeforeLoadInnerTable

 

对于内部数据表

只加载业务员为登录用户的订单代码如下：

If e.DataTableName = "订单"
    e.Filter = "[业务员] = '" & e.User.Name & "'"
End If

 

 

    如果对于外部数据表，和用户自定义权限管理中，要达到以上目的，代码又应该如何编写？并放在哪个项目事件中，请教了。

好像没有看到相关说明请进一步指教

谢谢林老师！

林老师：在项目事件中我放入以下代码，输入业务员姓名运行后，表中没有加载任何记录，把业务员改成[业务员]也不行不知是什么原因？

 

 

BeforeLoadOuterTable

 

If e.DataTableName = "订单" Then
    e.SelectString = "Select * From {订单} Where 业务员 = '" & e.User.Name & "'"
End If

 

 

还是不加载登录业务员记录

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

点击浏览该文件:自定义用户登录数据加载问题.zip

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

点击浏览该文件:自定义用户登录数据加载问题.zip

请帮忙指导一下，谢了！

林老师：以下这段话不知道怎么操作，请进一步指导。

 

 

选择了用户登录以后，再在代码里设置加载的代码……

也就是说，杨刚登录后，只加载‘业务员’为杨刚的记录，其他人的记录全部不加载，以此类推。（条件是‘自定义用户管理，外部数据源’见九楼附件）。

要的就是这个效果。没有林老师搞不定的。谢谢了！

林老师:你给我修改的“自定义用户登录数据加载”附件，达到了我希望的要求，可是我发现其中以下这段代码是否有问题，在‘用户’数据库中没有"订单" 表，只有“工资单”表。但我只要把代码中的"订单" 改成“工资单”运行就出错。不知道是什么原因？

If e.DataTableName = "订单" Then
    e.SelectString = "Select * From {工资单} Where _Identify Is Null"
End If