我用这个方法实现了横向重复域，可是图片到了五个，依然没有换行，不知道是什么原因？请高手来指点一下！
<%
                 i=0
                While ((Repeat2__numRows <> 0) AND (NOT rsphoto.EOF))
                 i=1+1
%>
<td align="center"><table width="140" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center"><a href="javascript:view2('showphoto.asp?Pid=<%=rsphoto("Pid")%>')"><img src="photo/<%=(rsphoto.Fields.Item("photo").value)%>" width="100" height="100" style="border: 1px solid #006600"></A></td>
</tr>
<tr>
<td align="center"><a href="javascript:view2('showphoto.asp?Pid=<%=rsphoto("Pid")%>')"><%=(rsphoto.Fields.Item("Pname").value)%></a></td>
</tr>
</table></td>
<%if i>4 then
                 i=0
                 %>
</tr>
<%end if %>
<%
Repeat2__index=Repeat2__index+1
Repeat2__numRows=Repeat2__numRows-1
rsphoto.MoveNext()
Wend
%>

(2005-05-18 21:52:36) tonton
<table border="0">
<%
Set Rs = ......
Const Cols = 2    '确定要分几列
Const Rows = 10 '确定一页有几个记录，即 PageSize
Dim i
For i=1 To Rows\Cols
%>
<tr>
<%    If Rs.Eof Then    %>
<td width="200">&nbsp;</td>
<%    Else    %>
<td width="200">
    <!-- 在这里加入显示一个记录的代码 -->
    </td>
<%        Rs.MoveNext
    End If
%>
</tr>
<%
Next
%>
</table>