主题：[求助]新增关联表记录时的问题

1、关联表，并不能在两个窗口同时显示，你用的肯定不是关联表；

2、表名写错。

第二个问题 PrepareEdit事件

e.Table.Cols("产品名称").ComboList = DataTables("产品资料表").GetComboListString("产品名称")

AfterLoad事件，加入代码

If Tables("合同一览表").current IsNot Nothing
    Forms("合同一览窗口").Controls("Table2").Table.Filter = "合同编号 = '" & Tables("合同一览表").current("合同编号") & "'"
Else
    Forms("合同一览窗口").Controls("Table2").Table.Filter = "1=2"
End If

1、新增的窗口；

2、打开后肯定在第一条位置；

3、合同一览表currentChanged事件

If Forms("合同一览窗口").Opened Then
    If e.Table.current IsNot Nothing
        Forms("合同一览窗口").Controls("Table2").Table.Filter = "合同编号 = '" & e.Table.current("合同编号") & "'"
    Else
        Forms("合同一览窗口").Controls("Table2").Table.Filter = "1=2"
    End If
End If

写错了，AfterClose事件

If Tables("合同一览表").current IsNot Nothing
    Forms("合同一览窗口").Controls("Table2").Table.Filter = "合同编号 = '" & Tables("合同一览表").current("合同编号") & "'"
Else
    Forms("合同一览窗口").Controls("Table2").Table.Filter = "1=2"
End If

回复全部楼上，测试的时候，尽量不要用预览来测试。

但我直接预览，确实是不会出错啊。

------------------------------------

认认真真看完全部的帖子和我发的例子。