Ver Mensaje Individual
  #4 (permalink)  
Antiguo 03/04/2002, 09:58
Tino28
 
Fecha de Ingreso: diciembre-2001
Mensajes: 107
Antigüedad: 23 años, 4 meses
Puntos: 0
Re: Lo admito soy *****------> alguien podria...

<%
If Request.Form("usuario") = "" OR Request.Form("password") = "" then
Response.Redirect "pagina1.asp"
Else
Dim usuario, password, oConn, RS

usuario = Trim(Request.Form("usuario"))
password = Trim(Request.Form("password"))

Set oConn = Server.CreateObject ("ADODB.Connection")
Set RS = Server.CreateObject ("ADODB.RecordSet")
oConn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("\db\xxx.mdb")

sql = "SELECT * FROM prueba WHERE usuario='"&usuario&"'"
RS.Open sql, oConn, 1, 1

If RS.EOF = True then
Response.Write "<BR>Ese usuario no existe"

ElseIf RS.Fields("password") = password then
Response.Write "<BR>Te logueaste con exito... Bienvenido <B>"& usuario &"</B>"

Else
Response.Write "<BR>Esa contraseña no concuerda con el usuario ingresado"
End If

RS.Close
oConn.Close
Set RS = Nothing
Set oConn = Nothing
End If
%>






---------------------------------------------
y la base de datos es xxx.mdb, y esta situada en el directorio raiz, donde estan ubicadas las dos paginas anteriores: pagina1.asp y pagina2.asp

Id usuario password
1 corsa 1234
2 juan juancho
3 pepe 9955

Tal facil como esto.

Entonces mis preguntas:

todo el codigo de esta segunda pagina, va literalmente asi? sin html, ni head, ni nada??

y la pagina "protegida"? donde esta la direccion para que si es correcto el login la abra??

en mi caso he creado una de ejemplo que se llama protegida.htm, y la he puesto tambien en el raiz. Es decir todo esta en el raiz.

esta pagina "protegida" debe guardarse en el mismo directorio raiz o en otro diferente??

y el archivo *.mdb? donde se guarda?. si se keda en la web, no se puede obtener bajandolo con el webcopier o algo asi?