LOGO OA教程 ERP教程 模切知识交流 PMS教程 CRM教程 开发文档 其他文档  
 
网站管理员

[点晴永久免费OA]【ASP】一种理论上最快的Web数据库分页方法

admin
2022年7月4日 9:19 本文热度 711
下面给出了一种理论上最佳的分页方法,本篇我们就来详细说说这种最佳的分页方法。

一:构思。
  在设计Web数据库时,如果我们要编历每一条记录,那么只有采取分页模式才可以使Web数据库尽快,尽好的呈现给终端用户,也不会因为8秒原则而使用户失去浏览该页的兴趣。但是即使采取分页的办法,当出现多记录的数据库时,也难免会使我们的用户感到翻页时速度太慢。就如同我的上篇文章说的那样,几乎上一片文章的三种分页方法都有一些缺陷。那么,我们如何做到能让数据库每次就取我们需要的记录,这个很好实现,有游标返回多个记录集就可以实现,但是如果让数据库的一端不会因为要刚好检索一页的记录而大耗资源就很难了。最后,经过我的不断改写程序与测试,终于编写出了我认为理论上最快的Web数据库分页方法。

二:具体实现的存储过程。
  我们结合一个BBS问题来谈谈这种方法。如何让一个BBS每次每页只现实需要的一页记录呢?而我们需要提供给数据库有那些参数呢?可能会有以下参数。
  第一:就是我们需要的当前的页数。 
  第二:当前定义的每一页的记录集数目。这样你就可以根据需要在页面程序中修改每一页的记录数。当然,如果你不考虑程序的可扩展性,你也可以在数据库里直接规定每一页有N条记录即可。 
  第三:一个输出参数:就是从数据库里得出当前表中总记录数目的多少。(注意,他不是一个页的记录数目)他相当于ADO分页法中的Recordcount。如果你不需要总记录数目可以不用返回他。 
  我们来看具体存储过程的代码:
create PROCEDURE dbo.PRO_pageview 

  @tint_tableid tinyint=1,   --这个是BBS的当前版面Id,你可以不用管他
  @int_pagenow int=0,       
  @int_pagesize int=0, 
  @int_recordcount int=0 output  --就是得出BBS某个版面的总贴数

AS 
set nocount on 
declare @int_allid int     
declare @int_beginid int,@int_endid int  
declare @int_pagebegin int, @int_pageend int 
select @int_allid=count(*) from tab_discuss where tint_level=0 and tint_tableid=@tint_tableid 
  select @int_recordcount=@int_allid     --得出该版面的总贴数 
  declare cro_fastread cursor scroll 
  for select int_id from tab_discuss where tint_level=0 and tint_tableid=@tint_tableid order by int_id desc --这里定义游标操作,但是不用临时记录集,而且游标也不需要全部遍历所有记录
  open cro_fastread --打开游标 
  select @int_beginid=(@int_pagenow-1)*@int_pagesize+1 得出该页的第一个记录Id 
  select @int_endid = @int_beginid+@int_pagesize-1   得出该页的最后一个记录的Id 
  fetch absolute @int_beginid from cro_fastread into @int_pagebegin 将他的Id传给一个变量该页开始的Id 
  if @int_endid>@int_allid    --这里要注意,如果某一页不足固定页数的记录时;如只有一页记录,而且记录少于我们定义的数目;或者是最后一页时。
    fetch last from cro_fastread into @int_pageend  --直接将游标绝对定位到最后一条记录,得出他的id号来
  else 
    fetch absolute @int_endid from cro_fastread into @int_pageend 
select int_id,tint_level,tint_children,var_face,var_subject,datalength(txt_content) as int_len,sint_hits,var_url,var_image,var_user,dat_time,tint_tableid,bit_kernul from tab_discuss where tint_tableid=@tint_tableid and int_rootid between @int_pageend and @int_pagebegin order by int_rootid desc,num_order desc   --我们就可以利用该页的第一个id和最后一个id得出中间的id来。。。。(注意。我们这个BBS的数性结构用了一种很巧妙的算法,就是用一个orderNum浮点数即可完成排序。。。) 

--开始清场。。。 
  close cro_fastread      
  deallocate cro_fastread 
  return 

我们再看看Asp页面里的程序操作:
pagenow=cint(request("pagenow")) --当前的页面。 
if pagenow<=0 then pagenow=1 
pagesize=10 
set cmd=server.createObject("adodb.command") 
cmd.ActiveConnection=strconn 
cmd.CommandType=4 
cmd.CommandText="pro_pageview" 
cmd.Parameters.Append cmd.createParameter("tint_tableid",adInteger,adParamInput,,tint_tableid) 
cmd.Parameters.Append cmd.createParameter("int_pagenow",adInteger,adParamInput,,pagenow) 
cmd.Parameters.Append cmd.createParameter("int_pagesize",adInteger,adParamInput,,pagesize) 
cmd.Parameters.Append cmd.createParameter("int_recordcount",adInteger,adParamOutput) 
set rs=cmd.execute 
if rs.eof then 
  Response.Write "目前已超过了记录个数或记录集为空!" 
  Response.End 
