- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 视图如何做分页加载 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=158312)
-- 发布时间：2020/11/16 10:34:00
-- 视图如何做分页加载
想对视图做分页加载，但没写好，求助。
此主题相关图片如下：图片.png
-- 发布时间：2020/11/16 10:49:00
--
建一个视图，比如视图名称：视图1，语句：Select {产品表}.产品编号,名称,sum(数量) As [入库数] From {入库表} Right JOIN {产品表} ON {产品表}.[产品编号] = {入库表}.[产品编号] Group By {产品表}.产品编号,名称
窗口表的select语句为：select * from 视图1
然后直接对窗口表分页即可：http://www.foxtable.com/webhelp/topics/2269.htm
分页按钮：
With DataTables("窗口1_Table1")
.LoadFilter = "" \'取消加载条件
.LoadTop = 3 \'每页显示3条记录
.LoadPage = 0
.LoadOver = "产品编号"
.Load()
msgbox("Totalpages: " & .Totalpages) \'这个totalpages总是弹-1,不明白原因
End With
下一页：
With DataTables("窗口1_Table1")
If .LoadPage < .TotalPages - 1 Then
.LoadPage = .LoadPage + 1
.LoadOver = "产品编号"
.Load()
End If
End With
-- 发布时间：2020/11/16 11:02:00
--
照做了，预览会报错，是内部数据源
此主题相关图片如下：图二.png
-- 发布时间：2020/11/16 11:38:00
--
为啥会报这个错呢
此主题相关图片如下：图三.png
-- 发布时间：2020/11/16 11:39:00
--
内部数据源就不能这样用了，要查几次，建议还是使用全部数据源吧
-- 发布时间：2020/11/16 14:45:00
--
正式项目是用sql数据源，例子是为了简化，用的内部数据源
刚转为外部acc数据源了，还是没写对
此主题相关图片如下：图四.png
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:视图分页测试.rar |
-- 发布时间：2020/11/16 14:46:00
--
sql数据源请直接使用视图，看2楼用法