Foros del Web » Programando para Internet » ASP Clásico »

3 en 3

Estas en el tema de 3 en 3 en el foro de ASP Clásico en Foros del Web. Holas, espero q me puedan ayudar, como puedo hacer un listado de articulos, q muestre por fila tres articulos, en la siguiente tres articulos asi ...
  #1 (permalink)  
Antiguo 09/07/2002, 12:37
 
Fecha de Ingreso: enero-2002
Ubicación: Callao - Perú
Mensajes: 1.127
Antigüedad: 22 años, 5 meses
Puntos: 0
3 en 3

Holas, espero q me puedan ayudar, como puedo hacer un listado de articulos, q muestre por fila tres articulos, en la siguiente tres articulos asi sucesivamente ...

Gracias de antemano

SaLuDoS dE:
PePeLuChO dEl PeRú PaRa El MuNdO ;)
  #2 (permalink)  
Antiguo 09/07/2002, 14:08
Avatar de urjose  
Fecha de Ingreso: diciembre-2001
Mensajes: 5.286
Antigüedad: 22 años, 5 meses
Puntos: 1
Re: 3 en 3

<a href='ir.asp?http://www.forosdelweb.com/mensaje.asp?id=87394' target='_blank'>http://www.forosdelweb.com/mensaje.asp?i...</a>

Solo tienes que cambiar el for por un While Not Rs.EOF

Saludos



<center>
<p><a href=http://comunidadguru.com><img border=0 src=http://comunidadguru.com/urjose.gif></a></p>
</center>
  #3 (permalink)  
Antiguo 09/07/2002, 14:11
 
Fecha de Ingreso: enero-2002
Ubicación: Callao - Perú
Mensajes: 1.127
Antigüedad: 22 años, 5 meses
Puntos: 0
Re: 3 en 3

Muchisimas gracias por la ayuda, pero soy un poco lento para capar, me podrias explicar un poco mas PORFA!!!!


SaLuDoS dE:
PePeLuChO dEl PeRú PaRa El MuNdO ;)
  #4 (permalink)  
Antiguo 09/07/2002, 14:18
Avatar de urjose  
Fecha de Ingreso: diciembre-2001
Mensajes: 5.286
Antigüedad: 22 años, 5 meses
Puntos: 1
Re: 3 en 3

&lt;table width=&quot;100%&quot; border=&quot;0&quot; cellspacing=&quot;0&quot; cellpadding=&quot;0&quot;&gt;
&lt;tr&gt;
&lt;%
counter=0
Do While Not Rs.EOF
%&gt;
&lt;td&gt;&lt;%=i%&gt;&lt;/td&gt;
&lt;%
counter=counter+1
If counter MOd 3=0 Then Response.Write &quot;&lt;/tr&gt;&lt;tr&gt;&quot;
Loop
%&gt;
&lt;/tr&gt;
&lt;/table&gt;

Cada vez que counter llega a algun numero que al ser dividido entre 3 da 0 hace una nueva fila. Esto sucede cada 3 registros por lo tanto crea nuevas filas mostrando 3 celdas por cada fila.

Saludos

<center>
<p><a href=http://comunidadguru.com><img border=0 src=http://comunidadguru.com/urjose.gif></a></p>
</center>
  #5 (permalink)  
Antiguo 09/07/2002, 14:28
 
Fecha de Ingreso: enero-2002
Ubicación: Callao - Perú
Mensajes: 1.127
Antigüedad: 22 años, 5 meses
Puntos: 0
Re: 3 en 3

Gracias de nuevo, y vengo con otra pregunta, lo estoy haciendo de esta forma:
&lt;!--#include file=&quot;setup/setup.asp&quot; --&gt;
&lt;%
set rs=server.createobject(&quot;adodb.recordset&quot; )
sql=&quot;select *from articulos&quot;
rs.open sql,cn
%&gt;
&lt;table width=&quot;100%&quot; border=&quot;0&quot; cellspacing=&quot;0&quot; cellpadding=&quot;0&quot;&gt;
&lt;tr&gt;
&lt;%
counter=0
Do While Not Rs.EOF
%&gt;
&lt;td&gt;&lt;%=rs(&quot;nombre&quot;)%&gt;&lt;/td&gt;
&lt;%
counter=counter+1
If counter MOd 3=0 Then Response.Write &quot;&lt;/tr&gt;&lt;tr&gt;&quot;
Loop
%&gt;
&lt;/tr&gt; &lt;/table&gt;
-*-*-*-*-*-*-*-*-**-**-*-*-*-*-*-*-*-*-
Pero al tratar de displaya no sale nada, que es lo q me falta???
  #6 (permalink)  
Antiguo 09/07/2002, 14:32
Avatar de urjose  
Fecha de Ingreso: diciembre-2001
Mensajes: 5.286
Antigüedad: 22 años, 5 meses
Puntos: 1
Re: 3 en 3

Bueno, NO al Copy &amp; Paste

por ahi te falta un Rs.MoveNext

Saludos

<center>
<p><a href=http://comunidadguru.com><img border=0 src=http://comunidadguru.com/urjose.gif></a></p>
</center>
  #7 (permalink)  
Antiguo 09/07/2002, 14:37
 
Fecha de Ingreso: enero-2002
Ubicación: Callao - Perú
Mensajes: 1.127
Antigüedad: 22 años, 5 meses
Puntos: 0
Re: 3 en 3

