我的数据库里有12条记录，现在我把它按如下排列的代码是：

1  5  9  

2  6  10  

3  7  11  

4  8  12

连接数据库：
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<TR>
<%
For i = 1 To 12
If i Mod 4=1 Then
%>
<TD valign="top"><table width="199"  border="0" cellpadding="0" cellspacing="0">
<%
End if
%>
<tr>
  <TD height="230"><%= rs("name")%></TD>
</TR>
<%
  rs.movenext  
If i Mod 4=0 Then
%>
</TABLE></TD>
<%
End If
next 
%>
</TR></TABLE>


如果我想把排列改成

1    2    3  

4    5    6  

7    8    9  

10  11   12

并且用上面的代码来改，应该怎么改