ASP中记录的分页

原创 2004年06月08日 09:56:00

今天又遇到一个网友问DataGrid分页的问题,很明显这位网友也是初学ASP。其实许多刚入门的朋友经常会因为遇到这样的小问题着急得很,花费很长时间来解决,特别是身边又没有朋友可以讨论的时候,那种心情我是理解的,鉴于这种情况,我打算把我写的一个同学录中的一个页面发布出来,这个页面主要涉及到DataGrid分页问题。希望我们小菜鸟一族共同进步,争取早日不菜,呵呵。

好了,闲话少说,下面就是代码了:

<!--#include file="dbconn.asp"-->

<body bgcolor="#b9befb">
<center><font face="Times New Roman"><b>联系人</b></font></center>
<a href="mnew.asp"><font size="2">添加</font></a><font size="2"><br>
</font>
<%
sql="select * from mates order by name"
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,1
session("name")=rs("name")
if not rs.eof then
rs.pagesize=2
page=request.querystring("currentpage")
if page="" then page=1
rs.AbsolutePage=cint(page)
%>
<div align="center">
  <center>
<table border="1" cellpadding="0" cellspacing="0" width="100%">
 <tr align="center">
  <td><font size="2">姓名</font></td>
  <td><font size="2">性别</font></td>
  <td><font size="2">家庭电话</font></td>
  <td><font size="2">办公电话</font></td>
  <td><font size="2">移动电话</font></td>
  <td><font size="2">居住地址</font></td>
  <td><font size="2">公司名称</font></td>
  <td><font size="2">公司地址</font></td>
  <td><font size="2">职位</font></td>
  <td colspan=2><font size="2">操作</td>
 </tr>
<%do while not rs.eof and size<rs.pagesize%> </font>
<tr align="center" font size=2>
<td><font size="2">
<%=rs("name")%> </font> </td>
<td><font size="2">
<%=rs("sex")%></font> </td>
<td><font size="2">
<%=rs("home_tel")%> </font> </td>
<td><font size="2">
<%=rs("company_tel")%> </font> </td>
<td><font size="2">
<%=rs("mobile")%> </font> </td>
<td><font size="2">
<%=rs("home_address")%> </font> </td>
<td><font size="2">
<%=rs("company_name")%> </font> </td>
<td><font size="2">
<%=rs("company_address")%> </font> </td>
<td><font size="2">
<%=rs("zhiwei")%> </font> </td>
<td align=center><a href="mmod.asp?name=<%=rs("name")%>"><font size="2">修改</font></a></td>
<td align=center><a href="mdel.asp?name=<%=rs("name")%>"><font size="2">删除</font></a></td>
</tr>
<%rs.movenext
size=size+1
loop%> </font>
</table>
  </center>
</div>
<table  border=0  width=95%>
<tr>
<td><font size="2">共<%=rs.pagecount%>页</td>
<% if page=1 then%> </font>
<td><font size="2">首页</font></td><td><font size="2">上一页</td>
<%else%> </font>
<td><a href=mate.asp?currentpage=1><font size="2">首页</font></a></td>
<td><a href=mate.asp?currentpage=<%=page-1%> ><font size="2">上一页</font></a><font size="2"></td>
<%end if%>

<%if cint(page)=rs.pagecount then%> </font>
<td><font size="2">下一页</font></td><td><font size="2">尾页</td>
<%else%> </font>
<td><a href=mate.asp?currentpage=<%=page+1%>><font size="2">下一页</font></a></td>
<td><a href=mate.asp?currentpage=<%=rs.pagecount%>><font size="2">尾页</font></a><font size="2"></td>
</tr>

<%end  if%>
<%end if%> </font>
</tabel>

</table>

</body>

代码是不是很菜呀,不管你有何看法,或者你有更好的实现分页的方法,都欢迎参与评论。

另外说一下,我在asp.net里面也写了几篇有关DataGrid的文章,欢迎大家浏览,并参与评论。关键字里面都有DataGrid。

【ASP】数据库查询的内容分页显示

对于大数据的查询,你不可以一次性地把所有数据中显示出来, 比如一张学生表上面有一百多号人, 那么在页面中就应该一次显示10人左右, 提供翻页功能给用户进行翻阅,不要一次性显示100多号人。 翻页系统是...
  • yongh701
  • yongh701
  • 2014年11月12日 10:23
  • 4102

通过 ASP 记录进行分页

简介 在 Active Server Pages (ASP) 应用程序中显示大型记录集,很可能是您熟悉的一个问题。本文对此问题及其解决方案和示例代码进行了深入探讨,这个示例代码经过简单修改,就可以应用...
  • zrsz
  • zrsz
  • 2002年04月12日 12:13
  • 403

asp.net中ListView分页功能

.aspx代码
  • yayun0516
  • yayun0516
  • 2014年11月17日 15:52
  • 1629

简单asp分页显示代码

on error resume next dim rs,sql,ifilePath = Server.MapPath("db.mdb")Set conn = Server.CreateObject("...
  • WINCOL
  • WINCOL
  • 2007年08月28日 00:03
  • 1789

Asp中如何快速分页[原创]

 近日一直在研究如何才能写出高小的分页算法,大概整理了一下,思路如下:  首先数据库里需要有一个自动编号字段(ID)。然后第一次访问的时候,取出所有记录,定制好每页的记录数PageSize,计算出页数...
  • foxty
  • foxty
  • 2004年08月19日 11:24
  • 966

类似百度的分页-ASP分页函数-可自定义显示文字和样式等

显示效果类似于百度搜索的一个分页函数, 可以自定义显示的文字和使用的样式, 效果请看百度,或者看实际应用:http://polycn.com/family/news.asp  下面是函数的源...
  • envon123
  • envon123
  • 2012年04月01日 13:13
  • 2461

asp.net 中gridview控件分页的实现

要在GridView中加入 //实现分页 AllowPaging="true" //一页数据10行 PageSize="10" // 分页时触发的事件 OnPageIndexChangin...
  • uniqer
  • uniqer
  • 2012年07月17日 18:04
  • 5785

【ASP】多张图片分页显示

图片翻页在一些漫画、电子书网站中同样起着中流砥柱的作用 反正网页编写的核心就是一页中不能出现太多内容。...
  • yongh701
  • yongh701
  • 2014年11月12日 15:44
  • 1801

一个SQL存储过程分页和ASP调用

存储过程:CREATE PROCEDURE Sp_Page@IntPageSize int,--页大小@IntCurrPage int,--页码@strFields nvarchar(1000),--...
  • ehung
  • ehung
  • 2005年05月30日 10:21
  • 1476

ASP构造大数据量的分页SQL语句。

看了铁拳的存储过程“实现千万级数据的分页显示!”,觉得不错,我给改成了ASP代码了。 %@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>%分页SQL语句生成代码Functio...
  • griefforyou
  • griefforyou
  • 2004年07月09日 13:48
  • 2026
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:ASP中记录的分页
举报原因:
原因补充:

(最多只允许输入30个字)