Ver Mensaje Individual
  #2 (permalink)  
Antiguo 28/10/2004, 15:36
Avatar de u_goldman
u_goldman
Moderador
 
Fecha de Ingreso: enero-2002
Mensajes: 8.031
Antigüedad: 23 años, 4 meses
Puntos: 98
Bueno, entonces la parte lógica ya está casi en su totalidad, y tu problema es con la impresión de los datos no?

Código:
<%
x = 1
%>
<table border=1 cellpadding=2 cellspacing=0>
  <tr>
    <td>
     <%
        While not rs.EOF
           If x mod 5 = 0 Then
                Response.write "</td><td>"
                x = 1
           End If
           Response.Write rs("campo") & "<br>"
           x = x + 1  
           rs.MoveNext 
        Wend
    %>
   </td>
  </tr>
</table>
Algo así...en realidad lo único que hay que controlar es el flujo de una variable para que cuando sea dividida entre 5 y su residuo sea 0, imprima una columna más y continúe con la impresión de los registros.


Salu2,
__________________
"El hombre que ha empezado a vivir seriamente por dentro, empieza a vivir más sencillamente por fuera."
-- Ernest Hemingway