<table width="100%" border="0" cellpadding="0" cellspacing="5" class="text-14">
<tr valign="top" class="line-height-01">
<%
if rs.RecordCount > 0 then
i=0
do while not rs.EOF
i=i+1
%>
<td width="20%"><%=rs("BigClassCnName")%></td>
<%
if ibc mod 5 = 0 then '''读出5个记录后跳到下一行
%>
</tr><tr valign="top" class="line-height-01">
<%end if
rs.MoveNext
loop
else
Response.Write "<td height=28>暂时没有产品大类信息!</td>"
end if
rs.Close
%>
</tr>
</table>
<%
while not rst.eof
%>
<%for i=1 to 5
response.write rst("...")
rst.movenext
if rst.eof then
exit for
end if
next%>
<%
if not rst.eof then
rst.movenext
end if
wend
%>