Amigos:
Quiero crear un acceso restringido a usuarios registrados en mi www.
He creado una tabla llamada 45678 y una tabla llamada acceso
Me da un error al intentar validarlo de :
[Microsoft][Controlador ODBC Microsoft Access]Error general No se puede abrir la clave 'Temporary (volatile) Jet DSN for process 0x18b8 Thread 0x1914 DBC 0x8d20ffc Jet' del Registro.
/acciones/login.asp, line 48
Pongo el código y pongo en negrita la dichosa linea 48
<html>
<head>
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<title>Pagina nueva 1</title>
</head>
<body>
<!--#INCLUDE File="ADOVBS.inc"-->
<%if request.form("usuario")="" then%>
<form method="POST" action="login.asp">
<p> </p>
<p> </p>
<p> </p>
<p align="center"><%=request.querystring("msg")%></p>
<div align="center">
<center>
<table border="0" width="50%" bgcolor="#F2F2F2">
<tr>
<td width="100%" colspan="2" bgcolor="#0000FF">
<p align="center"><font color="#FFFFFF">Login</font></td>
</tr>
<tr>
<td width="50%">Usuario:</td>
<td width="50%"><input type="text" name="usuario" size="20"></td>
</tr>
<tr>
<td width="50%">Password: </td>
<td width="50%"> <input type="password" name="password" size="20"></td>
</tr>
<tr>
<td width="100%" colspan="2">
<p align="center"><input type="submit" value="Enviar" name="B1"></td>
</tr>
</table>
</center>
</div>
</form>
<%else
usuario=replace(request.form("usuario"),"'","")
password=replace(request.form("password"),"'","")
Set conexion = Server.CreateObject ("ADODB.Connection")
conexion.open "Driver={Microsoft Access Driver (*.mdb)};DBQ=D:\bd\clientes\45678.mdb"RSH.Open "acceso", conexion, adOpenStatic, adCmdTable
sqltxt="Select * from usuarios where usuario='"&usuario&"' and password= '"&password&"'"
RSH.Open sqltxt, connexion
if not RSH.eof then
if RSH("usuario")=usuario and RSH("password")=password then
session("autorizacion")=1
response.redirect "prueba.asp"
end if
else
session("autorizacion")=-1
end if
RSH.close
set RSH=nothing
connexion.close
set connEXION=nothing
if session("autorizacion")=-1 or session("autorizacion")="" then
response.redirect "login.asp?msg=Usuario%20o%20password%20incorrecta "
end if
end if%>
</body>
</html>
saludos y gracias
