需求：
因为派发工序表里面的记录很多，希望点按钮后只加载订单号='" & Tables("分派工序_table2").current("订单号")的订单，可是打开还是很慢，是怎么回事
BeforeLoadOuterTable加了如下代码：
Select Case e.DataTableName
Case "用户表","账套管理","账号部门","权限表"
If e.DataTableName = "派发工序表" Then
e.Cancel = True '打开项目的时候不加载此表
e.SelectString = "Select * F rom {派发工序表} Where 订单号='" & Tables("分派工序_table2").current("订单号") & "'" '设置加载条件,注意如果主键不是_Identify,请改为实际的主键名称
End If
Case "报价单",
e.Cancel = True
Case Else '其他所有表默认都不加载
e.Cancel = True
End Select
按钮代码：
If DataTables.Contains("派发工序表") = False Then '如果表C没有加载
DataTables.Load("派发工序表") '加载表C
End If
forms("修改已扫码").show
加好友 
发短信
Post By：2019/6/17 21:35:00 [显示全部帖子]
