Question

ASP分页，按搜索条件搜索结果正确，但按下页后不是搜索要的结果显示了全部数据库数据。

<%
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 编号>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
rs1.open sql,MM_conn_STRING,1,1
if rs1.eof then
response.write "<div align='center'>暂无此信息!</div>"
end if
%>
<%
dim page,nowpage,totalrecord,totalpages,rowcount
rs1.pagesize = 20
totalrecord=rs1.recordcount
totalpages=rs1.pagecount
rs1.movefirst
nowpage=request("page")
if nowpage&"x"="x" 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
%>
<tr onmouseover="this.style.backgroundColor='#FFB9B9'" onmouseout="this.style.backgroundColor='#eae9e9'" bgcolor="#eae9e9" onclick="location='sale.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"> 第<%=nowpage%>页 共<%=totalpages%>页
<%if nowpage>1 then%>
<a href='search.asp?区域=<%=request("quyu")%>&性质=<%=request("xingzhi")%>&<%=request("fangy")%>=交易方式&page=<%=nowpage-1%>'>上一页</a>
<%else%>
上一页
<%end if%>
<%if nowpage < totalpages then%>
<a href='search.asp?区域=<%=request("quyu")%>&性质=<%=request("xingzhi")%>&<%=request("fangy")%>=交易方式&page=<%=nowpage+1%>'>下一页</a>
<%else%>
下一页
<%
end if
%>
<%if nowpage<>1 then%>
<a href='search.asp?page=<%=1%>&区域=<%=request("quyu")%>&性质=<%=request("xingzhi")%>&交易方式=<%=request("fangy")%>"'> 首页</a>
<%else%>
首页
<%end if%>
<%if nowpage<>totalpages then %>
<a href='search.asp?page=<%=totalpages%>&区域=<%=request("quyu")%>&性质=<%=request("xingzhi")%>&交易方式=<%=request("fangy")%>"'>末页</a>
<%else%>
末页
<%end if%></td>

按交易方式（出租，出售）搜索结果页为2页，只显示出租或者出售，但按下一页后页码显示为3页，不是搜索要求的出租或者出售而是把数据中出租和出售的数据都显示出来了。
搜索结果有的啊。只是按下一页结果不是单独的出租或者出售，显示全部数据了（出租，出售）一并列了出来。

Answer 1

区域，性质，交易方式 你的分页传的变量是这个 ，而你接收的是英文变量，肯定没值了。
--------------------------------------
你分页上的变量传的根本就没用，你都没运用上，肯定会全部显示了。

Answer 2

可以用get方法提交表单，这样可以把所有搜索条件都以querystring的方法传递，用request.querystring的方法获取，而不需要request.form

同样，下一页：

dim qy,xz,fx,fy
qy=request.querystring("quyu")
xz=request.querystring("xingzhi")
fx=request.querystring("fangxin")
fy=request.querystring("fangy")

if trim(qy) <> "" then qy = &"&qy=" &qy'下同

<a href='search.asp?<%=qy&xz&fx&fy%>&page=<%=nowpage+1%>'>下一页</a>

Answer 3

得用session把搜索条件也传给下一页去。
否则你一点下一页，本页里的form是空的，下一页里request.form也就是空的。

Answer 4

<%
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 编号>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
rs1.open sql,MM_conn_STRING,1,1
if rs1.eof then
response.write "<div align='center'>暂无此信息!</div>"
end if
%>
<%
dim page,nowpage,totalrecord,totalpages,rowcount
rs1.pagesize = 20
totalrecord=rs1.recordcount
totalpages=rs1.pagecount
rs1.movefirst
nowpage=request("page")
if nowpage&"x"="x" 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
%>
<tr onmouseover="this.style.backgroundColor='#FFB9B9'" onmouseout="this.style.backgroundColor='#eae9e9'" bgcolor="#eae9e9" onclick="location='sale.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"> 第<%=nowpage%>页 共<%=totalpages%>页
<%if nowpage>1 then%>
<a href='search.asp?quyu=<%=request("quyu")%>&xingzhi=<%=request("xingzhi")%>&fangy=<%=request("fangy")%>&page=<%=nowpage-1%>'>上一页</a>
<%else%>
上一页
<%end if%>
<%if nowpage < totalpages then%>
<a href='search.asp?quyu=<%=request("quyu")%>&xingzhi=<%=request("xingzhi")%>&fangy=<%=request("fangy")%>&page=<%=nowpage+1%>'>下一页</a>
<%else%>
下一页
<%
end if
%>
<%if nowpage<>1 then%>
<a href='search.asp?page=<%=1%>&quyu=<%=request("quyu")%>&xingzhi=<%=request("xingzhi")%>&fangy=<%=request("fangy")%>"'> 首页</a>
<%else%>
首页
<%end if%>
<%if nowpage<>totalpages then %>
<a href='search.asp?page=<%=totalpages%>&quyu=<%=request("quyu")%>&xingzhi=<%=request("xingzhi")%>&fangy=<%=request("fangy")%>"'>末页</a>
<%else%>
末页
<%end if%></td>