Hola,
Soy nuevo en la progrmación ASP, y tengo un problema, tengo un codigo para logearme tras verificar en una base de datos, pero una vez logeado, me evia a la página privada, pero quiero poder recuperar en esta página el nombre de ususario que se escribió en el formulario.
Alguien me puede ayudar, os paso mi codigo para ver como lo puedo encajar.
Gracias de antemano.
Código asp:
Ver original<%
Dim usuario, password, oConn, RS
'Primero nos fijamos si ambos campos fueron completados.
'Si no se cumple, redireccionamos a login.html
If Request.Form("usuario") = "" OR Request.Form("password") = "" then
Response.Redirect "login.html"
Else
'Guardamos los datos del Form en variables y evitamos la comilla simple
usuario = Trim(Request.Form("usuario"))
password = Trim(Request.Form("password"))
usuario = Replace(usuario,"'","''")
password = Replace(password,"'","''")
'Conectamos a nuestra BD.
Set oConn = Server.CreateObject ("ADODB.Connection")
oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="& Server.MapPath("basedatos.mdb")
'Seleccionamos de la tabla solo los registros que concuerden con el usuario del Form.
sql = "SELECT * FROM usuarios WHERE usuario = '"& usuario &"'"
Set RS = Server.CreateObject ("ADODB.RecordSet")
RS.Open sql, oConn
'Si el valor EOF (fin de la tabla elegida) es verdadero, no existe el usuario.
If (RS.EOF = true) then
Response.redirect("incorrecto.asp")
ElseIf RS.Fields("contrasena") = password then 'Si el campo de la tabla es igual a nuestra variable, estas logueado.
[COLOR="red"]'Aqui debería introducir el codigo pero me he vuelto loco probado y no lo logro.[/COLOR]
Response.redirect ("privado.asp")
Else 'Otra cosa, seria cuando el password no es la que seleccionamos.
Response.redirect("incorrecto.asp")
End If
'Limpiamos y cerramos.
RS.Close
oConn.Close
Set RS = Nothing
Set oConn = Nothing
End If
%>