Sacar datos de sql a una tabla

23/07/2006 - 16:29 por Anton | Informe spam
Buenas, tengo una pagina asp que conecta con una base de datos sql server y
quiero que me muestre en una tabla en la web los datos de una tabla contenida
en el sql, me conecta y me saca datos pero solo me saca la primera fila de la
tabla y quiero que me recorra toda la tabla. Podrian decirme como le digo al
asp que me recorra toda la tabla, gracias. el codigo que tengo es este:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!--#include file="Connections/ssia.asp" -->
<%
Dim Recordset1
Dim Recordset1_numRows

Set Recordset1 = Server.CreateObject("ADODB.Recordset")
Recordset1.ActiveConnection = MM_ssia_STRING
Recordset1.Source = "SELECT * FROM dbo.pipi"
Recordset1.CursorType = 0
Recordset1.CursorLocation = 2
Recordset1.LockType =1
Recordset1.Open()

Recordset1_numRows = 0
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
"http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<title>Documento sin título</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>

<body>
<table width="200" border="1">
<tr>
<td>kasa</td>
<td>kelo</td>
</tr>
<tr>
<td><%=(Recordset1.Fields.Item("kasa").Value)%></td>
<td><%=(Recordset1.Fields.Item("kelo").Value)%></td>
</tr>
</table>

</body>
</html>
<%
Recordset1.Close()
Set Recordset1 = Nothing
%>

Preguntas similare

Leer las respuestas

#1 Juan Gabriel Claure
23/07/2006 - 21:34 | Informe spam
Hola puedes utilizar esto

<% While Not Recordset1.eof %>
<tr>
<td><%=(Recordset1.Fields.Item("kasa").Value)%></td>
<td><%=(Recordset1.Fields.Item("kelo").Value)%></td>
</tr>
<% Recordset1.movenext
Wend
%>

Asi miesntras exista registros se crearan filas en tu tabla, espero que te
ayude

Atte. Juan Gabriel

"Anton" wrote in message
news:
Buenas, tengo una pagina asp que conecta con una base de datos sql server
y
quiero que me muestre en una tabla en la web los datos de una tabla
contenida
en el sql, me conecta y me saca datos pero solo me saca la primera fila de
la
tabla y quiero que me recorra toda la tabla. Podrian decirme como le digo
al
asp que me recorra toda la tabla, gracias. el codigo que tengo es este:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!--#include file="Connections/ssia.asp" -->
<%
Dim Recordset1
Dim Recordset1_numRows

Set Recordset1 = Server.CreateObject("ADODB.Recordset")
Recordset1.ActiveConnection = MM_ssia_STRING
Recordset1.Source = "SELECT * FROM dbo.pipi"
Recordset1.CursorType = 0
Recordset1.CursorLocation = 2
Recordset1.LockType =1
Recordset1.Open()

Recordset1_numRows = 0
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
"http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<title>Documento sin título</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>

<body>
<table width="200" border="1">
<tr>
<td>kasa</td>
<td>kelo</td>
</tr>
<tr>
<td><%=(Recordset1.Fields.Item("kasa").Value)%></td>
<td><%=(Recordset1.Fields.Item("kelo").Value)%></td>
</tr>
</table>

</body>
</html>
<%
Recordset1.Close()
Set Recordset1 = Nothing
%>
Respuesta Responder a este mensaje
#2 Anton
23/07/2006 - 23:06 | Informe spam
Gracias por tu ayuda, me funciona perfectamente :)

"Juan Gabriel Claure" escribió:

Hola puedes utilizar esto

<% While Not Recordset1.eof %>
<tr>
<td><%=(Recordset1.Fields.Item("kasa").Value)%></td>
<td><%=(Recordset1.Fields.Item("kelo").Value)%></td>
</tr>
<% Recordset1.movenext
Wend
%>

Asi miesntras exista registros se crearan filas en tu tabla, espero que te
ayude

Atte. Juan Gabriel

"Anton" wrote in message
news:
> Buenas, tengo una pagina asp que conecta con una base de datos sql server
> y
> quiero que me muestre en una tabla en la web los datos de una tabla
> contenida
> en el sql, me conecta y me saca datos pero solo me saca la primera fila de
> la
> tabla y quiero que me recorra toda la tabla. Podrian decirme como le digo
> al
> asp que me recorra toda la tabla, gracias. el codigo que tengo es este:
>
> <%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
> <!--#include file="Connections/ssia.asp" -->
> <%
> Dim Recordset1
> Dim Recordset1_numRows
>
> Set Recordset1 = Server.CreateObject("ADODB.Recordset")
> Recordset1.ActiveConnection = MM_ssia_STRING
> Recordset1.Source = "SELECT * FROM dbo.pipi"
> Recordset1.CursorType = 0
> Recordset1.CursorLocation = 2
> Recordset1.LockType =1
> Recordset1.Open()
>
> Recordset1_numRows = 0
> %>
> <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
> "http://www.w3.org/TR/html4/loose.dtd">
> <html>
> <head>
> <title>Documento sin título</title>
> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
> </head>
>
> <body>
> <table width="200" border="1">
> <tr>
> <td>kasa</td>
> <td>kelo</td>
> </tr>
> <tr>
> <td><%=(Recordset1.Fields.Item("kasa").Value)%></td>
> <td><%=(Recordset1.Fields.Item("kelo").Value)%></td>
> </tr>
> </table>
>
> </body>
> </html>
> <%
> Recordset1.Close()
> Set Recordset1 = Nothing
> %>



email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida