欢迎来到代码驿站!

ASP代码

当前位置:首页 > 软件编程 > ASP代码

简单的ASP分页代码(测试正确)第1/2页

时间:2021-10-06 09:08:57|栏目:ASP代码|点击:
本文匆匆已经全面测试,支持ASP+ACCESS以及ASP+SQL,请修改相关部分就可以了。
注意,匆匆谢绝基础问题回答,已经本代码已经很简单,如果还不懂可以参阅本站其他栏目。

<!--#include file="conn.asp"-->
<% '以上为包含数据库衔接文件
'--------------------------------------------查询开始数据库

set rs=server.CreateObject("adodb.recordset")
rs.open "select * from books where id="&id&" order by id desc",conn,1,1
if err.number<>0 then
response.write "数据库中无数据"
end if

'------------------------------------------分页开始
if rs.recordcount=0 then   
respose.write "没有数据"
else
rs.PageSize =10 '每页记录条数
iCount=rs.RecordCount '记录总数
iPageSize=rs.PageSize
maxpage=rs.PageCount 
page=request("page")

    if Not IsNumeric(page) or page="" then
        page=1
    else
        page=cint(page)
    end if

    if page<1 then
        page=1
    elseif  page>maxpage then
        page=maxpage
    end if

    rs.AbsolutePage=Page

 if page=maxpage then
  x=iCount-(maxpage-1)*iPageSize
 else
  x=iPageSize
 end if

For i=1 To x

上一篇:flash与js通讯方法

栏    目:ASP代码

下一篇:asp 使用正则表达式替换word中的标签,转为纯文本

本文标题:简单的ASP分页代码(测试正确)第1/2页

本文地址:http://www.codeinn.net/misctech/178965.html

推荐教程

广告投放 | 联系我们 | 版权申明

重要申明:本站所有的文章、图片、评论等,均由网友发表或上传并维护或收集自网络,属个人行为,与本站立场无关。

如果侵犯了您的权利,请与我们联系,我们将在24小时内进行处理、任何非本站因素导致的法律后果,本站均不负任何责任。

联系QQ:914707363 | 邮箱:codeinn#126.com(#换成@)

Copyright © 2020 代码驿站 版权所有