以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  sql 数据源最好的表同步方案  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=112832)
--  作者：有点甜
--  发布时间：2018/1/3 21:53:00
--  

任何数据源都可以，试试改成

 

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