以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助] 父表与子表不能同步加载?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=22768)

--  作者:lsf5138
--  发布时间:2012/8/23 13:28:00
--  [求助] 父表与子表不能同步加载?

请帮忙看一下,谢谢!

订单管理是主表 订单色组是子表 这两个表有示例记录 定量加载每页20条订单管理记录 订单色组没有同步加载记录  

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:生产管理_a0823.zip

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:生产管理.rar

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:用户.rar

[此贴子已经被作者于2012-8-23 13:31:12编辑过]

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

你的订单条码是个字符型,字符型要用单引号:

 

If DataTables("订单管理").DataRows.Count = 0 Then \'如果订单表没有数据
    DataTables("订单色组").LoadFilter = "订单条码 Is Null" \'不加载订单明细
Else
    Dim ids As String
    For Each dr As DataRow In DataTables("订单管理").DataRows
        ids = ids & ",\'" & dr("订单条码") & "\'"
    Next
    ids= ids.Trim(",")
    DataTables("订单色组").LoadFilter = "订单条码 In (" & ids & ")"
End If
DataTables("订单色组").Load()