|
![]() |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
Paging through a recordset When I want to develop an application with a lot of records to show, I make pages so I can easily navigate through the database and make the page look good and load quickly. This can be done very easily. Shall we start? Take a look at these next lines of code: If Request.QueryString("Page") = "" Then Page = 1 Else Page = Request.QueryString("Page") End If recordsToShow = 20 n = 0 These lines of code are saying if the value of Request.QueryString("Page") is without any value then page =1 else page gets the page the user requested. Recordstoshow is the number of lines in each page. N is number of records printed. Now lets put it into action: objrs.PageSize = recordsToShow (objrs is ADODB.Recordset Object) In pagesize we are telling the record set that every page will have 20 records because recordstoshow is 20. Now let’s pull out some records: Do until objrs.EOF if n = recordsToShow then exit do end if write what that you want here n=n+1 loop Now we are writing date for the database and every time that we are repeating the loop we check if we done it 20 times some when it’s 20 we will stop the loop. Now let’s write the navigation: if Page <> 1 then Response.Write "<a href=pagename.asp?currentPage=" & currentPage - 1 &">" end if Response.Write "<< Back " if Page <> 1 then Response.Write "</a>" end if \\\'------------------------- For intCount = 1 to objRs.PageCount If intCount = 1 then Response.Write " | " End If If cint(intCount) = cint(Page) then Response.Write "<font color=darkblue><b>" & intCount & "</b></font> | " Else Response.Write "<a hr ef=pagename.asp?currentPage=" & intCount & """>" & intCount & "</a> | " End If Next \\\'------------------------- if cint(page) = cint(objRs.PageCount) then Response.Write "<a href=pagename.asp?currentPage=" & currentPage + 1 & ">" end if Response.Write " Next >> " if cint(Page) = cint(objRs.PageCount) then Response.Write "</a>" end if First we are checking if the current page is not 1 so it’s more then one so we can go back. After this we need to write all of the pages in the record set. Now we need to check if we can do next. That is all! Yes it’s that easy! 返回类别: 教程 上一教程: SQL语句中的一些参数如何用变量来代替 下一教程: FILE控件如何RESET 您可以阅读与"用RECORDSET实现分页(BY DANIEL ADRIAN)"相关的教程: · 用ASP实现分页显示的具体讲解 · 在ASP中,用JSCRIPT脚本实现分页的另类办法 · 仅用XSL和ASP实现分页功能 · 用ASP实现分页的源码 · ASP中实现分页显示的七种武器 |
![]() ![]() |
快精灵印艺坊 版权所有 |
首页![]() ![]() ![]() ![]() ![]() ![]() ![]() |