ASP分页只能显示第一页,按下一页没有数据,再按上一页回到第一页也显示没有数据

<tablewidth="100%"border="0"cellspacing="1"cellpadding="2"><tralign="center"bgcolor="... <table width="100%" border="0" cellspacing="1" cellpadding="2">
<tr align="center" bgcolor="#FFB9B9">
<th width="11%">区域</th>
<th width="17%">物业</th>
<th width="7%" >板块</th>
<th width="9%">建筑类型</th>
<th width="7%">房型</th>
<th width="6%">面积</th>
<th width="8%" >装修</th>
<th width="9%">租金</th>
<th width="9%">售价</th>
<th width="23%">物业地址</th>
</tr>
<div onMouseMove="hello()" onMouseout="hello1()">
<%
dim qy,xz,fx,fy
qy=request.form("quyu")
xz=request.form("xingzhi")
fx=request.form("fangxin")
fy=request.form("fangy")
on error resume next
sql= "select * from info where 区域='"&qy&"'and 性质= '"&xz&"'and 交易方式='"&fy&"'"
rs1.open sql,MM_conn_STRING,1,1
if rs1.eof and rs1.bof then
response.write "<div align='center'>暂无此信息!</div>"
end if
%>
<%
dim page,nowpage,totalrecord,totalpages
rs1.pagesize = 10
totalrecord=rs1.recordcount
totalpages=rs1.pagecount
rs1.movefirst
nowpage=request.QueryString("page")
if nowpage="" then
nowpage=1
else
nowpage=cint(nowpage)
end if
rs1.absolutepage=nowpage
k=0

%>
<%
for i =1 to rs1.pagesize
if rs1.eof then
exit for
end if
%>
<tr onmouseover="this.style.backgroundColor='#FFB9B9'" onmouseout="this.style.backgroundColor='#eae9e9'" bgcolor="#eae9e9" onclick="location='get.asp?id=<%=rs1("编号")%>'" style="corsor:hand">
<td><%= rs1("区域") %></td>
<td><%= rs1("物业名称") %></td>
<td><%= rs1("片区") %></td>
<td><%= rs1("性质") %></td>
<td><%= rs1("房型") %></td>
<td><%= rs1("面积") %></td>
<td><%= rs1("装修") %></td>
<td><%= rs1("租金") %></td>
<td><%= rs1("售价")%></td>
<td><%= rs1("物业地址") %></td>
</tr>
<%
rs1.movenext
next
%>

<tr bgcolor="#FFB9B9" style="text-align: center">
<td colspan="10">
共<%=totalpages%>页 当前为第<%=nowpage%>页

<%if nowpage>1 then%>
<a href='search_ok.asp?page=<%=nowpage-1%>'>上一页</a>
<%else%>
上一页
<%end if%>
<%if nowpage < totalpages then%>
<a href='search_ok.asp?page=<%=nowpage+1%>'>下一页</a>
<%else%>
下一页
<%
end if
%>
<%if nowpage<>1 then%>
<a href='search_ok.asp?page=<%=1%>'> 首页</a>
<%else%>
首页
<%end if%>
<%if nowpage<>totalpages then %>
<a href='search_ok.asp?page=<%=totalpages%>'>末页</a>
<%else%>
末页
<%end if%>

</td>
</tr>
</table>

运行后只能显示第一页,按下一页表格为空,再按上一页回到第一页也显示空表格。请高手帮忙看看,我哪里写错了。谢谢了。
wjl414111073您的回答我试过了,还是不行,&quyu=& lt;%=qy%>&xingzhi=<%=xz%>&fangy<%=fy%>加上后,URL里显示的是http://localhost/search.asp?page=2&quyu=%C6%D6%B6%AB%D0%C2%C7%F8&xingzhi=%D7%A1%D5%AC&fangy%B3%F6%CA%DB,还有我前页的表单是用列表方式选择的.
按下一页无显示,并且提示"暂无此信息!",再按上一页也没有办法显示了,也提示"暂无此信息!"
展开
 我来答
hongli200078
2010-07-22 · TA获得超过1210个赞
知道小有建树答主
回答量:713
采纳率:0%
帮助的人:1085万
展开全部
上一页,下一页,你的程序本身都有不稳定性,如果其中的某一个ID被删除了,你的下一页肯定是无法运行的。。。
正确的上一页,下一页应该如下操作
在获取到本页信息时候,把本记录的ID给埋出来比如id=rs1("id")
然后
<%
set rs=server.create("adodb.recordset")
rs.open "select top 1 id from info where id>"&id&"",conn,1,1
response.write("<a href=xxx.asp?id="&rs("id")&">下一页</a>");
rs.close
set rs=nothing
set rs=server.create("adodb.recordset")
rs.open "select top 1 id from info where id<"&id&"",conn,1,1
response.write("<a href=xxx.asp?id="&rs("id")&">上一页</a>");
rs.close
set rs=nothing
%>
当然这里的xxx.asp 是以ID为索引,读取页面信息的。
百度网友4eacddb
推荐于2016-09-25 · 超过56用户采纳过TA的回答
知道答主
回答量:121
采纳率:0%
帮助的人:123万
展开全部
因为你点击下一页没有传值
首先将 sql= "select * from info where 区域='"&qy&"'and 性质= '"&xz&"'and 交易方式='"&fy&"'"
改成 sql="select * from info where 编号>0 "
if xz<>"" then
sql=sql & "and 性质='" & xz & "' "
end if
if xz<>"" then
sql=sql & "and 区域='" & qy & "' "
end if
if xz<>"" then
sql=sql & "and 交易方式='" & fy & "' "
end if
这样的
还有
search_ok.asp?page=<%=nowpage-1%>
search_ok.asp?page=<%=nowpage+1%>
search_ok.asp?page=<%=1%>
search_ok.asp?page=<%=totalpages%>
后面加上&quyu=<%=qy%>&xingzhi=<%=xz%>&fangy<%=fy%>
这样你在试试
本回答被提问者采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
john83780018
2010-07-22 · 超过10用户采纳过TA的回答
知道答主
回答量:164
采纳率:0%
帮助的人:50.2万
展开全部
建议数据库字段名用英文。
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
动物园狂想曲
2010-07-22
知道答主
回答量:5
采纳率:0%
帮助的人:3.7万
展开全部
喔.呢层唯有等认识插件方面既人答你.因为个插件吾系本人整的
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(2)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式