Question

asp搜索代码问题！！紧急！！！！！

我自己写的搜索代码，如下：
<%
SQL="Select * from Commodities where name like '%"&Request.QueryString("key")&"%' order by sid and addtime desc"
set rs=server.createobject("Adodb.Recordset")
rs.open SQL,conn,1,1
if not rs.eof then
pages = 8 '定义每页显示的记录数
rs.pageSize = pages '定义每页显示的记录数
allPages = rs.pageCount'计算一共能分多少页
page = Request.QueryString("page")'通过浏览器传递的页数
'if语句属于基本的排错处理
if isEmpty(page) or Cint(page) < 1 then
page = 1
elseif Cint(page) > allPages then
page = allPages
end if
rs.AbsolutePage = page
Do while not rs.eof and pages > 0
%>
<%
pages = pages - 1
rs.MoveNext
Loop
else
Response.Write("<br><div align='center'><font color='Red'>没有搜索到指定的信息！</font></div><br>")
End if
rs.Close
Set rs = Nothing
%>
<div style="width:630px; height:17px; float:left;" align="center"><a href="?page=1">第一页</a>    <a href="?page=<%=page-1%>">上一页</a>    <a href="?page=<%=page+1%>">下一页</a>    <a href="?page=<%=allpages%>">最后一页</a></div>

注意：以上代码，在我输入关键词时，第一页可以正常输出！
但是由于输出页数较多时，我点下一页，却出现的不是我所搜索的关键词对应的页面！
请问该如何改代码？？
谢谢！！！

Answer 1

SQL="Select * from Commodities where name like '%"&Request.QueryString("key")&"%' order by sid and addtime desc"
改成
if request.querystring("key")<>0 then
application("key")=request.querystring("key")
end if
SQL="Select * from Commodities where name like '%"&application("key")&"%' order by sid and addtime desc"