主题：明细追载报错

订单号是合成的编码

Dim Filter As String = "订单号 = " & e.Table.Current("订单号")

 

改成

 

Dim Filter As String = "订单号 = '" & e.Table.Current("订单号") & "'"

老师  现在可以不回报错了 但是  我是多级关联  

对应的，也把其它表的数据动态加载进来，比如

 

DataTables("产品").LoadFilter = "xxxxx"

DataTables("产品").Load

 

或者 http://www.foxtable.com/webhelp/scr/2894.htm

 

在区域表的AfterLoad事件加上代码：

e.DataTable.LoadChildren("产品")

CurrentChanged  

If e.Table.Current IsNot Nothing Then

    Dim Filter As String = "区域号 = '" & e.Table.Current("区域号") & "'"

    If  DataTables("产品").Find(Filter) Is Nothing Then '如果对应的订单明细没有加载过

        DataTables("产品").AppendLoad(Filter) '则追载此订单的订单明细

    End If

End If

都不行   如何是好
此主题相关图片如下：qq截图20160801152057.png

先试试这样

 

If e.Table.Current IsNot Nothing Then    
    Dim Filter As String = "区域号 = '" & e.Table.Current("区域号") & "'"
    DataTables("产品").RemoveFor(filter)
    DataTables("产品").AppendLoad(Filter) '则追载此订单的订单明细
End If

那就这样写

 

If e.Table.Current IsNot Nothing Then    
    Dim Filter As String = "区域号 = '" & e.Table.Current("区域号") & "'"
    DataTables("产品").LoadFilter = Filter

    DataTables("产品").Load
End If

还是不会加载  是不是  窗口关联表的原因   追载不成功  还是默认加载的那些行  不会将后台的加载进来