加载 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

共有3420人关注过本帖树形打印复制链接主题：加载

发财

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：六尾狐帖子：1470 积分：8981 威望：0 精华：0 注册：2013/10/24 9:12:00

加载

Post By：2014/5/21 17:08:00 [显示全部帖子]

DataTables("收购").LoadFilter = "[日期] Between #" & vars("uservdate") & "# And #" & vars("userddate") & "# "

DataTables("收购").Load()

DataTables("销售").LoadFilter = "[重量] <> 0 And [日期] Between #" & vars("uservdate") & "# And #" & vars("userddate") & "# "

DataTables("销售").Load()

为什么还是加载销售重量＝0的？其中收购是主表，销售是关联表，销售的单价是由收购的单价生成，因而必须先加载收购？

发财

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：六尾狐帖子：1470 积分：8981 威望：0 精华：0 注册：2013/10/24 9:12:00

Post By：2014/5/21 17:21:00 [显示全部帖子]

DataTables("收购").LoadFilter = "[日期] Between #" & vars("uservdate") & "# And #" & vars("userddate") & "# "

DataTables("收购").Load()

DataTables("销售").LoadFilter = "[重量] <> 0 And [日期] Between #" & vars("uservdate") & "# And #" & vars("userddate") & "# "

DataTables("销售").Load()

Tables("收购销售查询窗口_Table1").DataSource = DataTables("销售")

发财

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：六尾狐帖子：1470 积分：8981 威望：0 精华：0 注册：2013/10/24 9:12:00

Post By：2014/5/21 17:22:00 [显示全部帖子]

是不是代码：Tables("收购销售查询窗口_Table1").DataSource = DataTables("销售")的问题？

发财

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：六尾狐帖子：1470 积分：8981 威望：0 精华：0 注册：2013/10/24 9:12:00

Post By：2014/5/22 8:25:00 [显示全部帖子]

DataTables("收购").LoadFilter = "[日期] Between #" & vars("uservdate") & "# And #" & vars("userddate") & "# "

DataTables("收购").Load()

DataTables("销售").LoadFilter = "[重量] <> 0 And [日期] Between #" & vars("uservdate") & "# And #" & vars("userddate") & "# "

DataTables("销售").Load()

将上述代码分拆开，将 DataTables("收购").LoadFilter = "[日期] Between #" & vars("uservdate") & "# And #" & vars("userddate") & "# "

DataTables("收购").Load()

改为 DataTables("收购").LoadFilter = ""

DataTables("收购").Load()放在 afterload 中就可以不加载重量为空的了，为什么会出现这种情况？

发财

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：六尾狐帖子：1470 积分：8981 威望：0 精华：0 注册：2013/10/24 9:12:00

Post By：2014/5/22 8:37:00 [显示全部帖子]

分拆开，就能加载重量不等于零的了，不分拆开就全部加载，为什么？

发财

小大 6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：六尾狐帖子：1470 积分：8981 威望：0 精华：0 注册：2013/10/24 9:12:00

Post By：2014/5/26 10:31:00 [显示全部帖子]

在数据表中AfterLoad的动态数据加载

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("编号") & "'"

ids= ids.Trim(",")

DataTables("销售").LoadFilter = "编号 In (" & ids & ")"

DataTables("销售").Load()

End If

我估计应该是动态加载的影响吧？

发财

小大 7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：六尾狐帖子：1470 积分：8981 威望：0 精华：0 注册：2013/10/24 9:12:00

Post By：2014/5/26 10:34:00 [显示全部帖子]

加载收购、销售的，收购直接影响销售的加载？

发财

小大 8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：六尾狐帖子：1470 积分：8981 威望：0 精华：0 注册：2013/10/24 9:12:00

Post By：2014/5/26 14:40:00 [显示全部帖子]

估计应该行不通，如何暂停表事件，就不能同步加载销售？

发财

小大 9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：六尾狐帖子：1470 积分：8981 威望：0 精华：0 注册：2013/10/24 9:12:00

Post By：2014/5/26 15:06:00 [显示全部帖子]

对不起，我没法说明？因为加载主表，即使再加载关联表，主表仍然是先入为主？

下一主题 >> << 上一主题

主题：加载