我下载了一个ASP购物程序,里面的搜索代码好象有问题: 例如,我搜索一个关键词后,出现25个结果。本来程序中设置的是每页显示10个结果,按理说应该是在第一页显示10个,第二页显示10个,第三页显示5个。但是出现的情况是在第一页中显示出了全部25个结果,而页面底下仍然显示有"第1页/共3页",点击下一页,出现15个结果。 归纳一下就是,这个代码把所有的搜索结果都在第一页里显示出来,但却仍然能分页,这是怎么回事?求助……… 以下是该程序相关搜索代码,请大家看看错在哪里? 搜索结果:-->><br> <div align="center"> <table width="100%" border="0" cellspacing="0" cellpadding="0"> <tr> <td valign="top"> <div align="center"> <table cellspacing=1 cellpadding=0 width="98%" border=0> <tbody> <% dim totalPut dim CurrentPage dim TotalPages keyword=request("keyword") if keyword="" then errmsg=errmsg+"<br>"+"请输入关键字。" response.write "<font color=red>对不起,请输入关键字</font>" response.end founderr=true else keyword=replace(replace(replace(replace(keyword,"'","‘"),"<","<"),">",">")," "," ") findword="hw_name like '%"&keyword&"%' " end if %> <% sql="select * from hw where "&findword&"" if zuoze<>"" then sql=sql &"and zuoze like '%"&zuoze&"%'" if lei<>"" then sql=sql &"and lei like '%"&lei&"%'" page=request.querystring("page") if page="" then page=1 if not(isnumeric(page)) then page=1 if page<1 then page=1 page=int(page) rs.open sql,conn,1,1 if rs.eof and rs.bof then response.write "<p align='center'>没有或没有找到任何产品</p>" else rs.pagesize=10 totalrec=rs.recordcount totalpage=rs.pagecount if page>totalpage then page=totalpage rs.absolutepage=page for i=1 to pageCount if recordset.eof then exit for display recordset.movenext next i=0%> <tr> <% do while not rs.eof i=i+1 hw_id=rs("hw_id")%> <td width="245" bgcolor="#FFFFFF"> <table border="0" width=245 cellspacing="1"> <tr> <td width=80 bgcolor="#FFFFFF" valign="top" align="center"><A href="<%=rs("hw_pic")%>"><img border="0" src="<%=rs("hw_pic")%>" width=80 height=80
alt=".::商品图片::."></A></td> <td width=165 bgcolor="#FFFFFF" valign="top" align="left">商品名称:<%=rs("hw_name")%><br> 上架时间:<%=rs("hw_date")%> <br>商品价格:<font color=red><%=rs("hw_cash")%></font>元 <%if session("user_type")="批发" then response.write "(批发价:" & rs("daili") & "元)"%> <%if session("user_type")="代理" then response.write "(代理价:" & rs("daili") & "元)"%><br> 浏览次数:<%=rs("hw_views")%><br> 成交次数:<%=rs("hw_buys")%><br> <br> <p align="center"><a title="点击查看具体信息" href="javascript:openScript('views.asp?hw_id=<%=hw_id%>',550,500)">详细资料</a> <A href="favadd.asp?hw_id=<%=hw_id%>">加入收藏</a><br> <a href='javascript:openbag(<%=hw_id%>)'><img border="0" src="images/shop.gif" alt="─┼收 藏┼─"></a> </td> </tr> </table> </td> <%if (i mod 2)= 0 then response.write "</tr><tr>" end if%>
<% rs.movenext loop end if rs.close %> </tr> <tr> <td width=590 colspan=2 bgcolor=#fff9ff> <p align="left">共<font color=red><%=totalpage%></font>页 第<%=page%>页 <font color=666666><%if page-1>0 then%><a href="querygoods.asp?page=<%=page-1%>&keyword=<%=keyword%>&company=<%=company%
>&action=title">上一页</a><%else%><font color=666666>上一页</font><%end if%> <%if page+1<=totalpage then%><a href="querygoods.asp?page=<%=page+1%
>&keyword=<%=keyword%>&company=<%=company%>&action=title">下一页</a><%else%><font color=666666>下一页</font><%end if%></font></p> </td> </tr>
</table> </div> </td> </tr> </table> </div> </td> </tr> </table> <table width="776" border="0" cellspacing="0" cellpadding="0" align="center"> <tr> <td><img src="images/home_13.gif" width="776" height="11"></td> </tr> </table>