Hola, tengo el siguiente código para ingresar con Login y Password :
<%if request.form("usuario")="" then%>
<form method="POST" action="ingresar.asp">
<p align="center"><%=request.querystring("msg")%></p>
<div align="center">
<table align="left" border="0" width="30%" bgcolor="#F2F2F2">
<tr>
<td width="100%" colspan="2" bgcolor="#0000FF">
<p align="center"><font color="#FFFFFF">Login</font></td>
</tr>
<tr>
<td width="30%">Usuario:</td>
<td width="30%"><input type="text" name="usuario" size="20"></td>
</tr>
<tr>
<td width="30%">Password: </td>
<td width="30%"> <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>
</div>
</form>
<%else
usuario=replace(request.form("usuario"),"'","")
password=replace(request.form("password"),"'","")
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("login.mdb"))
set rs = CreateObject("ADODB.Recordset")
sqltxt="Select * from usuarios where usuario='"&usuario&"' and password= '"&password&"'"
rs.Open sqltxt, conn
if not rs.eof then
if rs("usuario")=usuario and rs("password")=password then
session("autorizacion")=1
response.redirect "/proyecto/index2.asp"
end if
else
session("autorizacion")=-1
end if
rs.close
set rs=nothing
conn.close
set conn=nothing
if session("autorizacion")=-1 or session("autorizacion")="" then
response.redirect "ingresar.asp?msg=Usuario%20o%20password%20incorre cta"
end if
end if%>
Lo que me falta es el código que voy a poner en lñas páginas que voy a proteger, alguien puede ayudarme?
Gracias
