asp问题(点下页还是原来那页)

来源：百度知道 编辑：UC知道 时间：2024/06/13 23:50:29
<%
Response.write "全部"
Response.write "共" & Cstr(Rs.RecordCount) & "条荣誉          "
Response.write "第" & Cstr(CurrentPage) & "/" & Cstr(rs.pagecount) & " "
If currentpage > 1 Then
response.write "<a href='CompHonor.asp?&page="+cstr(1)+"'> 首页 </a>"
Response.write "<a href='CompHonor.asp?page="+Cstr(currentpage-1)+"'> 上一页 </a>"
Else
Response.write " 上一页 "
End if
If currentpage < Rs.PageCount Then
Response.write "<a href='CompHonor.asp?page="+Cstr(currentPage+1)+"'> 下一页 </a>"
Response.write "<a href='CompHonor.asp?page="+Cstr(Rs.PageCount)+"'> 尾页 </a>"
Else
Response.write "&quo

把所有的像这句（response.write "<a href='CompHonor.asp?&page="+cstr(1)+"'>） 首页 </a>" 中的“+”号改为&就行了
你试试看吧，应该是那个问题
还是用我这个吧，我一直用的，挺好着
<%
if not isempty(request("page")) then
pagecount=cint(request("page"))
else
pagecount=1
end if
rs.PageSize=20
rs.AbsolutePage=pagecount
For iPage = 1 To rs.PageSize
If rs.EOF Then Exit For
%>
<%rs.movenext
Next
Response.Write "<p>共"&rs.recordcount&"件商品  "
Response.Write "当前第"&pagecount&"页 "
if rs.PageCount>1 Then
If pagecount<>1 Then
Response.Write "<A HREF=newproduct.asp?Page=1>首页 </A>"
Response.Write "<A HREF=newproduct.asp?Page="&(pagecount-1)&">前页 </A>"
End If
If pagecount<>rs.PageCount Then
Response.