- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 最多加载X个数据，怎么做？ (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=27432)
-- 发布时间：2012/12/31 22:47:00
-- 最多加载X个数据，怎么做？
Forms("入库明细历史查询").Open()
Dim r As Integer
r=Tables("入库单.入库明细").Current("商品编码")
Tables("入库明细历史查询_入库单明细统计").Filter = "商品编码 =\'" & r & "\'"
Tables("入库明细历史查询_入库单明细统计").Sort = "日期 DESC"
以上代码达到“最多加载10个数据”的话，怎么修改？
-- 发布时间：2013/1/1 0:27:00
--
合理利用查询表
-- 发布时间：2013/1/1 0:51:00
--
不知道怎么用？
-- 发布时间：2013/1/1 10:39:00
--
合理利用查询表
此主题相关图片如下：1234.jpg
-- 发布时间：2013/1/4 9:06:00
--
楼主Filter是筛选，不是加载。
加载的话，最好看看《开发指南》下《动态加载》这一章。
例如加载PD01产品的前10个订单：
DataTables("订单").LoadTop = "10"
DataTables("订单").LoadOrder = "日期 Desc"
DataTables("订单").LoadFilter = "产品 = \'PD01\'"
DataTables("订单").Load
-- 发布时间：2013/1/4 22:19:00
--
表“入库单明细统计”是查询表，不知道怎处理，table又没有“top”
-- 发布时间：2013/1/4 22:21:00
--
现在只能用时间来限制加载的数据量，
Dim StartDate As Date = Date.Today().AddDays(-30)
Tables("出库明细历史查询_出库单明细统计").Filter = "商品编码 =\'" & r & "\' and 日期 > #" & StartDate & "#"
-- 发布时间：2013/1/4 22:25:00
--
楼主的代码明显是筛选代码，怎么变加载了？？？
-- 发布时间：2013/1/4 22:38:00
--
想查询表里面筛选
查询表使用“foxtabel”生成的
-- 发布时间：2013/1/5 11:58:00
--
Forms("入库明细历史查询").Open()
Dim r As Integer
r=Tables("入库单.入库明细").Current("商品编码")
Tables("入库明细历史查询_入库单明细统计").Filter = "商品编码 =\'" & r & "\'"
Tables("入库明细历史查询_入库单明细统计").Sort = "日期 DESC"
以上代码达到“最多加载10个数据”的话，怎么修改？
对于筛选出10个数据行的话，就必须要知道第十行的_sortkey，然后根据这个_sortkey进行一次筛选。