He hecho una sesion privada para una web, en la que cargo una serie de datos(upload de archivos, administracion de pass, etc..)
El problema es que el servidor me tira este error.
Provider error '80004005'
Unspecified error
/avanza/area/config_login.asp, line 13
Otras veces me ha pasado pero lo e solucionado restableciendo los permisos...
pero esta vez no...
el codigo es este...
<% 'Para los redireccionamientos
Response.Buffer=True
Dim oConn, rs, SQL, nombre, password, fallos
Dim miuser,mipass
'Recogemos el formulario
nombre=Trim( Request.Form("txtUsuario") )
password=Trim ( Request.Form("txtClave") )
set oConn=Server.CreateObject("ADODB.Connection")
'oConn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("../html/bd/experience.mdb")
set oConn=Server.CreateObject("ADODB.Connection")
oConn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("usuarios.mdb")--------------------ESTA ES LA LINEA 13---------
SQL="SELECT * FROM usuarios where login='"&nombre& "' and auth<>0;"
set rs=oConn.Execute(SQL)
if not rs.eof then
miuser = rs("login")
mipass = rs("password")
if (miuser = nombre) and (mipass = password) then
'Session("auth")=1
Response.Redirect("config_enter.asp?id=" & rs("id"))
else
'No existe ese usuario con esa contraseña
'Así que le negamos el acceso
MostrarFormulario
end if
'end if
else
MostrarFormulario
end if
Sub MostrarFormulario%>
