1、推荐用FOR循环语句

for i=1 to Rs.recordcount
  if Rs.Eof then
    Response.write "<tr >"
    Response.write "<td align=center colspan=5>"
    Response.write "无&nbsp;&nbsp;记&nbsp;&nbsp;录"
    Response.write "</td></tr>"
  Exit for
  end if
  if i mod 5=1 then response.write "<tr>"      
    response.write "<td>"&Rs("VideoTitle")&"</td>"
  if i mod 5=0 then response.write "</tr>"  

    Rs.movenext
    next

2、IF语句

<% If not rs.eof Then %>
<table>
<% i = 1 %>
<% do while not rs.eof %>
  <% If i mod 5 = 1 Then%>
    <tr>
  <% End If %>
        <td>
            <%=rs("cname")%>
        </td>
  <% If i mod 5 = 0 Then %>
    </tr>
  <% End If %>
<%
    rs.MoveNext
        i = i + 1
    Loop
%>

3、同一：

<%
rs.open sql,conn,1,1
i=1
do while not rs.eof
if i mod 3 = 1 then
response.write "<br/>"
end if
%>
<td> <img hspace=1 src=""></td>

<%

if i mod 3 =0 then '每行三列
response.write "</tr>"
end if
rs.movenext
i = i + 1
if i = 4 then i = 1
loop
%>