老师还有一个问题，比如窗口的AFTERLOAD代码是：
Syscmd.Project.Load()
Select Case User.Group
Case "总部"
CustomFilter = "1 = 1"
Case Else
Select Case User.Roles
Case "区域主管"
CustomFilter = "分区 = '"& User.Group &"'"
Case "专卖店店长"
CustomFilter = "分区 = '"& User.Group &"' And 客户编码 = '"& User.Name &"'"
End Select
End Select
窗口TIMESTICK代码是：
Static i As Integer
i + = 1
If i > 0 Then
e.Form.TimerEnabled = False
For Each s As String In "经销商信息|专卖店目标|专卖店签约|专卖店人员|目标|专卖店零售额|专卖店人员目标|订单|个案申请".Split("|")
e.Form.Controls("Label1").Text = "正在加载【" & s & "】表...请稍候"
Application.DoEvents
DataTables(s).LoadFilter = CustomFilter
DataTables(s).Load
e.Form.Controls("Label1").Text = ""
Next
End If
e.Form.Close()
这样的话，点击按钮就会从这些表（"经销商信息|专卖店目标|专卖店签约|专卖店人员|目标|专卖店零售额|专卖店人员目标|订单|个案申请")中加载不同分区或不同专卖店自身的数据。。。。。
但是我的项目不只这样表，比如：还有（人员|产品vlookup|文具领用|文具明细|行政区域|文件管理|企业信息|）等表，但是这样表不需要加载筛选，所用用户都可以看。。。。那如何使这样的话，我上面的代码应该怎么样修改比较合适？？？
我在BeforeLoadOuterTable设置的代码是
For Each s As String In "人员|产品vlookup|文具领用|文具明细|行政区域|文件管理|企业信息|经销商信息|专卖店目标|专卖店签约|专卖店人员|目标|专卖店零售额|专卖店人员目标|订单|个案申请".Split("|")
If e.DataTableName = s Then
e.SelectString = "Select * From {" & s & "} Where [_Identify] Is Null"
End If
Next
加好友 
发短信
Post By：2014/5/1 9:28:00 [只看该作者]
此主题相关图片如下：360截图20140501093448620.jpg
