asp下循环一行多少个

1. <%      
2. set rs = server.createobject("adodb.recordset")      
3. sql = "Select * from friend order by id DESC"     
4. rs.Open sql,conn,1      
5. i=1      
6. do while not rs.eof      
7. %>      <td align="left" height="50">      
8.             <a href="<%=rs("url")%>" target="_blank">      
9.             <img src="<%=rs("logo")%>" class="framed" width="88" height="31" alt="<%=rs("name")%>" /></a>      
10.         </td>      
11. <%      
12. if i mod 5 = 0 then      
13. Response.Write("</tr><tr>")      
14. end if      
15. i=i+1      
16. rs.movenext      
17. Loop     
18. rs.close      
19. set rs=nothing      
20. %>