杭州婚博会卖珠宝:搜索结果中第二页显示错误谁帮我解决？？？？？急！！！

rs.movefirst
if not isempty(request("page")) then
pagecount=cint(request("page"))
else
pagecount=1
end if
rs.pagesize=9
if pagecount>rs.pagecount or pagecount<=0 then
pagecount=1
end if
rs.AbsolutePage=pagecount
%>......省略<%
j=1
do while not (rs.eof or err)
if (j mod 3)=1 then
response.write "<tr>"
end if
%>
............省略 <%
if (j mod 3)=0 then
response.write "</tr>"
end if
j=j+1
rs.moveNext
if j>9 then exit do
loop
end if
%>........省略 <td height="18" colspan="4" align="center" valign="middle" class=""><form method=Post action="pro.asp">
<%
temp=""
temp=temp&"&keyword="&request("word")&"&typ="&request("typ")&"&class="&request("class")
'response.Write(temp)
if pagecount<2 then
response.write "首页 上一页 "
else
response.write "<a href=pro.asp?page=1"&temp&">首页</a> "
response.write "<a href=pro.asp?page=" & pagecount-1 &temp&">上一页</a> </font>"
end if
if rs.pagecount-page<1 then
response.write "下一页 尾页"
else
response.write "<a href=pro.asp?page="&temp& ">"
response.write "下一页</a> <a href=pro.asp?page="&temp&">尾页</a>"
end if
response.write " 页次：<font color=red>"&pagecount&"</font>/"&rs.pagecount&"页 "
response.write " 共<font color=red>"&rs.recordcount&"</font>条记录 "&rs.pagesize&"条记录/本页"
response.write " 转到：<input type='text' name='page' size=4 maxlength=10 class=input value="&page&">"
response.write " <input class=input type='submit' value=' 转到 ' name='cndok'></span></p></font>"
%>