Gracias, si faltaba el rs.movenext, te debo una aunq no pueda ayudarte como me ayudaste.


SaLuDoS dE:
PePeLuChO dEl PeRú PaRa El MuNdO ;)
  #8 (permalink)  
Antiguo 09/07/2002, 14:45
 
Fecha de Ingreso: julio-2002
Mensajes: 219
Antigüedad: 21 años, 11 meses
Puntos: 0
Re: 3 en 3

AQUÍ TIENES UN EJEMPLO QUE HACE LO QUE URJOSE TE EXPLICA.

&lt;%@ Language=VBScript %&gt;
&lt;HTML&gt;
&lt;HEAD&gt;
&lt;META NAME=&quot;GENERATOR&quot; Content=&quot;Microsoft Visual Studio 6.0&quot;&gt;
&lt;/HEAD&gt;
&lt;BODY&gt;
&lt;%
Dim objCon, RS, counter

'Conexión con la base de datos
Set objCon = Server.CreateObject(&quot;ADODB.Connection&quot;)
objCon.Open(&quot;DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=&quot; &amp; Server.MapPath(&quot;BDPrueba.mdb&quot;))
strSQL = &quot;SELECT * FROM Respuesta&quot;
Set RS = objCon.Execute(strSQL)
%&gt;
&lt;table width=&quot;100%&quot; border=&quot;0&quot; cellspacing=&quot;0&quot; cellpadding=&quot;0&quot;&gt;
&lt;tr&gt;
&lt;%
counter=0
Do While Not Rs.EOF
%&gt;
&lt;td&gt;&lt;%=rs(&quot;nombre&quot;)%&gt;&lt;/td&gt;
&lt;%
counter=counter+1
RS.MoveNext
If counter MOd 3=0 Then Response.Write &quot;&lt;/tr&gt;&lt;tr&gt;&quot;
Loop
%&gt;
&lt;/tr&gt; &lt;/table&gt;
&lt;/BODY&gt;
&lt;/HTML&gt;

Suerte.
  #9 (permalink)  
Antiguo 09/07/2002, 15:43
 
Fecha de Ingreso: mayo-2001
Ubicación: Monterrey, N.L.; México
Mensajes: 558
Antigüedad: 23 años
Puntos: 0
Re: 3 en 3

Aqui esta lo que yo hice cuando Urjose me ayudo a mi...

&lt;table width=&quot;100%&quot; border=&quot;0&quot; cellspacing=&quot;0&quot; cellpadding=&quot;0&quot;&gt;
&lt;tr&gt;
&lt;%
counter=0
while (NOT RS1.EOF)
%&gt;
&lt;td&gt;&lt;a href=&quot;&lt;%=Rs1.fields.item(&quot;Cat_Url&quo t;).value%&gt;&quot; style=&quot;text-decoration: none&quot;&gt;&lt;%=Rs1.fields.item(&quot;categori a&quot;).value%&gt;&lt;/a&gt;&lt;/td&gt;
&lt;%
counter=counter+1
If counter MOd 3=0 Then Response.Write &quot;&lt;/tr&gt;&lt;tr&gt;&quot;
Rs1.movenext()
wend
%&gt;
&lt;/tr&gt;
&lt;/table&gt;


Espero entiendas amigo, sino, aqui andamos

Saludos

Owen Bonilla
Webmaster Weblaguna S. C.
[email protected]
[email protected]

  #10 (permalink)  
Antiguo 09/07/2002, 16:12
Avatar de Sir Matrix  
Fecha de Ingreso: octubre-2000
Ubicación: Dentro de mi cabeza. ono?
Mensajes: 1.264
Antigüedad: 23 años, 8 meses
Puntos: 3
Re: 3 en 3

estaba viendo el código y me aparecieron unas dudas:
Cita:
Cada vez que counter llega a algun numero que al ser dividido entre 3 da 0 hace una nueva fila.
Sólo el 0 si lo divides en 3 da 0

Podrían explicar lo que significa MOd??

saludos

<p align="center">
<EMBED src="http://www.webmagic.cl/firmafdw.swf" quality=high wmode=transparent WIDTH="260" HEIGHT="60" NAME="wc"></EMBED>
</p>
  #11 (permalink)  
Antiguo 09/07/2002, 17:21
Avatar de urjose  
Fecha de Ingreso: diciembre-2001
Mensajes: 5.286
Antigüedad: 22 años, 5 meses
Puntos: 1
Re: 3 en 3

Bueno me refería al residuo.

Mod, te regresa el residuo de una división.

Saludos

<center>
<p><a href=http://comunidadguru.com><img border=0 src=http://comunidadguru.com/urjose.gif></a></p>
</center>
  #12 (permalink)  
Antiguo 09/07/2002, 22:48
Avatar de Sir Matrix  
Fecha de Ingreso: octubre-2000
Ubicación: Dentro de mi cabeza. ono?
Mensajes: 1.264
Antigüedad: 23 años, 8 meses
Puntos: 3
Re: 3 en 3

gracias urjose, ya se me ha aclarado

<p align="center">
<EMBED src="http://www.webmagic.cl/firmafdw.swf" quality=high wmode=transparent WIDTH="260" HEIGHT="60" NAME="wc"></EMBED>
</p>
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 00:31.