Foxtable(狐表)用户栏目专家坐堂 → [求助]加载行


  共有3445人关注过本帖树形打印复制链接

主题:[求助]加载行

帅哥哟,离线,有人找我吗?
有点甜
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/8/19 17:07:00 [显示全部帖子]

 

Tables("临时版本跟踪表").Filter = "状态 = 'Confirming' or 状态 = 'Bound'  or 状态 is null"
Tables("需求主表").Filter = "审核通过 = False And  审核不通过 = False"

With DataTables("需求明细表")
    .LoadFilter = "技术支持邮箱='" &  User.name & "'"
    .LoadTop = 25
    .LoadPage = 0
    .Load()
End With

Tables("临时版本跟踪表").Sort = "需求编号 DESC"
Tables("需求明细表").Sort = "需求编号 DESC"


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/8/19 17:22:00 [显示全部帖子]

 加载完以后,要重新排序一下。

 

 Tables("需求明细表").Sort = "需求编号 DESC"

 


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/8/19 17:36:00 [显示全部帖子]

 

不可能是乱的,例子发上来看。


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/8/19 17:51:00 [显示全部帖子]

 我测试了一下,你在代码加入一句代码

 

 .LoadOver = "需求编号"


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/8/19 18:00:00 [显示全部帖子]

 是,每一个按钮都要加上。

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/8/19 18:09:00 [显示全部帖子]

 有什么不对?你自己看看

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/8/19 19:08:00 [显示全部帖子]

  不明白你想说什么,第一页显示了20140832,那么第二页就从20140833开始不对么?

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/8/20 9:29:00 [显示全部帖子]

那你代码这样写

 

With DataTables("需求明细表")
     If .LoadPage <>  0  Then
        .LoadOver = "需求编号"

        .LoadOrder = "需求编号 Desc"
        .LoadTop =  25
        .LoadPage =  0
        .Load()
     End  If
 End  With
Tables("需求明细表").Sort = "需求编号 DESC"


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/8/20 9:58:00 [显示全部帖子]

 好像分页加载是有点问题。这句代码好像无效。

 

 .LoadOrder = "需求编号 Desc"

 

 你这样做,如果是倒序的话,第一页换成最后页,最后页换成第一页;上一页和下一页的代码也互换一下。


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/8/20 10:06:00 [显示全部帖子]

嗯嗯21楼正解

 回到顶部
总数 13 1 2 下一页