以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  追载父表的行，如何同步追载子表的行  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=151849)
--  作者：tld
--  发布时间：2020/7/5 22:21:00
--  追载父表的行，如何同步追载子表的行
老师好。用e.DataTable.LoadChildren("订单明细")可以同步加载子表数据。如果我用 DataTables("表A").AppendLoad(Filter, False) 追载数据父表后，
子表的对应行用什么方法追载好呢？
--  作者：有点蓝
--  发布时间：2020/7/5 22:31:00
--  
dim drs as list(of datarow ) = DataTables("表A").AppendLoad(Filter, False)
dim str as string
for each dr as datarow in drs
str = str & ",\'" & dr("编号") & "\'"
next
if str > "" then
str = str.trim(",")
dim f2 as string = "编号 in (" & str & ")"
DataTables("订单明细").removefor(f2)
DataTables("订单明细").AppendLoad(f2)
end if
--  作者：tld
--  发布时间：2020/7/5 23:13:00
--  
感谢篮板主！原来DataTables("表A").AppendLoad(Filter, False) 是个集合