以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  加载  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=22054)

--  作者:wilson
--  发布时间:2012/8/1 12:11:00
--  加载

求助

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

 

以下为 订单表的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
图片点击可在新窗口打开查看

--  作者:狐狸爸爸
--  发布时间:2012/8/1 14:06:00
--  

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

 

明明这样就行了:

 

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

 

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

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

 

 

 


--  作者:wilson
--  发布时间:2012/8/1 16:08:00
--  

问题已解决

非常感谢狐爸!