网络编程
位置:首页>> 网络编程>> 数据库>> 如何实现SQL Server的分页显示?

如何实现SQL Server的分页显示?

  发布时间:2010-05-18 18:36:00 

标签:sql,server,分页

 分页显示是页面常用技术,可用下列代码来实现:

<%
page=Request.QueryString("page") 
' 取page值
Set conn=Server.CreateObject("ADODB.Connection")
sql="select * from table"
Set rs=conn.Execute(sql)
' 在数据库中进行查询
rs.PageSize=30
' 设置分的页数,设好后系统会自动将rs.PageCount计算出来
If Page&lt1 Then Page=1
If Page=null Then Page=1
If Page&gtrs.PageCount Then Page=rs.PageCount 
' rs.PageCount是总页数
rs.AbsolutePage=page
' 将要显示的页数
If page<&gt1 Then
Response.Write"&lta href=show.asp?page=1>第一页</a>"
Response.Write"&lta href=show.asp?page="&(page-1)前一页</a>"
End If
If page<&gtrs.PageCount Then
Response.Write"&lta href=show.asp?page="&(page+1)>后一页</a>"
Response.Write"&lta href=show.asp?page="&rs.PageCount>最末页</a>"
End If
For iPage=1 To rs.PageSize
' 显示分页
%>
<%=rs("显示字段")%>
<%rs.MoveNext 
' 若到尾部则跳出
If rs.EOF Then Exit For
Next
%>

0
投稿

猜你喜欢

手机版 网络编程 asp之家 www.aspxhome.com