数据库中调用大类下图片怎么实现两行三列显示

现在显示的是三行一列，怎么写成两行三列，以下是代码。请高手帮忙！谢谢！！！

<%
t=0
Set rs=Server.CreateObject("ADODB.RecordSet")
sql="Select* from Product order by id desc"
rs.Open sql,conn,1,1
if not Rs.eof then
do while not rs.eof
t=t+1
%>
<table width="100%" border="0" cellspacing="0" cellpadding="0">

<td align="center"><a href="drslt4.ASP.htm" tppabs="drslt4.ASP" target="_blank"><img src="<%=rs("UploadFiles")%>" alt="" width="213" height="285" border="0"></a></td>

</tr>
<tr>
<td height="28" align="center"><a href="drslt4.ASP.htm" tppabs="drslt4.ASP" target="_blank"><%=left(rs("title"),19)%> </a></td>


</tr>
</table>

<%
if t>=3 then exit do
rs.movenext
loop
else
response.write "<tr><td align=center colspan=2 bgcolor=#E8E8F4>尚无收录</td></tr>"
end if
rs.close
%>

<%
set rs=server.createobject("adodb.recordset")
BigClassName="即热式电热水龙头"
sql="select * from Product where BigClassName='"&BigClassName&"' and Passed=true order by id desc"
rs.open sql,conn,1,1
dim MaPerPage
MaPerPage=9

if rs.eof and rs.bof then
response.Write("<p align=center>暂时没有产品信息</p>")
else
call list1()
end if

'子程序
Sub list1()
%>

<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>

<%i=1 %>
<% Do While Not rs.eof%>
<td align="center"><a href="drslt4.ASP.htm" tppabs="drslt4.ASP" target="_blank"><img src="<%=rs("UploadFiles")%>" alt="" width="213" height="285" border="0"></a></td>

</tr>
<tr>
<td height="28" align="center"><a href="drslt4.ASP.htm" tppabs="drslt4.ASP" target="_blank"><%=left(rs("title"),19)%> </a></td>

<%
if i mod 3 =0 then
Response.Write("</tr>")
end if
i=i+1
if i > MaPerPage then exit do
rs.MoveNext
loop
%>
</tr>
</table>

<%
End sub
rs.close
set rs=nothing
%>

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息