Ke cada 3 registro agregue un salto de linea

[Berletzis]

ke onda chavos otra vez yo.... me surjen muchas dudas hoy lunes(mexico)


miren tengo mi consulta a la base de datos, la cual me despliega mis registros hacia abajo como si fuera excel CLASICO.

Ahora lo ke deseo es poner los datos en forma de tarjeta de presentacion pos asi decirlo, y que me despliegue 3 tarjetas y ke la cuarta aparesca ya abajo.

La tarjetita ya esta diseñada y ´pues es solo una tabla con sus celdas, dentro de mi while pues ya se despligan todos mis registro en forma de tarjetita y aparte ya se despliegan todos a la derecha... PERFECTO

Ahora lo unico ke kiero eske cada 3 registro me agregue un <TR></TR> y asi sucesivamente..

Como le hago para decirle ke haga algo cada X cantidad de registros???

Gracias de nuevo t toy en linea para cualkier cosa ke pueda ayudar GRACIAS....

[u_goldman]

Algo así

Código:

x = 1

While not rs.Eof
  If x = 3 Then
     Response.Write "</tr><tr>"
     x = 1
  End If
  Response.Write "<td>" & rs("campo") & "</td>"
  x = x + 1
  rs.MoveNext
Wend

[Berletzis]

Oyesssss goldman si esta bien tu codigo el problema es ke solo llega al TRES y hasta ahi se keda, pero lo ideal eske siguera sumando y ke ya sea 3,6,9 etc... fuera haciendo el corte no crees????

ke opinas??????? digo ya se ke dijiste algo asi es solo un comentario

[AlZuwaga]

Intentá así:


x = 1

While not rs.Eof
If x MOD 3 = 1 Then
Response.Write "</tr><tr>"
End If
Response.Write "<td>" & rs("campo") & "</td>"
x = x + 1
rs.MoveNext
Wend


Igual no le veo eror al código de u_g

[u_goldman]

No será que tienes 3 registros en la DB?
Acuérdate también que antes de este código deberías poner el tag de <table>, posque no pones un poco mas de tu código, igual también la solución de AZ me parece mejor.


Salu2,

[Berletzis]

ok perenme unos 10 minutitos porke taba intenando asi como dice AZ wait a moment please!!!!

[Berletzis]

hay ta mi codigo como lo estoy poniendo haber ke opininan????

<%

x=1

lintRegistrosEnPantalla= 0
do while not lobjRst.EOF and CuantosRegistros < TamPagina
lintRegistrosEnPantalla = lintRegistrosEnPantalla +1

%>
<table class="inforationtext" width="303" border="0" align="left" bordercolor="#d6d3ce" id="table1">

<tr>
<td class="Informationtext" Textheight="10%" style="border-style: solid; border-width: 1px; padding-left: 4px; padding-right: 4px; padding-top: 1px; padding-bottom: 1px" align="left">
<p align="right">

</td>
</tr>


<tr>
<td class='informationtext' style="border-style: solid; border-width: 1px; padding-left: 4px; padding-right: 4px; padding-top: 1px; padding-bottom: 1px" align="center" width="273">
<table class="informationtext" width="302">
<tr>
<td align="left" valign="top">&nbsp;
<b></b>
</td>
<td align="left" valign="top">
<b>&nbsp;<%=lobjRst.fields("fecFEcha")%></b></td>
<td align="left" valign="top"><b>&nbsp;
<%=lobjRst.fields("strHora")%></b></td>
<td align="left" valign="top"><b>&nbsp;
<%=lobjRst.fields("strCiudad")%></b></td>
</tr>
</table>

</td>
</tr>


<tr>
<td class='informationtext' width="289" style="border-style: solid; border-width: 1px; padding-left: 4px; padding-right: 4px; padding-top: 1px; padding-bottom: 1px" height="8">
<p align="left"><b>TEMA:<%=lobjRst.fields("strTema")% > </b></td>
</tr>

<tr>
<td class='informationtext' width="289" style="border-style: solid; border-width: 1px; padding-left: 4px; padding-right: 4px; padding-top: 1px; padding-bottom: 1px" height="9">
<table width="301">
<tr>
<td class="informationtext" width="272"><%=lobjRst.fields("strNombre")%>&nbsp; </td>
<td width="19">
<img title="<%=lobjRst.fields("streMail")%>" border="0" src="../Imagenes_Sistema_AW/btn_Mail.png" width="17" height="14"></td>
</tr>
</table>

</td>
</tr>
<tr>
<td class='informationtext' width="273" style="border-style: solid; border-width: 1px; padding-left: 4px; padding-right: 4px; padding-top: 1px; padding-bottom: 1px" height="10">
<%=lobjRst.fields("strMensaje")%></td>
</tr>
<tr>
<td class='informationtext' width="273" style="border-style: solid; border-width: 1px; padding-left: 4px; padding-right: 4px; padding-top: 1px; padding-bottom: 1px" height="17">
</td>
</tr>

<tr>
<td class='titulogris' height="18" style="border-style: solid; border-width: 1px; padding-left: 4px; padding-right: 4px; padding-top: 1px; padding-bottom: 1px">&nbsp; </td>
</tr>


</table>


<%
If x MOD 3 = 1 Then
Response.Write "</tr><tr>"
End If
x = x+1



CuantosRegistros=CuantosRegistros+1
lobjRst.MoveNext
loop


lobjRst.Close





%>

[u_goldman]

Claro, no tienes la tabla y el operador mod, te regresa el residuo de una división, por lo tanto, me parece que tendrías que evaluar cuando el residuo sea = 0 no?

Código:

<table>
<% 
x = 1
If x MOD 3 = 0 Then
  Response.Write "</tr><tr>"
End If
  x = x+1
  CuantosRegistros=CuantosRegistros+1
  lobjRst.MoveNext
loop
lobjRst.Close
%>
<table> 

A ver que tal...

[AlZuwaga]

Si, es cierto. Lo correcto era:

If x MOD 3 = 0 Then...


Fue un error de (y eso que recién es martes )

[Berletzis]

Oigan si gue sin salirme porke sera????
estoy siguiendo todo a la perfeccion pero sigue con solo ponerme los 2 primeros y despues hace el tr pero namas para los pimeros dos los demas los hace seguidos

Mi codigo sigue siendo el mismo de arriba.. y no me sale
ke podra ser