asp 分页参数带到下页

来源:百度知道 编辑:UC知道 时间:2024/05/24 07:18:37
<%
Set rs= Server.CreateObject("ADODB.recordset") '创建打开对象
if request("类型")<>"" then
rs.open "Select * from 产品 where 类型='"&request("类型")&"'",lj,1,1
else
rs.open "Select * from 产品 order by id asc,序号 desc",lj,1,1
end if
if rs.bof and rs.eof then%>
<tr class="ZT-12px"><td colspan="9" align="center" >暂无产品</td></tr>
<%else
Rs.pagesize=8 '指示recordset中一页所包含的记录数
Zongyeshu=rs.pagecount '使用pagecount属性可确定recordset对象中的数据的页数
Page=int(request("page"))
If page<=0 then page=1
If request("page")=" " then page=1
Rs.absolutepage=page '指定当前记录所在的页
for i=1 to rs.pagesize
%>
<tr>-------------内容-----------------</td>
<%
Rs.movenext
if rs.eof then exit for
next
%>
<tr c

第三页时did=Request("did") 已经获不到值了
你可以用session("did")=Request("did") 来保存这个值

<a href="?did= <%=session("did")%>&page= <%=page+1%>">下一页 </a>

这样就可以了