以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  怎样实现后台数据重新排序  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=114500)

--  作者:aza520
--  发布时间:2018/2/7 17:50:00
--  怎样实现后台数据重新排序
我是分页加载数据,多用户录入数据时,数据编号会乱,怎样实现打开项目时和切换用户后,所有数据进行重新排序分页加载?
--  作者:有点甜
--  发布时间:2018/2/7 18:06:00
--  

1、你是如何编号的?怎么写代码?贴出来

 

2、你说的重新排序分页加载什么意思?截图说明


--  作者:aza520
--  发布时间:2018/2/7 19:10:00
--  

我在AfterOpenProject事件设如下代码:
With DataTables("S迁纪录房屋")
    .LoadFilter = "" \'一定要清除加载条件
    .LoadTop = 5
    .LoadPage = 0
    .Load()
End With

窗口加载树事件设:
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
这样方便在打开最后一页时就知道当前的编号到了多少

--  作者:有点甜
--  发布时间:2018/2/7 20:24:00
--  

如果分页加载,你应该指定loadover

 

DataTables("S迁纪录房屋").LoadOver="协议书编号"
DataTables("S迁纪录房屋").LoadReverse
DataTables("S迁纪录房屋").LoadTop= 5
DataTables("S迁纪录房屋").Load