No consigo conectar y leer base datos access

02/12/2004 - 19:03 por DeimoXXX | Informe spam

Hola amigos:

Estoy intentando conectar a una base de datos Access con ASP y hacer la
selección de dos registros.
Despues de muchos días intentandolo de todas las maneras y buscando por la
red toda clase de tutoriales, no lo he conseguido. :'(

Lo más cercano que he estado a conseguirlo es con este código. Pero al
ejecutarlo no aparece nada de nada.
No aparece ningún registro de la base de datos, pero tampoco ningún error.
:o

A ver si alguién puede echarme una mano. Muchas gracias.

(Utilizo DreamWeaver)

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<html>
<head>
<title>Documento sin título</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>

<body>
<%
Dim con as New ADODB.connection
Dim cadena_DSN AS string

cadena_DSN="Driver={Microsoft Access Driver (*.mdb)};" & _
"Dbq=c:\inetpub\wwwroot\basedatos.mdb;" & _
"Uid=Admin; Pwd="

con.Open cadena_DSN

'creamos la sentecia SQL
sSQL="Select * From NombreTabla"

'Ejecutamos la orden
set RS=Con.Execute(sSQL)

'Mostramos los registros
%>

<table align="center">
<tr>
<th>Nombre</th>
<th>Teléfono</th>
</tr>
<%
Do While Not RS.Eof
%>
<tr>
<td><%=RS("campo1")%></td>
<td><%=RS("campo2")%></td>
</tr>
<%
RS.MoveNext
Loop

'Cerramos el sistema de conexion
Con.Close
%>

</table>

<div align="center">
<a href="insertar.html">Añadir un nuevo registro</a><br>
<a href="actualizar1.asp">Actualizar un registro existente</a><br>
<a href="borrar1.asp">Borrar un registro</a><br>
</div>
</body>
</html>

Siga el debate

2 respuestas

Tengo una respuesta

DRAGON AGE™: INQUISITION – Matadragones

Leer las respuestas

#1 Matias Iacono

02/12/2004 - 20:02 | Informe spam

Ese codigo que posteas es de Visual Basic, o de ASP.net

Si lo que quieres hacer es ASP normal, en www.aspfacil.com hay de todo un
poco.

Saludos

Matias Iacono
Microsoft MVP

"DeimoXXX" wrote in message
news:gOIrd.4096500$

Hola amigos:

Estoy intentando conectar a una base de datos Access con ASP y hacer la
selección de dos registros.
Despues de muchos días intentandolo de todas las maneras y buscando por la
red toda clase de tutoriales, no lo he conseguido. :'(

Lo más cercano que he estado a conseguirlo es con este código. Pero al
ejecutarlo no aparece nada de nada.
No aparece ningún registro de la base de datos, pero tampoco ningún error.
:o

A ver si alguién puede echarme una mano. Muchas gracias.

(Utilizo DreamWeaver)

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<html>
<head>
<title>Documento sin título</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>

<body>
<%
Dim con as New ADODB.connection
Dim cadena_DSN AS string

cadena_DSN="Driver={Microsoft Access Driver (*.mdb)};" & _
"Dbq=c:\inetpub\wwwroot\basedatos.mdb;" & _
"Uid=Admin; Pwd="

con.Open cadena_DSN

'creamos la sentecia SQL
sSQL="Select * From NombreTabla"

'Ejecutamos la orden
set RS=Con.Execute(sSQL)

'Mostramos los registros
%>

<table align="center">
<tr>
<th>Nombre</th>
<th>Teléfono</th>
</tr>
<%
Do While Not RS.Eof
%>
<tr>
<td><%=RS("campo1")%></td>
<td><%=RS("campo2")%></td>
</tr>
<%
RS.MoveNext
Loop

'Cerramos el sistema de conexion
Con.Close
%>

</table>

<div align="center">
<a href="insertar.html">Añadir un nuevo registro</a><br>
<a href="actualizar1.asp">Actualizar un registro existente</a><br>
<a href="borrar1.asp">Borrar un registro</a><br>
</div>
</body>
</html>

Leer las otras respuestas

Preguntas similares

Busqueda sugerida :