如题，以下是我的 index.asp 代码， 我想让 每页显示 9 个图片，3个一排。

现在的代码是每页显示9个，都显示到一排上了，请问如何修改呢？

即 把

图片 图片 图片 图片 图片 图片 图片 图片 图片
1 2 3 4 ....页

改成

图片 图片 图片

图片 图片 图片

图片 图片 图片
1 2 3 4 .... 页

代码：

<!--#include file="conn.asp"-->
<%
set rs=server.createobject("adodb.recordset")
exec="select * from qccg order by qcal_id desc"
rs.open exec,conn,1,1
%>

<%
rs.pagesize=9
pagecount=rs.pagecount
page=int(request("page"))
if page<=0 then page=1
if request.QueryString("page")="" then
page=1
end if
rs.absolutepage=page
%>
<%
for i=1 to rs.PageSize
if rs.EOF then
exit for
end if
%>

<a href="showw.asp?qcal_id=<%=rs("qcal_id")%>"><img src=showw.asp?qcal_id=<%=rs("qcal_id")%>

height="100" width="100"></a>

<%
rs.movenext
next
%>

<%
rs.close
set bb=nothing
%>

<p>
<% for i=1 to pagecount %>
<a href="index.asp?page=<%=i%>"><%=i%></a>
<%next%>

<%
rs.pagesize=9
pagecount=rs.pagecount
page=int(request("page"))
if page<=0 then page=1
if request.QueryString("page")="" then
page=1
end if
rs.absolutepage=page
%>
<%
for i=1 to rs.PageSize
if rs.EOF then
exit for
end if
%>

......
是分页代码，

<a href="showw.asp?qcal_id=<%=rs("qcal_id")%>"><img src=showw.asp?qcal_id=<%=rs("qcal_id")%>

height="100" width="100"></a>

是显示缩略图代码！具体该怎么修改呢？？

感谢 madpbpl ,能具体些吗???

[此贴子已经被作者于2007-6-6 10:22:19编辑过]