- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助] 关联表加载问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=120355)
-- 发布时间：2018/6/13 13:41:00
-- [求助] 关联表加载问题
表A 是父表 表B是子表
表A 的afterload 里面代码：
If DataTables("表A").DataRows.Count = 0 Then \'如果表A表没有数据
DataTables("表B").LoadFilter = "第一列 Is Null" \'不加载表B
Else
Dim ids As String
For Each dr As DataRow In DataTables("表A").DataRows
ids = ids & ",\'" & dr("第一列") & "\'"
Next
ids= ids.Trim(",")
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目2.foxdb |
DataTables("表B").LoadFilter = "第一列 In (" & ids & ")"
End If
DataTables("表B").Load()
现在的问题是，如果在表B上设置了分页加载树。后面几页的信息，就不能加载到父表的关联表中。应该如何处理呢。
如果吧表B的 afterload 和afterfilter 里面都加上上面的代码的话，好像也不行。
-- 发布时间：2018/6/13 14:29:00
--
DataTables("表B").Load()
改成
DataTables("表B").Loadtop = ""
DataTables("表B").LoadPage = 0
DataTables("表B").Load