出了一种理论上最佳的分页方法,本篇我们就来详细说说这种最佳的分页方法。
一：构思。
在设计Web数据库时，如果我们要编历每一条纪录，那么只有采取分页模式才可以使Web数据库尽快，尽好的呈现给终端用户，也不会因为8秒原则而使用户失去浏览该页的兴趣。但是即使采取分页的办法，当出现多纪录的数据库时，也难免会使我们的用户感到翻页时速度太慢。就如同我的上篇文章说的那样，几乎上一片文章的三种分页方法都有一些缺陷。那么，我们如何做到能让数据库每次就取我们需要的纪录，这个很好实现，有游标返回多个纪录集就可以实现，但是如果让数据库的一端不会因为要刚好检索一页的纪录而大耗资源就很难了。最后，经过我的不断改写程序与测试，终于编写出了我认为理论上最快的Web数据库分页方法。
二：具体实现的存储过程。
我们结合一个BBS问题来谈谈这种方法。如何让一个BBS每次每页只现实需要的一页纪录呢？而我们需要提供给数据库有那些参数呢？可能会有以下参数。
第一：就是我们需要的当前的页数。
第二：当前定义的每一页的纪录集数目。这样你就可以根据需要在页面程序中修改每一页的纪录数。当然，如果你不考虑程序的可扩展性，你也可以在数据库里直接规定每一页有N条纪录即可。
第三：一个输出参数：就是从数据库里得出当前表中总纪录数目的多少。（注意，他不是一个页的纪录数目）他相当于ADO分页法中的Recordcount。如果你不需要总纪录数目可以不用返回他。
我们来看具体存储过程的代码。。。
CREATEPROCEDUREdbo.PRO_pageview
(
@tint_tableidtinyint=1,--这个是BBS的当前版面Id，你可以不用管他。。
@int_pagenowint=0,
@int_pagesizeint=0,
@int_recordcountint=0output--就是得出BBS某个版面的总贴数。。
)
AS
setnocounton
declare@int_allidint
declare@int_beginidint,@int_endidint
declare@int_pagebeginint,@int_pageendint
select@int_allid=count(*)fromtab_discusswheretint_level=0andtint_tableid=@tint_tableid
select@int_recordcount=@int_allid--得出该版面的总贴数
declarecro_fastreadcursorscroll
forselectint_idfromtab_discusswheretint_level=0andtint_tableid=@tint_tableidorderbyint_iddesc--这里定义游标操作，但是不用临时纪录集，而且游标也不需要全部遍历所有纪录集。
opencro_fastread--打开游标
select@int_beginid=(@int_pagenow-1)*@int_pagesize+1得出该页的第一个纪录Id
select@int_endid=@int_beginid+@int_pagesize-1得出该页的最后一个纪录的Id
fetchabsolute@int_beginidfromcro_fastreadinto@int_pagebegin将他的Id传给一个变量该页开始的Id
if@int_endid>@int_allid--这里要注意，如果某一页不足固定页数的纪录时。如只有一页纪录，而且纪录少于我们定义的数目。或者是最后一页时。。。
fetchlastfromcro_fastreadinto@int_pageend--直接将游标绝对定位到最后一条纪录，得出他的id号来。。。
else
fetchabsolute@int_endidfromcro_fastreadinto@int_pageend
selectint_id,tint_level,tint_children,var_face,var_subject,datalength(txt_content)asint_len,sint_hits,var_url,var_image,var_user,dat_time,tint_tableid,bit_kernulfromtab_discusswheretint_tableid=@tint_tableidandint_rootidbetween@int_pageendand@int_pagebeginorderbyint_rootiddesc,num_orderdesc--我们就可以利用该页的第一个id和最后一个id得出中间的id来。。。。（注意。我们这个BBS的数性结构用了一种很巧妙的算法，就是用一个orderNum浮点数即可完成排序。。。）
--开始清场。。。
closecro_fastread
deallocatecro_fastread
return
我们再看看Asp页面里的程序操作。。。
pagenow=cint(request("pagenow"))--当前的页面。
ifpagenow<=0thenpagenow=1
pagesize=10
setcmd=server.CreateObject("adodb.command")
cmd.ActiveConnection=strconn
cmd.CommandType=4
cmd.CommandText="pro_pageview"
cmd.Parameters.Appendcmd.CreateParameter("tint_tableid",adInteger,adParamInput,,tint_tableid)
cmd.Parameters.Appendcmd.CreateParameter("int_pagenow",adInteger,adParamInput,,pagenow)
cmd.Parameters.Appendcmd.CreateParameter("int_pagesize",adInteger,adParamInput,,pagesize)
cmd.Parameters.Appendcmd.CreateParameter("int_recordcount",adInteger,adParamOutput)
setrs=cmd.Execute
ifrs.eofthen
Response.Write"目前已超过了纪录个数或纪录集为空！"
Response.End
endif
dimarrRs
arrRs=rs.getrows'可以利用getRows将纪录集迅速保存到一个二维的数组中来提高速度。
recordcount=cmd.Parameters("int_recordcount")
'注意，当纪录不足以刚好整除单位页纪录时，我们也要将其定义为一页，如纪录数目为2页多一个纪录，此时我们的页数也要为3页纪录。
if(recordcountmodpagesize)=0then
pagecount=recordcountpagesize
else
pagecount=recordcountpagesize+1
endif
<--分页开始-->
<>固定的分页函数，其实无非是pagenow+1或pagenow-1,pagenow,pagecount
<>
<divalign="left"class="pblank">
<%
'---------显示树性结构！-------------
level=0
Response.Write"<ul>"
fori=0toubound(arrRs,2)
ifarrRs(1,i)>levelthen
Response.Write"<ul>"
endif
ifarrRs(1,i)<levelthen
forj=arrRs(1,i)tolevel-1
Response.Write"</ul>"
next
endif
int_size=arrRs(5,i)
ifint_size=0then
str_size="<无内容>"
else
str_size=""
endif
Response.Write"<li><imgsrc=face"&arrRs(3,i)&"><ahref=showTitle.asp?int_id="&arrRs(0,i)&"&tint_tableid="&tint_tableid&"class=ptitletarget=BoardAnnounce>"&server.HTMLEncode(arrRs(4,i))&"</a>"&str_size
ifarrRs(7,i)<>""thenResponse.Write"<连接>"
ifarrRs(8,i)<>""thenResponse.Write"<图像>"
Response.Write"-【"&arrRs(9,i)&"】<fontcolor=444444>"&arrRs(10,i)&"</font>[<fontcolor=920092>ID:"&arrRs(0,i)&"点击:"&arrRs(6,i)&"次</font>]<fontcolor=444444>("&int_size&"字节)</font><fontcolor=ff0000>("&arrRs(2,i)&")</font></li>"
level=arrRs(1,i)
next
Response.Write"</ul>"
'---------显示树性结构完毕！-------------
%>
</div>
<divalign="left">
<>
<>
<>
</div>
<>
<%
rs.close
setrs=nothing
setcmd=nothing
iferr.number<>0thenResponse.Redirect"bug.asp"
%>
三：特点
我们来看看他和传统的三种方法的区别与特点
第一：每次只传回一页纪录，而且只形成一个纪录集，而且客户端可以采用速度最快的火线游标来完成页面输出。而不必像传统的游标法用rs.nextrecordset纪录来输出纪录。
第二：数据库没有用到临时表，这样比转储纪录集的速度大大提高。
第三：采用一个滚动游标，而且游标只经过二个操作就完成定位。速度也大大提高。
当我采用了这种分页方法时，已经可以明显的感觉出分页速度的提高了。当然，在处理树型结构，数据库运算时，我采用了许多方法尽可能的提高速度，如：采用二分区间法来编历树型结构，全部采用存储过程来实现一切sql操作，采用触发器和数据库游标来完成数据库算法，这样就尽量避免过多的网络传输。任何操作只和数据库进行一次参数传递就可以完成。
感兴趣的朋友可以到我的论坛来看看:http://tec.xj169.net/bbs
【一种理论上最快的Web数据库分页方法】相关文章：
★ ASP利用adodb.stream下载文件但不打开的方法