主题：加载

求助

如何实现当选择订单表的行，关联表如何加载本订单的所有行 “订单.订单明细表“

 

以下为 订单表的AfterLoad事件中加入以下代码，无法加载关联行，且点击加载树提示错误

Dim ddb As String = Tables("订单").Current("订单号")
Dim cmd As New SQLCommand
Dim ndj As Table
cmd.

cmd.CommandText = "SELECT * FROM {订单明细表} Where 订单号 = '" & ddb & "'"
ndj = cmd.ExecuteScalar
DataTables("订单.订单明细表").Load()

此主题相关图片如下：捕获3.png

你搞得这么复杂干什么？ 从谁这里学的？ 依葫芦画瓢，也不至于画成这样啊？

 

明明这样就行了：

 

Dim ddb As String = Tables("订单").Current("订单号")
DataTables("订单明细").LoadFilter = "订单号 = '" & ddb & "'"
DataTables("订单明细表").Load()

 

建议看看关联表同步加载：

http://www.foxtable.com/help/topics/2228.htm

 

 

 

问题已解决

非常感谢狐爸！