consulta en 2 columnas

[Adler]

Hola

Shiryu que de tiempo!!!

Has de usar getrows, como te dice el sensei. Para que veas como se hace a dos columnas prueba con esto. Compremdelo y adaptalo al caso que te ocupa

Código asp:

<%
Dim total_registros_encontrados, j, temp, x, arreglo, i
total_registros_encontrados = 52
 
For j = 0 to CInt(total_registros_encontrados) Step 5
temp = temp & " " & j
Next 'j
 
arreglo = Split(Replace(Trim(temp), " ", ","),",")
 
For x = 0 to UBound(arreglo)
arreglo(x) = arreglo(x)
Next
%>
 
<table border="1">
<tr>
 
<%
For i = 1 to CInt(total_registros_encontrados)
Response.Write "<td>" & i & "</td>"
 
 
' ==== Se puede hacer de
' -------- Esta manera
If i Mod 5 = 0 Then 
Response.Write "</tr><tr>"
End If
' ------
' ------ O de esta otra
'cad = " i = " & Join(arreglo, " or  i  = ")
'If eval(cad) Then
'fila = i / 5
'Response.Write "</tr><tr>"
'End if
' ---------
' ==============
Next 'i
 
%>
</tr>
</table>
 

Suerte