ASP中记录的分页

王朝asp·作者佚名  2006-11-24
窄屏简体版  字體: |||超大  

今天又遇到一个网友问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。

 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
 
 
© 2005- 王朝網路 版權所有  導航