end if 
dim arrRs 
arrRs=rs.getrows   '可以利用getRows将记录集迅速保存到一个二维的数组中来提高速度。 
recordcount=cmd.Parameters("int_recordcount") 
'注意,当记录不足以刚好整除单位页记录时,我们也要将其定义为一页,如记录数目为2页多一个记录,此时我们的页数也要为3页记录。 
if (recordcount mod pagesize)=0 then 
  pagecount=recordcount\pagesize 
else 
  pagecount=recordcount\pagesize+1 
end if 

<--分页开始 --> 
<!-- #include file="include\tablepage.asp" -->固定的分页函数,其实无非是pagenow+1或pagenow-1,pagenow,pagecount 
<!--分页结束--> 

<div align="left" class="pblank" > 
<% 
'---------显示树性结构!------------- 
level=0 
Response.Write "<ul>" 
for i=0 to ubound(arrRs,2) 
  if arrRs(1,i)>level then 
    Response.Write "<ul>" 
  end if 
  if arrRs(1,i)<level then 
    for j=arrRs(1,i) to level-1 
      Response.Write "</ul>" 
    next 
  end if 
  int_size=arrRs(5,i) 
  if int_size=0 then 
    str_size=" <无内容>" 
  else 
    str_size="" 
  end if 
  Response.Write "<li><img src=face\"&arrRs(3,i)&"><a href=showTitle.asp?int_id="&arrRs(0,i)&"&tint_tableid="&tint_tableid&" class=ptitle target=BoardAnnounce>"&server.HTMLEncode(arrRs(4,i))&"</a> "&str_size 
  if arrRs(7,i)<>"" then Response.Write " <连接> " 
  if arrRs(8,i)<>"" then Response.Write " <图像> " 
  Response.Write "   -【"&arrRs(9,i)&"】 <font color=444444>"&arrRs(10,i)&"</font> [<font color=920092>ID:"&arrRs(0,i)&" 点击:"&arrRs(6,i)&"次</font>] <font color=444444>("&int_size&"字节)</font> <font color=ff0000>("&arrRs(2,i)&")</font></li>" 
  level=arrRs(1,i) 
next 

Response.Write "</ul>" 
'---------显示树性结构完毕!------------- 
%> 
</div> 
<div align="left"> 
<!--分页开始 --> 
<!-- #include file="include\tablepage.asp" --> 
<!--分页结束--> 
</div> 
<!-- 清场与除错 --> 
<% 
rs.close 
set rs=nothing 
set cmd=nothing 
if err.number<>0 then Response.Redirect "bug.asp" 
%> 

三:特点 
  我们来看看他和传统的三种方法的区别与特点 
  第一:每次只传回一页记录,而且只形成一个记录集,而且客户端可以采用速度最快的火线游标来完成页面输出。而不必像传统的游标法用rs.nextrecordset记录来输出记录。 
  第二:数据库没有用到临时表,这样比转储记录集的速度大大提高。 
  第三:采用一个滚动游标,而且游标只经过二个操作就完成定位。速度也大大提高。 
   
  当我采用了这种分页方法时,已经可以明显的感觉出分页速度的提高了。当然,在处理树型结构,数据库运算时,我采用了许多方法尽可能的提高速度,如:采用二分区间法来编历树型结构,全部采用存储过程来实现一切sql操作,采用触发器和数据库游标来完成数据库算法,这样就尽量避免过多的网络传输。任何操作只和数据库进行一次参数传递就可以完成。 

该文章在 2022/7/4 9:19:32 编辑过
关键字查询
相关文章
正在查询...
点晴ERP是一款针对中小制造业的专业生产管理软件系统,系统成熟度和易用性得到了国内大量中小企业的青睐。
点晴PMS码头管理系统主要针对港口码头集装箱与散货日常运作、调度、堆场、车队、财务费用、相关报表等业务管理,结合码头的业务特点,围绕调度、堆场作业而开发的。集技术的先进性、管理的有效性于一体,是物流码头及其他港口类企业的高效ERP管理信息系统。
点晴WMS仓储管理系统提供了货物产品管理,销售管理,采购管理,仓储管理,仓库管理,保质期管理,货位管理,库位管理,生产管理,WMS管理系统,标签打印,条形码,二维码管理,批号管理软件。
点晴免费OA是一款软件和通用服务都免费,不限功能、不限时间、不限用户的免费OA协同办公管理系统。
Copyright 2010-2024 ClickSun All Rights Reserved