
18/01/2008, 06:33
|
| | Fecha de Ingreso: enero-2008
Mensajes: 30
Antigüedad: 17 años, 3 meses Puntos: 0 | |
Re: --- ¿¿¿ Como Puedo Hacerlo ??? --- Hola, cambié una vez más el código como me lo mencionaron.
Ahora el error es el siguiente:
************************************************** **********
Microsoft Office Access Database Engine error '80004005'
Error no especificado
/pruebaA.asp, línea 15
************************************************** *************
Y el código de mi página ASP, es la nueva conclusión de todos sus aportes:
------------------------------------------------------------------------------------------------------
<HTML>
<HEAD><TITLE>Leyendo una base de datos de Access con ASP</TITLE></HEAD>
<BODY>
<TABLE BORDER="1">
<TD><B>Nombre<B></TD>
<TD><B>Email<B></TD>
<TD><B>Url<B></TD>
<%
Dim conexion, registros, basedatos
Set conexion = Server.CreateObject("ADODB.Connection")
conexion.Provider="Microsoft.ACE.OLEDB.12.0" conexion.Open("c:\Prueba\ejemplo.accdb")--->Ésta es la línea 15
Set registros = conexion.Execute("SELECT * FROM Ejemplo ORDER BY Ejemplo.Nombre")
Do While Not registros.EOF
%>
<TR>
<TD><%= registros.Fields.item("Nombre").Value %></TD>
<TD><%= registros.Fields.item("Email").Value %></TD>
<TD><%= registros.Fields.item("URL").Value %></TD>
</TR>
<%
registros.MoveNext
Loop
registros.Close
Set registros = Nothing
conexion.Close
Set conexion = Nothing
%>
</TABLE>
</BODY>
------------------------------------------------------------------------------------------------------
Para quitar el error que les mencionaba lo que hice fue:
1. Cómo me recomendó Shiryu_Libra quitar la línea: Persist Security Info=False;
2. Quitar todos los ";" que habían.
De nuevo estancado, alguna idea para ayudarme una vez más? |