Error ADODB.Connection error '800a0046'

Erika H. escribió:

Hola que tal a todos, tengo un problema con una pagina, tengo un formulario
donde solicito ingresen datos personales para hacer envio de informacion,
esta informacion la ingreso en una BD en Access, me conecto de la siguiente
manera:
dbpath = server.mappath("datasources\ptmw.mdb")
oConn.Open "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=" & dbPath & ";"
Pero cuando llego a la linea para abrir la tabla me manda el siguiente error:
ADODB.Connection error '800a0046'
Permission denied
/cd_request_response.asp, line 23
La linea 23 es la que hace la llamada a Access
oConn.Open "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=" & dbPath & ";"
Alguien sabe porque me manda este error?, la carpeta donde esta la BD tiene
permisos de Lectura y escritura. De hecho me manda es error con cualquier
Base de datos que haga.
Agradezco su ayuda pues ya tengo con esto 4 dias y no encuentro que puede
ser.
Salu2

Buenas noches:
Revisa que el archivo tenga permisos de escritura. Por si las dudas,
prueba el server.mappath no de manera virtual sino como archivo, con
ruta física completa.
Si esto no resulta, prueba usar un archivo asp para conexión algo como esto:

<%
Dim Conexion,Tabla
Set Conexion=Server.CreateObject("adodb.connection")
Set Tabla1=Server.CreateObject("adodb.recordset")
Set Tabla2=Server.CreateObject("adodb.recordset")
Set Tabla3=Server.CreateObject("adodb.recordset")
Conexion.open "Provider=Microsoft.Jet.OLEDB.4.0; Data
Source=f:\inetpub\datasources\ptmw.mdb"
%>

y lo colocas al inicio de la página asp que realiza los procesos con la
base de datos como un include

Espero que mi comentario te sea de utilidad
Un saludo desde Lima, Perú

ACD

Hola que tal Arturo Agradezco tu ayuda pero ya hice es prueba y sigo teniendo
el mismo problema, incluso ya hice un DNS, ya cambie la base de datos a otro
folder, ya le di todos los permisos ya intente como me indicaste y nada me
sigue marcando el mismo error:

<%
Sub PTWM_BASE
dbpath = server.mappath("Dbase_PTMW\ptmw.mdb")
Response.Write"valor :"&dbpath&""
'dbpath = server.mappath("EXAMPLEPTMW.mdb")
'dbpath=C:\Inetpub\wwwroot\EXAMPLEPTMW.mdb
' Response.Write"valor :"&dbpath&""
Set oConn=Server.CreateObject("ADODB.Connection")
'Set rs=Server.CreateObject("ADODB.Recordset")
'OConn.Open "DNS=Ex_ptmw"
' oConn.Open "PROVIDER={MICROSOFT Driver Access(*.mdb)};DBQ="&dbpath&";"
oConn.Open "PROVIDER={MICROSOFT Driver
Access(*.mdb)};DBQ=C:\Dbase_PTMW\EXAMPLEPTMW.mdb"
'oConn.Open "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=" & dbpath & ";"
End Sub
%>

En cualquier parte donde muevo la BD me marca el mismo error:
ADODB.Connection error '800a0046'
Permission denied
Que otra cosa podria checar?..
Agradezco tu atencion y ayuda
Saludos desde Mexico!!...




"Arturo Costa Delgado" wrote:

Erika H. escribió:
> Hola que tal a todos, tengo un problema con una pagina, tengo un formulario
> donde solicito ingresen datos personales para hacer envio de informacion,
> esta informacion la ingreso en una BD en Access, me conecto de la siguiente
> manera:
> dbpath = server.mappath("datasources\ptmw.mdb")
> oConn.Open "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=" & dbPath & ";"
> Pero cuando llego a la linea para abrir la tabla me manda el siguiente error:
> ADODB.Connection error '800a0046'
> Permission denied
> /cd_request_response.asp, line 23
> La linea 23 es la que hace la llamada a Access
> oConn.Open "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=" & dbPath & ";"
> Alguien sabe porque me manda este error?, la carpeta donde esta la BD tiene
> permisos de Lectura y escritura. De hecho me manda es error con cualquier
> Base de datos que haga.
> Agradezco su ayuda pues ya tengo con esto 4 dias y no encuentro que puede
> ser.
> Salu2
Buenas noches:
Revisa que el archivo tenga permisos de escritura. Por si las dudas,
prueba el server.mappath no de manera virtual sino como archivo, con
ruta física completa.
Si esto no resulta, prueba usar un archivo asp para conexión algo como esto:

<%
Dim Conexion,Tabla
Set Conexion=Server.CreateObject("adodb.connection")
Set Tabla1=Server.CreateObject("adodb.recordset")
Set Tabla2=Server.CreateObject("adodb.recordset")
Set Tabla3=Server.CreateObject("adodb.recordset")
Conexion.open "Provider=Microsoft.Jet.OLEDB.4.0; Data
Source=f:\inetpub\datasources\ptmw.mdb"
%>

y lo colocas al inicio de la página asp que realiza los procesos con la
base de datos como un include

Espero que mi comentario te sea de utilidad
Un saludo desde Lima, Perú

ACD

Buenos días Erika:
¿Has probado como sugerí el usar un archivo asp externo con la cadena de
conexión tal cual puse en el ejemplo?

Un saludo desde Lima, Perú

ACD

Hola Arturo, asi es ya hice lo que me comentaste, incluso ya meti todo el
codigo en una funcion, el problema que note, es al conectarme a la base de
datos, ya la movi a otra carpeta, ya le cambie los permisos pero aun asi me
marca el mismo error.
Ya le di eveyone y full control pero nada me sigue arrojando permiso
denegado..

Saludos y gracias por tu atencion


"Arturo Costa Delgado" wrote:

Buenos días Erika:
¿Has probado como sugerí el usar un archivo asp externo con la cadena de
conexión tal cual puse en el ejemplo?

Un saludo desde Lima, Perú

ACD

¿Estas al día en actualizaciones?¿Que hiciste de diferente hace 4 días
para que dejara de funcionar?. Me refiero, asumo que antes de esto
funcionaba bien pero algo debes haber hecho sin darte cuenta que ha
alterado el comportamiento normal del IIS.

Revista este artículo

http://www.tek-tips.com/viewthread.cfm?qid90859&page=2

Sólo por las dudas ¿podrías publicar el código completo de tu página?.
También indicame la ruta física donde almacenas tus archivos de base de
datos. Estoy asumiendo que estas usando la carpeta por default que
instala el IIS (inetpub/wwwroot/tu-web)

Un saludo desde Lima, Perú

ACD