UC知道还问关于ASP 更简单
来源：百度知道 编辑：UC知道 时间：2024/06/22 09:45:14
http://www.fsxx315.com/brand/list.asp?qysx=42
大家帮我看看这个页面，我想限制一下数量，比如一页15个，该加什么样的代码呀……
这个太长了……
<TD align=middle bgColor=#ffffff><A
href="show.asp?unid=<%=rs("unid")%> "><IMG
height=60 src="<%=rs("defimages")%> " width=120
border=0></A></TD></TR>
是加在这个代码上的吧
大家帮我看看这个页面，我想限制一下数量，比如一页15个，该加什么样的代码呀……
这个太长了……
<TD align=middle bgColor=#ffffff><A
href="show.asp?unid=<%=rs("unid")%> "><IMG
height=60 src="<%=rs("defimages")%> " width=120
border=0></A></TD></TR>
是加在这个代码上的吧
<%
pp = 12
pageno=request("pageno")
set rs = server.createobject("adodb.recordset")
sql="select* from …… "
rs.open sql,conn,1,1
if pmcount="" or isempty(pmcount) or pmcount<1 then
pmcount=pp
end if
rsP.pagesize=pmcount '设置每页数
mpage=rsP.pagecount '得到总页数
if isempty(pageno) or cint(pageno)<1 or cint(pageno)>mpage then
pageno=1
end if
if isempty(mpage) or cint(mpage)<1 then
mpage=1
end if
if rs.eof then
total = 0
response.write ""
else
total = rs.recordcount
rs.absolutepage = pageno '将指针移至指定页的第一条记录
loopno = pmcount
do while not rs.eof and loopno>0
%>
…………
<%
rs.movenext
loopno = loopno - 1
loop
end if
rs.close
set rs = nothing
%>
<%if request(&