ASP 分页模块

最新推荐文章于 2021-06-09 19:54:59 发布

小鸿叔

最新推荐文章于 2021-06-09 19:54:59 发布

阅读量949

点赞数

CC 4.0 BY-SA版权

分类专栏： ASP 文章标签： asp javascript function border class html

版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。

本文链接：https://blog.youkuaiyun.com/jyh_jack/article/details/1958617

ASP 专栏收录该内容

36 篇文章

订阅专栏

本文介绍了一种基于JavaScript的分页控件实现方法，适用于Web应用程序中的数据分页展示。该分页控件支持多种样式和模式，如页码显示、首页、上一页、下一页及尾页等导航功能，并提供了下拉选择和手动输入页码的方式。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

page_top.asp

<script language=javascript>


</script>

<style>
/* Pages Main Tyle */
.pages {
color: #000000;
cursor: default;
font-size: 10px;
font-family: Tahoma, Verdana;
padding: 3px 0px 3px 0px;
}
.pages .count, .pages .number, .pages .arrow {
color: #000000;
font-size: 10px;
background-color: #F7F7F7;
border: 1px solid #CCCCCC;
}
/* Page and PageCount Style */
.pages .count {
font-weight: bold;
border-right: none;
padding: 2px 10px 1px 10px;
}
/* Mode 0,1,2 Style (Number) */
.pages .number {
font-weight: normal;
padding: 2px 10px 1px 10px;
}
.pages .number a, .pages .number span {
font-size: 10px;
}
.pages .number span {
color: #999999;
margin: 0px 3px 0px 3px;
}
.pages .number a {
color: #000000;
text-decoration: none;
}
.pages .number a:hover {
color: #0000ff;
}
/* Mode 3 Style (Arrow) */
.pages .arrow {
font-weight: normal;
padding: 0px 5px 0px 5px;
}
.pages .arrow a, .pages .arrow span {
font-size: 10px;
font-family: Webdings;
}
.pages .arrow span {
color: #999999;
margin: 0px 5px 0px 5px;
}
.pages .arrow a {
color: #000000;
text-decoration: none;
}
.pages .arrow a:hover {
color: #0000ff;
}
/* Mode 4 Style (Select) */
.pages select, .pages input {
color: #000000;
font-size: 10px;
font-family: Tahoma, Verdana;
}
/* Mode 5 Style (Input) */
.pages .input input.ititle, .pages .input input.itext, .pages .input input.icount {
color: #666666;
font-weight: bold;
background-color: #F7F7F7;
border: 1px solid #CCCCCC;
}
.pages .input input.ititle {
width: 70px;
text-align: right;
border-right: none;
}
.pages .input input.itext {
width: 25px;
color: #000000;
text-align: right;
border-left: none;
border-right: none;
}
.pages .input input.icount {
width: 35px;
text-align: left;
border-left: none;
}
.pages .input input.ibutton {
height: 17px;
color: #FFFFFF;
font-weight: bold;
font-family: Verdana;
background-color: #999999;
border: 1px solid #666666;
padding: 0px 0px 2px 1px;
margin-left: 2px;
cursor: hand;
}

/* body */
body {
font-size: 12px;
}
</style>

<%
'数据库rs打开后,加入以下代码
if maxperpage="" then
    maxperpage=10 '定义每一页显示的数据记录
end if
dim currentpage '定义当前页的变量
rs.pagesize=maxperpage
pagecount=rs.pagecount
currentpage=request.querystring("page")
if currentpage="" then
currentpage=1
elseif currentpage<1 then
currentpage=1
else
currentpage=clng(currentpage)
if currentpage > rs.pagecount then
currentpage=rs.pagecount
end if
if rs.pagecount=0 then
currentpage=1
end if
end if
'如果变量currentpage的数据类型不是数值型
'就1赋给变量currentpage
if not isnumeric(currentpage) then
currentpage=1
end if
dim totalput,n '定义变量
totalput=rs.recordcount
if totalput mod maxperpage=0 then
n=totalputmaxperpage
else
n=totalputmaxperpage+1
end if
if n=0 then
n=1
end if
if not rs.eof then
rs.AbsolutePage = currentpage
i=1
do while not (rs.eof or rs.bof) and i<=maxperpage
%>

page_bottom.asp

<%
rs.movenext
i=i+1
loop

'下面注释的这段代码的作用，是如果当前数据不足时，用以补空行的，可以去除注释试一下。

'dim j
'if i<=maxperpage then
'for j=i to maxperpage
'response.write("<tr height='25'><td> </td>")
'response.write("<td> </td>")
'response.write("<td> </td>")
'response.write("<td> </td>")
'response.write("<td> </td>")
'response.write("<td> </td></tr>")
'next
'end if
else
response.write("<font color='#336699'>没有任何通知！</font>")
end if
rs.close
conn.close
set rs=nothing
set conn=nothing

%>

test.asp 测试页

<html>

<head>
<meta http-equiv="Content-Language" content="en-us">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">

</head>

</head>

<body>

<%
set rs=server.createobject("adodb.recordset")
rs.open "select * from users order by RegistryTime",conn,1
maxperpage=1 '定义每页数记录数，默认为10
%>


<%=rs("Username")%>
<br>

<script language="JavaScript">
newPage(<%=pagecount%>,3) //pagecount,mode(0-5)
</script>

</body>

</html>

评论

被折叠的条评论为什么被折叠?

到【灌水乐园】发言

查看更多评论

添加红包

成就一亿技术人!

hope_wisdom

发出的红包

实付元

使用余额支付

点击重新获取

扫码支付

钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。