以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]加载条件代码  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=17826)
--  作者：红叶
--  发布时间：2012/3/26 10:58:00
--  [求助]加载条件代码

示例一

假定有两个表，分别是订单和订单明细，两者通过"订单ID"列关联起来，订单是父表，订单明细是子表，因为每个订单对应有若干订单明细。
由于数据量比较大，决定采用动态加载，每次只加载一定数量的订单进行处理，显然作为一个合格的系统，应该同时加载这些订单的订单明细。

要完成这样的任务很简单，只需在订单表的AfterLoad事件中加入以下代码即可：

Dim ids As String
For Each dr As DataRow In DataTables("订单").DataRows
    ids = ids & "," & dr("订单ID")
Next
ids= ids.Trim(",")
DataTables("订单明细").LoadFilter = "订单ID In (" & ids & ")"
DataTables("订单明细").Load()

以上实例的 订单ID 是整数 型的，如果 订单ID是字符型的，以上代码应如何改？
--  作者：狐狸爸爸
--  发布时间：2012/3/26 11:06:00
--  

字符型的，这里有个例子：

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