< 返回技术文档列表

如何修复叶子ASP分页类Bug

发布时间:2021-11-06 23:58:21

本篇内容介绍了“如何修复叶子ASP分页类Bug”的有关知识,在实际案例的操作过程中,不少人都会遇到这样的困境,接下来就让小编带领大家学习一下如何处理这些情况吧!希望大家仔细阅读,能够学有所成!

  1'此处是为了修正access记录多并且最后一页只有一条记录则报Eof的bug,坏处就是最后一页会显示2条=___=

  2IfiPageIndex>1AndiPageIndex=iPageCountAnd(iRecordCountModiPageSize=1)Then

  3Rs.AbsolutePosition=(iPageIndex-1)*iPageSize

  4Else

  5Rs.AbsolutePosition=(iPageIndex-1)*iPageSize+1

  6EndIf

  方法一:使用静态游标(即oConn,1,1改为oConn,3,1)viewsourceprint?1SetRs=Server.CreateObject("Adodb.RecordSet")

  2Rs.Open"SELECT"&sField&"FROM"&sTable&""&sCondition&""&sOrderBy,oConn,3,1,&H0001

  3'此处是为了修正access记录多并且最后一页只有一条记录则报Eof的bug,坏处就是最后一页会显示2条

  4Rs.AbsolutePosition=(iPageIndex-1)*iPageSize+1

  叶子ASP分页类Bug怎么修复

  方法二:viewsourceprint?1SetRs=Server.CreateObject("Adodb.RecordSet")

  2Rs.Open"SELECT"&sField&"FROM"&sTable&""&sCondition&""&sOrderBy,oConn,1,1,&H0001

  3'此处是为了修正access记录多并且最后一页只有一条记录则报Eof的bug,坏处就是最后一页会显示2条=___=

  4IfiPageIndex>1andiPageIndex=iPageCountThen

  5Rs.Move(iPageIndex-1)*Clng(iPageSize)

  6EndIf

  7Rs.AbsolutePosition=(iPageIndex-1)*iPageSize+1

“如何修复叶子ASP分页类Bug”的内容就介绍到这里了,感谢大家的阅读。如果想了解更多行业相关的知识可以关注血鸟云网站,小编将为大家输出更多高质量的实用文章!


/template/Home/Zkeys/PC/Static