这个搜索页什么地方错了,,
为什么我这个只能搜索到结果,而点击下一页的时候却出错,无法分页显示搜索结束
高手帮看一下
<%sqlstr="select * from product where (cpname like '%"&trim(request.form("keyword "
)&"%' or main like '%"&trim(request.form("keyword "
)&"%') and fenlei='"&trim(request.form("fenlei"
)&"'"
set rs=server.CreateObject("adodb.recordset"
rs.open sqlstr,conn,1,3
if not rs.eof then
i=0
rs.pagesize=1
if request("page"
="" then
page=1
else
page=request("page"
end if
rs.absolutepage=page
%>
<% do while not rs.eof and i< rs.pagesize%>
<%=rs("cpname"
%>
<% i=i+1
rs.movenext
loop
%>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="11" height="25" valign="top" background="../images/in138.gif"><img src="../images/3_r5_c04.gif" width="3" height="25"></td>
<td width="555" background="../images/in138.gif">
<div align="center"><font color="#5e5e5e">共<font color="#FF0000"><%=rs.recordcount%></font>条信息
<% if page<2 then
response.write"首页  上页 "
else
response.write"<a href=search.asp?page=1&fenlei="&request("fenlei"
&">首页</a> "
response.write"<a href=search.asp?page="&page-1&"&fenlei="&request("fenlei"
&">上页</a> "
end if
%>
<%if rs.pagecount-page<1 then
response.write"下页 末页 "
else
response.write"<a href=search.asp?page="&page+1&"&fenlei="&request("fenlei"
&">下页</a> "
response.write"<a href=search.asp?page="&rs.pagecount&"&fenlei="&request("fenlei"
&">末页</a> "
end if
%>
页次：<font color="#FF0000"><%=page%></font>/<%=rs.pagecount%>页</font></div></td>
<td width="10" valign="top"><img src="../images/3_r5_c07.gif" width="5" height="25"></td>
</tr>
</table>
</div></td>
</tr>
</tbody>
</table>
<%else
response.write "<div align='center'><a onclick='javascript :history.go(-1)' style='cursor:hand'><br><br><font color=#ffoooo><strong>抱歉您搜索的范围超出，请返回</strong></font></a></div>"
end if%>
