Problema con la conexion a la Base de datos
Hola a todos.
Me sale este error al hacer la conexión a la base de datos.
-2147467259
[Microsoft][Controlador ODBC Microsoft Access]Error general No se puede abrir la clave 'Temporary (volatile) Jet DSN for process 0x99c Thread 0xaac DBC 0x1038024 Jet' del Registro.
La cadena de conexión es la siguiente:
cadConex = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=URL=" & server.MapPath(".") & "bbddinmobiliaria.mdb"
conn.Open cadConex
Saludos y gracias
Me sale este error al hacer la conexión a la base de datos.
-2147467259
[Microsoft][Controlador ODBC Microsoft Access]Error general No se puede abrir la clave 'Temporary (volatile) Jet DSN for process 0x99c Thread 0xaac DBC 0x1038024 Jet' del Registro.
La cadena de conexión es la siguiente:
cadConex = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=URL=" & server.MapPath(".") & "bbddinmobiliaria.mdb"
conn.Open cadConex
Saludos y gracias
Prueba con esto espero que te sirva.
<%
strConexion = " Driver={MySQL};SERVER=LocalHost;DATABASE=nombrebasededatos;UID=nombreUsuario;PASSWORD=password"
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open Conexion
%>
<%
strConexion = " Driver={MySQL};SERVER=LocalHost;DATABASE=nombrebasededatos;UID=nombreUsuario;PASSWORD=password"
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open Conexion
%>
<%
'Dimension variables
Dim adoCon
Dim rsAct
Dim strSQL
Set adoCon = Server.CreateObject("ADODB.Connection")
adoCon.Open "DBQ=" & Server.MapPath("dataExamenes.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};DriverId=25;MaxBufferSize=8192;Threads=20;"
strSQL = "Insert Into Temporal (USER, CODEXA, NOMEXA, CANTIDAD) "
strSQL = strSQL & "Values (" & "'" & Request.ServerVariables("REMOTE_ADDR") & "', '"
strSQL = strSQL & Request.Form("CODEXA") & "' , '" & Request.Form("NOMEXA") & "', '" & Request.Form("CANEXA") & "')"
Set rsAct = Server.CreateObject("ADODB.Recordset")
rsAct.CursorType = 1
rsAct.LockType = 3
adoCon.Execute(strSQL)
Set rsAct = Nothing
Set adoCon = Nothing
%>
si no dile al hosting que te otorgen permisos de escritura a la carpeta de la base de datos.
'Dimension variables
Dim adoCon
Dim rsAct
Dim strSQL
Set adoCon = Server.CreateObject("ADODB.Connection")
adoCon.Open "DBQ=" & Server.MapPath("dataExamenes.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};DriverId=25;MaxBufferSize=8192;Threads=20;"
strSQL = "Insert Into Temporal (USER, CODEXA, NOMEXA, CANTIDAD) "
strSQL = strSQL & "Values (" & "'" & Request.ServerVariables("REMOTE_ADDR") & "', '"
strSQL = strSQL & Request.Form("CODEXA") & "' , '" & Request.Form("NOMEXA") & "', '" & Request.Form("CANEXA") & "')"
Set rsAct = Server.CreateObject("ADODB.Recordset")
rsAct.CursorType = 1
rsAct.LockType = 3
adoCon.Execute(strSQL)
Set rsAct = Nothing
Set adoCon = Nothing
%>
si no dile al hosting que te otorgen permisos de escritura a la carpeta de la base de datos.
