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

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 分页倒序加载的问题

共有1899人关注过本帖树形打印复制链接主题：分页倒序加载的问题

凡夫俗子

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

加好友

发短信

等级：一尾狐帖子：457 积分：3523 威望：0 精华：0 注册：2016/1/22 18:17:00

分页倒序加载的问题 发帖心情

Post By：2016/3/21 13:36:00 [只看该作者]

此主题相关图片如下：123123123123.png

分页倒序加载的问题

With DataTables("窗口2_Table1")

If .LoadPage <> 0 Then

.LoadOrder = "第一列 desc"

.LoadReverse = True

.LoadPage = 0

.Load

End If

Tables("窗口2_Table1").sort="第一列 desc"

Dim nb1 As WinForm.NumericComboBox = e.Form.Controls("NumericComboBox1")

Dim nb2 As WinForm.NumericComboBox = e.Form.Controls("NumericComboBox2")

nb1.Value = .LoadPage + 1

nb2.Value = .TotalPages

End With

已设置

.LoadOrder = "第一列 desc"

.LoadReverse = True

这样可以实现倒序加载分页

但是在每一页里的数据又是升序加载的，如何也倒序加载呢

目前好像只能设置 Tables("窗口2_Table1").sort 的排序方式，那么界面上会有个箭头，不想用这种方式，如何做到。

大红袍

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

加好友

发短信

等级：贵宾帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00

Post By：2016/3/21 14:18:00 [只看该作者]

AfterLoad事件

Tables("窗口2_Table1").Fill("Select _Identify, 第一列 As _Sortkey, 第一列, 第二列, 第三列 f rom {表A}", "数据源", False)

凡夫俗子

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

加好友

发短信

等级：一尾狐帖子：457 积分：3523 威望：0 精华：0 注册：2016/1/22 18:17:00

Post By：2016/3/21 15:45:00 [只看该作者]

AfterLoad事件

Tables("窗口2_Table1").Fill("Select _Identify, 第一列 As _Sortkey, 第一列, 第二列, 第三列 f rom {表A}", "数据源", False)

经测试不行：这一句只要放上 _Identify 就报错

第一列 As _Sortkey 可以用上，但没效果，实际原数据表中也不缺少 _Sortkey 列

看来是官方的倒序加载的每一页中的加载顺序并不是倒序而还是升序

大红袍

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

加好友

发短信

等级：贵宾帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00

Post By：2016/3/21 15:56:00 [只看该作者]

哦，写错了，要这样写

Tables("窗口1_Table1").Fill("Select [_Identify], -1 * (第一列) As _Sortkey, 第一列, 第二列, 第三列 f rom {表A}", "数据源", False)

凡夫俗子

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

加好友

发短信

等级：一尾狐帖子：457 积分：3523 威望：0 精华：0 注册：2016/1/22 18:17:00

Post By：2016/3/21 17:48:00 [只看该作者]

思路够牛。不过这属于偏方，非常规解决方法

但这么一个简单的需求，要这样去弄，稍显复杂，希望官方能在FOXTABLE内总加载机制上进行解决方好

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

主题：分页倒序加载的问题