以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  这个还没更正  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=11804)

--  作者:ybil
--  发布时间:2011/8/12 11:03:00
--  这个还没更正

图片点击可在新窗口打开查看此主题相关图片如下:001.gif
图片点击可在新窗口打开查看

--  作者:ybil
--  发布时间:2011/8/12 11:17: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()



上面的AfterLoad事件没有判断父表数据为空时(否则报错)的情况



--  作者:狐狸爸爸
--  发布时间:2011/8/12 11:37:00
--  

呵呵,收到。

 

图片点击可在新窗口打开查看