2个回答
展开全部
<!--#include file="conn.asp"--> <!--连接数据库文件，代码就不详细写出来的。不懂的在留言-->
<%
dim ThisURL,ThisPage '定义变量
ThisURL="http://"&request.ServerVariables("SERVER_NAME")&request.ServerVariables("URL") '取得当前页URL
if not isempty(request("page")) then '如果 传递过来的 page 值为空值 则
thispage = request("page") 'thispage 的值就是page的值
else '否则
thispage = 1 'thispage 的值为 1
end if '退出
set rs=server.createobject("adodb.recordset")
sqlcmd="select * from news order by id"
rs.open sqlcmd,conn,3,2,1 ' 打开news表
if rs.eof then '如果 news表没有记录 则
response.write ("没有添加内容") '输出"没有添加内容"
end if '退出
rs.pagesize = 2 '由于数据库记录比较少，为了能看出效果，所以定义少一点。
rs.absolutepage = thispage '将thispage 转换成rs.absolutepage
%>
<html>
<head>
<title>列表翻页示例</title>
</head>
<style type="text/css">
bady{
font-size:12px;
}
.w760{
width:760px;
text-align:center;
}
.head{
width:20%;
float:left;
height:25px;
line-height:25px;
background:#FFCCCC;
}
.content{
width:20%;
float:left;
height:25px;
line-height:25px;
border:1px dotted #FFCCCC;
}
.bottom{
height:30px;
line-height:30px;
border:1px dotted #FFCCCC;
}
.clear{
clear:both;
}
</style>
<body>
<div class="w760">
<div class="head">ID</div>
<div class="head">标题</div>
<div class="head">作者</div>
<div class="head">出处</div>
<div class="head">发布时间</div>
<div class="clear"></div>
<%
for ipage=1 to rs.pagesize '循环从 1 到 rs.pagesize ,前面我们定义了rs.pagesize=2.
if rs.eof then exit for '如果 表中没有记录 则退出循环,否则运行下面代码
%>
<div class="content"><%=rs("id")%></div>
<div class="content"><%=rs("title")%></div>
<div class="content"><%=rs("writer")%></div>
<div class="content"><%=rs("from")%></div>
<div class="content"><%=rs("time")%></div>
<div class="clear"></div>
<%
rs.movenext
next
%>
<div class="bottom">
<!--
下面显示页码,根据前面的文章我们不难理解下面的代码,这里就不再详细说明了.
代码开始
-->
页次:<%=thispage%>/<%=rs.pagecount%>
<%
for i=1 to rs.pagecount
%>
<a href="<%=thisURL%>?page=<%=i%>" target="_self">[<%=i%>]</a>
<%next%>
共<%=rs.recordcount%>条信息
<!--
代码结束
-->
</div>
</div>
<%
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
</body>
</html>
<%
dim ThisURL,ThisPage '定义变量
ThisURL="http://"&request.ServerVariables("SERVER_NAME")&request.ServerVariables("URL") '取得当前页URL
if not isempty(request("page")) then '如果 传递过来的 page 值为空值 则
thispage = request("page") 'thispage 的值就是page的值
else '否则
thispage = 1 'thispage 的值为 1
end if '退出
set rs=server.createobject("adodb.recordset")
sqlcmd="select * from news order by id"
rs.open sqlcmd,conn,3,2,1 ' 打开news表
if rs.eof then '如果 news表没有记录 则
response.write ("没有添加内容") '输出"没有添加内容"
end if '退出
rs.pagesize = 2 '由于数据库记录比较少，为了能看出效果，所以定义少一点。
rs.absolutepage = thispage '将thispage 转换成rs.absolutepage
%>
<html>
<head>
<title>列表翻页示例</title>
</head>
<style type="text/css">
bady{
font-size:12px;
}
.w760{
width:760px;
text-align:center;
}
.head{
width:20%;
float:left;
height:25px;
line-height:25px;
background:#FFCCCC;
}
.content{
width:20%;
float:left;
height:25px;
line-height:25px;
border:1px dotted #FFCCCC;
}
.bottom{
height:30px;
line-height:30px;
border:1px dotted #FFCCCC;
}
.clear{
clear:both;
}
</style>
<body>
<div class="w760">
<div class="head">ID</div>
<div class="head">标题</div>
<div class="head">作者</div>
<div class="head">出处</div>
<div class="head">发布时间</div>
<div class="clear"></div>
<%
for ipage=1 to rs.pagesize '循环从 1 到 rs.pagesize ,前面我们定义了rs.pagesize=2.
if rs.eof then exit for '如果 表中没有记录 则退出循环,否则运行下面代码
%>
<div class="content"><%=rs("id")%></div>
<div class="content"><%=rs("title")%></div>
<div class="content"><%=rs("writer")%></div>
<div class="content"><%=rs("from")%></div>
<div class="content"><%=rs("time")%></div>
<div class="clear"></div>
<%
rs.movenext
next
%>
<div class="bottom">
<!--
下面显示页码,根据前面的文章我们不难理解下面的代码,这里就不再详细说明了.
代码开始
-->
页次:<%=thispage%>/<%=rs.pagecount%>
<%
for i=1 to rs.pagecount
%>
<a href="<%=thisURL%>?page=<%=i%>" target="_self">[<%=i%>]</a>
<%next%>
共<%=rs.recordcount%>条信息
<!--
代码结束
-->
</div>
</div>
<%
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
</body>
</html>
参考资料： http://hi.baidu.com/xung/blog/item/1c3741af154cdaf8fbed5018.html
本回答由网友推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
#home a{display:block; float:left; width:25px; height:25px; line-height:25px; text-align:center;border:1px solid #CCC;margin-right:3px; text-decoration:none; color:#000}
#home a:hover{color:#F90}
#home a.current{display:block; float:left; width:25px; height:25px; line-height:25px; text-align:center;border:1px solid #CCC;margin-right:3px; color:#F00}
#home a.current:hover{color:#F90}
#home a.link1{display:block; float:left; width:55px}
<div id=home >
<%
DIM page
page=request("page_no")
if page="" then page=1
%>
<a class="link1" href="house_info.asp?action=<%=action%>&page_no=1"><<</a>
<%if int(page_no)>1 then %>
<a class="link1" href="house_info.asp?action=<%=action%>&page_no=<%=page-1%>">上一页</a>
<%else%>
<a class="link1" href='javascript:void(0)'>上一页</a>
<%end if%>
<%pageset page,20,"house_info.asp?action="&action&""%> <a class="link1" href="house_info.asp?action=<%=action%>&page_no=<%=page+1%>">下一页</a> <a class="link1" href="house_info.asp?action=<%=action%>&page_no=<%=cstr(int(page_total))%>">>></a>
<%
function pageset(cpage,tpage,link)
if cpage<10 then
startpage=1
if tpage<10 then
tpage=tpage
else
endpage=10
end if
else
startpage=cpage-4
endpage=cpage+5
if endpage>tpage then
endpage=tpage
startpage=endpage-10
end if
end if
for i=startpage to endpage
if i=clng(cpage) then
response.write "<a class='current' href='javascript:void(0)'>"&i&"</a>"
else
response.write "<a href='"&link&"&page_no="&i&"'>"&i&"</a> "
end if
next
end function
%>
</div>
这个是一个高手给我代码。直接调用就OK，很好用，现在给你分享一下。
#home a:hover{color:#F90}
#home a.current{display:block; float:left; width:25px; height:25px; line-height:25px; text-align:center;border:1px solid #CCC;margin-right:3px; color:#F00}
#home a.current:hover{color:#F90}
#home a.link1{display:block; float:left; width:55px}
<div id=home >
<%
DIM page
page=request("page_no")
if page="" then page=1
%>
<a class="link1" href="house_info.asp?action=<%=action%>&page_no=1"><<</a>
<%if int(page_no)>1 then %>
<a class="link1" href="house_info.asp?action=<%=action%>&page_no=<%=page-1%>">上一页</a>
<%else%>
<a class="link1" href='javascript:void(0)'>上一页</a>
<%end if%>
<%pageset page,20,"house_info.asp?action="&action&""%> <a class="link1" href="house_info.asp?action=<%=action%>&page_no=<%=page+1%>">下一页</a> <a class="link1" href="house_info.asp?action=<%=action%>&page_no=<%=cstr(int(page_total))%>">>></a>
<%
function pageset(cpage,tpage,link)
if cpage<10 then
startpage=1
if tpage<10 then
tpage=tpage
else
endpage=10
end if
else
startpage=cpage-4
endpage=cpage+5
if endpage>tpage then
endpage=tpage
startpage=endpage-10
end if
end if
for i=startpage to endpage
if i=clng(cpage) then
response.write "<a class='current' href='javascript:void(0)'>"&i&"</a>"
else
response.write "<a href='"&link&"&page_no="&i&"'>"&i&"</a> "
end if
next
end function
%>
</div>
这个是一个高手给我代码。直接调用就OK，很好用，现在给你分享一下。
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
