If User.Name = "开发者" Or User.Name = "管理员" Then
DataTables("S迁纪录房屋").LoadFilter = filter
DataTables("S迁纪录房屋").LoadOrder="协议书编号 Desc"
DataTables("S迁纪录房屋").LoadTop= 5
DataTables("S迁纪录房屋").Load
Tables("S迁纪录房屋").sort="协议书编号"
Else
DataTables("S迁纪录房屋").loadfilter = "(乡镇 = '" & User.Name & "' or 县 = '" & User.Name & "' or 项目名称 = '" & User.Name & "') and " & Filter
DataTables("S迁纪录房屋").LoadOrder="协议书编号 Desc"
DataTables("S迁纪录房屋").LoadTop= 5
DataTables("S迁纪录房屋").Load
Tables("S迁纪录房屋").sort="协议书编号"
End If

此主题相关图片如下:1.png

此主题相关图片如下:2.png

我的分页加载有两页,第1页协议书编号是1,2,7,4,5.第2页是6.
我想实现打开项目或切换用户时,第1页是1,2,4,5,6.第2页是7
这样方便在打开最后一页时就知道当前的编号到了多少