Mostrar todos los registros

Cuezaltzin · #1 (**permalink**) 18/12/2003, 21:06

Hola a todos.

Estoy tratando de imprimir todos los registros de mi base de datos por medio de las siguiente instruccion solo que este codigo solo imprime los datos de arriba hacia abajo:

<% DO UNTIL table.Eof%>
<%table.MoveNext
LOOP%>

Pero ese codigo solo lo imprime de qrriba hacia a abajo.

Lo que estoy tratando de hacer es que me imprima de izquierda a derecha como puedo hacer esto.

Por su ayuda mil gracias. Espero haberme explicado bien.

AlZuwaga · #2 (**permalink**) 18/12/2003, 22:54

este código que mostrás...

<% DO UNTIL table.Eof%>
<%table.MoveNext
LOOP%>

... no "imprime nada"... sólo recorre el recordset para que vos hagas lo que quieras con él.

Ahora... decinos qué es de "arriba a abajo" y qué es de "izquierda a derecha"... qué es? una trabla, párrafos o qué?

Por favor... intentá ser más explícito!

Cuezaltzin · #3 (**permalink**) 19/12/2003, 12:46

Bueno ahi va espero ahora si explicarme bien.

Yo tengo el siguiente codigo que me muestra todos los registros de una base de datos:

<%

dim BDDD
dim table
dim SQL1

chk= Request.querystring("chk")

Set BDDD = Server.CreateObject ("ADODB.Connection")
Set table = Server.CreateObject ("ADODB.RecordSet")
BDDD.Open ("PROVIDER=Microsoft.Jet.OLEDB.4.0 ;DATA SOURCE=" + Server.MapPath(".\Produtos.mdb"))

SQL1 = "SELECT * FROM PCamarasDigitales WHERE ID IN ("&chk&") "

table.ActiveConnection=BDDD
table.Open SQL1
%>

<body>

<div align="left">
<table border="0" width="339" height="371" id="AutoNumber1" cellspacing="0">
<tr>
<td width="162" height="19"> </td>
<td width="161" height="19"> </td>
</tr>
<tr>
<td width="162" height="83"> </td>

<td width="161" height="86" align="center"><% Response.Write ("<img border=""0"" src="" " & table("IMG")& " "" width=""96"" height=""100"" > " )%></td>
</tr>
<tr>
<td width="162" height="22" align="right" bgcolor="#DBDBDB">
Marca</td>

<td width="161" height="22" align="center"><%=table("Marca") %></td>
</tr>
<tr>
<td width="162" height="26" align="right" bgcolor="#DBDBDB">
Características</td>
<td width="161" height="26" align="center"><%=table("Caracteristicas") %></td>
</tr>
<tr>
<td width="162" height="25" align="right" bgcolor="#DBDBDB">
Precio</td>

<td width="161" height="25" align="center"><%=table("Precio") %></td>
</tr>
<tr>
<td width="162" height="20" bgcolor="#0044B6">Especificaciones</td>
<td width="161" height="20" bgcolor="#DBDBDB"> </td>
</tr>
<tr>
<td width="162" height="28" align="right" bgcolor="#DBDBDB">
Modelo</td>
<td width="161" height="28" align="center"><%=table("Modelo") %></td>
</tr>
<tr>
<td width="162" height="25" align="right" bgcolor="#DBDBDB">
Mega píxeles</td>
<td width="161" height="25" align="center"><%=table("Megapixeles") %></td>
</tr>
<tr>
<td width="162" height="25" align="right" bgcolor="#DBDBDB">
Zoom</td>
<td width="161" height="25" align="center"><%=table("Zoom") %></td>
</tr>
<tr>
<td width="162" height="25" align="right" bgcolor="#DBDBDB">
Pantalla</td>
<td width="161" height="25" align="center"><%=table("Pantalla") %></td>
</tr>
<tr>
<td width="162" height="25"> </td>
<td width="161" height="25"> </td>
</tr>
</table>
</div>

</body>

</html>

Con este codigo me despliega los registro en forma vertical y yo quiero en forma horizontal como le puedo hacer.

Un ejemplo seria el que esta en la pagina:
http://pcworld.pricegrabber.com/sear...3d5fe450de0ed.
Y cuando le das en el boton de compare te muestra los registros en forma horizontal como puedo hacer eso

Por tu ayuda gracias.

Ysdragil · #4 (**permalink**) 19/12/2003, 17:13

En tu codigo veo que estas escribiendo encabezados para cada valor de imprimes de la base de datos, lo cual lo hace mas complicado. Lo que se me ocurre es que utilices un record.count para que sepas desde un inicio cuantos registros traes en el Recordset, despues colocas un For i=1 To No.Reg para que escribas tus encabezados y despues escribes un renglon <tr> y haces un loop con las columnas <td>, de esa forma te va a quedar cuadrado con tus encabezados

Espero te sirva