请asp高手帮改下代码

一个asp商店的代码
我需要把原来每行显示2个品牌名称改成每行显示6个品牌名称，并且在此页显示所有名称。
请高手帮我直接把代码改好贴上来吧，多谢多谢
<table cellSpacing="0" cellPadding="0" border="0" width="270">
<tr><td > 品牌列表>></td></tr>
<tr><td ><table cellpadding="0" width="90%" border="0" cellspacing=0>
<tr>
<%set rs=server.createobject("adodb.recordset")
rs.open "select top 3000 * from norshop_pinpai order by pinpai_xu DESC,pinpai_id DESC",conn,1,1
i=-1
do while not rs.eof
%>
<%
i=-i
if i=1 then
%>
<td align="left" width="45%" height="23">  <a href="pinpai<%=rs("pinpai_id")%>-1.html"><%=rs("pinpai_name")%></a></td>
<td width="10%" align="center" height="23">|</td&

<table cellSpacing="0" cellPadding="0" border="0" width="270">
<tr><td > 品牌列表>></td></tr>
<tr><td ><table cellpadding="0" width="90%" border="0" cellspacing=0>

<%set rs=server.createobject("adodb.recordset")
rs.open "select top 3000 * from norshop_pinpai order by pinpai_xu DESC,pinpai_id DESC",conn,1,1
i=0
do while not rs.eof
if i=0 then response.write("<tr>")
%>
<td width="15%" height="23"> <a href="pinpai<%=rs("pinpai_id")%>-1.html"><%=rs("pinpai_name")%></a></td>
<%
if i>=5 then
%>
</tr>
<%
i=0
else
%>
<td width="2%" align="center" height="23">|</td>
<%