ASP 分页遇到问题,高手帮忙
可以显示,但是我点击下一页总是显示最后一页,总共是三页。不管page传递的是1,2,3显示的都是3页的结果,高手帮忙~<%setrs=server.createobjec...
可以显示,但是我点击下一页 总是显示最后一页,总共是三页。不管page传递的是1,2,3 显示的都是3页的结果,高手帮忙~
<%
set rs = server.createobject("adodb.recordset")
sql="select * from Tacod_product where 1=1 order by id desc"
rs.open sql,conn,1,1
i = 2'定义每页显示记录数
rs.pagesize = i
page=Request("page")
if page>rs.pagecount then
page=rs.pagecount
end if
if page < 0 then
page = 1
end if
rs.absolutepage = page
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
<title>产品</title>
</head>
<%
if rs.bof or rs.eof then
%>
暂无相关信息!
<%
else
do while (not rs.eof) and (not rs.bof) and (i > 0)
i = i - 1
%>
<table width="287" height="200" border="0" cellpadding="0" cellspacing="0" style="float : left">
<tr>
<td height="170" align="center" valign="middle"><table border="1" bordercolor="#CCCCCC" bgcolor="#FFFFFF">
<tr>
<td><a href="product_view.asp?id=<% =rs("id") %>"><img src="zhaohui/<% = rs("smallpic") %>" width="240" height="160" border="0" /></a></td>
</tr>
</table></td>
</tr>
<tr>
<td height="30" align="center" class="STYLE4"><a href="product_view.asp?id=<% =rs("id") %>"><% =rs("name") %></a></td>
</tr>
</table>
<%
rs.movenext
loop
end if
%>
</td>
</tr>
<tr>
<td height="30" align="center" valign="middle" class="STYLE4">
总计<% = rs.recordcount %>条,分<% = rs.pagecount %>页显示,当前第<% =page %>页 <a href="jdyb.asp"> 首页 </a><% if page > 1 then %><a href="jdyb.asp?page=<% =page-1 %>" > 上一页 </a><% else %> 上一页 <% end if %><% if rs.pagecount< page + 1 then %> 下一页 末页 <% else %><a href="jdyb.asp?page=<% = page + 1 %>"> 下一页 </a><a href="jdyb.asp?page=<% = rs.pagecount %>">末页</a><% end if %> 跳转至第页 </td>
</tr>
</table></td>
<td width="24" valign="top"><img src="img/index_18.gif" width="24" height="554" /></td>
<td width="139"> </td>
</tr>
</table>
<!--网页底部代码开始-->
<!--#include file="bottom.asp"-->
<!--网页底部代码结束-->
</div>
</body>
</html>
<%
rs.close
set rs=nothing
call closeconn
%> 展开
<%
set rs = server.createobject("adodb.recordset")
sql="select * from Tacod_product where 1=1 order by id desc"
rs.open sql,conn,1,1
i = 2'定义每页显示记录数
rs.pagesize = i
page=Request("page")
if page>rs.pagecount then
page=rs.pagecount
end if
if page < 0 then
page = 1
end if
rs.absolutepage = page
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
<title>产品</title>
</head>
<%
if rs.bof or rs.eof then
%>
暂无相关信息!
<%
else
do while (not rs.eof) and (not rs.bof) and (i > 0)
i = i - 1
%>
<table width="287" height="200" border="0" cellpadding="0" cellspacing="0" style="float : left">
<tr>
<td height="170" align="center" valign="middle"><table border="1" bordercolor="#CCCCCC" bgcolor="#FFFFFF">
<tr>
<td><a href="product_view.asp?id=<% =rs("id") %>"><img src="zhaohui/<% = rs("smallpic") %>" width="240" height="160" border="0" /></a></td>
</tr>
</table></td>
</tr>
<tr>
<td height="30" align="center" class="STYLE4"><a href="product_view.asp?id=<% =rs("id") %>"><% =rs("name") %></a></td>
</tr>
</table>
<%
rs.movenext
loop
end if
%>
</td>
</tr>
<tr>
<td height="30" align="center" valign="middle" class="STYLE4">
总计<% = rs.recordcount %>条,分<% = rs.pagecount %>页显示,当前第<% =page %>页 <a href="jdyb.asp"> 首页 </a><% if page > 1 then %><a href="jdyb.asp?page=<% =page-1 %>" > 上一页 </a><% else %> 上一页 <% end if %><% if rs.pagecount< page + 1 then %> 下一页 末页 <% else %><a href="jdyb.asp?page=<% = page + 1 %>"> 下一页 </a><a href="jdyb.asp?page=<% = rs.pagecount %>">末页</a><% end if %> 跳转至第页 </td>
</tr>
</table></td>
<td width="24" valign="top"><img src="img/index_18.gif" width="24" height="554" /></td>
<td width="139"> </td>
</tr>
</table>
<!--网页底部代码开始-->
<!--#include file="bottom.asp"-->
<!--网页底部代码结束-->
</div>
</body>
</html>
<%
rs.close
set rs=nothing
call closeconn
%> 展开
4个回答
佳达源
2024-10-28 广告
2024-10-28 广告
AR0144CSSM20SUKA0-CPBR这款产品,作为我司产品线中的重要一员,集成了高精度的传感器技术与先进的图像处理算法,广泛应用于安防监控、工业自动化及机器视觉等领域。其卓越的性能与稳定性,确保了在各种复杂环境下的精准数据采集与高效...
点击进入详情页
本回答由佳达源提供
展开全部
循环前改为:
<%
else
for n=1 to rs.pagesize
%>
后面循环结尾部分改为:
<%
rs.movenext
if rs.eof then exit for
next
end if
%>
<%
else
for n=1 to rs.pagesize
%>
后面循环结尾部分改为:
<%
rs.movenext
if rs.eof then exit for
next
end if
%>
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
if rs.bof or rs.eof then
or改AND
page=Request("page")
改:
page=1
if request("page")&" "<>" " then
page=request("page")
end if
if page < 0 then
改为page<1
能看出来,差不多就这么多了!
or改AND
page=Request("page")
改:
page=1
if request("page")&" "<>" " then
page=request("page")
end if
if page < 0 then
改为page<1
能看出来,差不多就这么多了!
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
do while (not rs.eof) and (not rs.bof) and (i >= 0)
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询