如何实现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
％>