es cierto
JuanRAPerez, no nos fijamos en ese pequeñito detalle, que bueno que lo observaste
ESPERO QUE AHORA SI TE FUNCIONE
reverdexxx
Código:
'registrar.asp
'Recogemos el formulario default
login=Trim(Request.Form("login"))
password=Trim(Request.Form("Password"))
sSQL="SELECT * FROM usuario WHERE login = '" & login & "' AND password = '" & password & "'"
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "xxxxxxxxx"
set rs = Conn.Execute(sSQL)
if rs.EOF then
Call PrintMessagesConfirmacion("<B>ADVERTENCIA:</B> El Usuario: '" & login & "' No se encuentra registrado")
else
Session("aut")="1"
Response.Redirect("ingreso1.asp")
end if
'ingreso1.asp
Código:
<% response.Buffer = True
if Session("aut")="" then
Response.redirect("default.asp")
Response.End
else
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
<title>Prueba</title>
</head>
<body>
TU CONTENIDO
</body>
</html>
<%
end if
%>
ESPERO QUE ESTE DE ACUERDO A LO QUE MENCIONASTE ADLER