UC知道高手请求,小弟跪求asp 分页显示问题
来源：百度知道 编辑：UC知道 时间：2024/07/02 15:35:36
传递参数fenlei="用品,服饰"
<table>
<%if fenlei<>"" then
str2=split(fenlei,", ")
for a=0 to ubound(str2)
sql="select * from product where fenlei='"&str2(a)&"'"
set rs1=server.CreateObject("adodb.recordset")
rs1.open sql,conn,1,1
do while not rs.eof %>
<tr>
<td ><%=rs1("laihao")%></td></tr>
<%
rs1.movenext
loop
rs1.close
set rs1=nothing
next
%>
</table>
是利用了循环,产生了两个记录集,这样怎么做分页显示啊.
一般情况下,就只有一个记录集,那样利用rs.pagesize 等,就能分页,这种情况怎么做呢?
<table>
<%if fenlei<>"" then
str2=split(fenlei,", ")
for a=0 to ubound(str2)
sql="select * from product where fenlei='"&str2(a)&"'"
set rs1=server.CreateObject("adodb.recordset")
rs1.open sql,conn,1,1
do while not rs.eof %>
<tr>
<td ><%=rs1("laihao")%></td></tr>
<%
rs1.movenext
loop
rs1.close
set rs1=nothing
next
%>
</table>
是利用了循环,产生了两个记录集,这样怎么做分页显示啊.
一般情况下,就只有一个记录集,那样利用rs.pagesize 等,就能分页,这种情况怎么做呢?
可以通过修改sql语句达到预期效果
<%
if fenlei<>"" then
str2=split(fenlei,", ")
sql="select * from product"
for a=0 to ubound(str2)
if a=0 then
sql = sql & " where fenlei='"&str2(a)&"'"
else
sql = sql & " or fenlei='"&str2(a)&"'"
end if
next
set rs1=server.CreateObject("adodb.recordset")
rs1.open sql,conn,1,1
do while not rs.eof %>
<tr>
<td ><%=rs1("laihao")%></td></tr>
<%
rs1.movenext
loop
rs1.close
set rs1=nothing
end if
%>