Question

求ASP实现分页显示图片源代码(每页3行，每行4个图片)

求ASP实现分页显示图片源代码
要求：每页3行，每行4个图片，分页显示
数据库为ACCESS

Answer 1

<%
page=request("page")
if page="" or page<1 then
page=1
else page=cint(page)
end if
rs.pagesize=4 '这里设置每页显示的
sumpage=rs.pagecount
if page>sumpage then
page=sumpage
end if
if not rs.eof then
rs.absolutepage=page
end if
%>

在需要循环的代码开始前面写:
<% for x=1 to rs.pagesize
if rs.eof then
exit for
end if%>

在需要循环结束后面写:
<%
rs.movenext
next
%>