Foros del Web » Programando para Internet » ASP Clásico »

Proteger sin BD

Estas en el tema de Proteger sin BD en el foro de ASP Clásico en Foros del Web. Trato de proteger una página sin necesidad de echar mano de una BD. He analizado el siguiente código y no encuentro error alguno; no obstante, ...
  #1 (permalink)  
Antiguo 22/06/2003, 06:11
AZP
 
Fecha de Ingreso: junio-2003
Mensajes: 83
Antigüedad: 21 años
Puntos: 0
Proteger sin BD

Trato de proteger una página sin necesidad de echar mano de una BD. He analizado el siguiente código y no encuentro error alguno; no obstante, pass.asp me da error.

¿Qué le sucede?
¿Alguien tiene algo más sencillo?


Página pass.asp

<%
msg = ""
If Request("Submit") <> "" Then
If Request("username")="User"
And Request("password")="Pass" Then
Session("Valid") = Request("username")
'primera página protegida
response.redirect "form.asp"
Else msg = "Inténtalo de nuevo"
End If
End If
%>
<html>
<head>
<title>Password</title>
</head>
<body>
<form action="pass.asp" method="post">
<table>
<% If msg <> "" Then %>
<tr><td colspan="2"><font color=red><%=msg%></font></td></tr>
<%End If%>
<tr>
<td>UserName:</td>
<td><input type="text" name="username"></td>
</tr>
<tr>
<td>Password:</td>
<td><input type="Password" name="password"></td>
</tr>
<tr>
<td colspan="2"><input type="submit" name="Submit"></td>
</tr>
</table>
</form>
</body>
</html>

Página form.asp

En el encabezamiento de la página pondría:

<%
If Session("Valid") = "" Then
Response.redirect "pass.asp"
End If
%>



Gracias por todo,

AZP
  #2 (permalink)  
Antiguo 22/06/2003, 10:18
 
Fecha de Ingreso: febrero-2002
Mensajes: 442
Antigüedad: 22 años, 3 meses
Puntos: 2
Hola.... tu codigo esta perfecto....
lo unico que hice fue sacarle en el form submit la accion pass.asp
pero igual no tendria que influir.... Ordene un poquitin el codigo y salio andando perfectamente.

Código:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
msg = ""
If Request("Submit") <> "" Then
		If Request("username")="User" And Request("password")="Pass" Then
			Session("Valid") = Request("username")
			'primera página protegida
			response.redirect "form.asp" 
		Else 
			msg = "Inténtalo de nuevo"
		End If
End If
%>
<html>
<head>
<title>Password</title>
</head>
<body>
<form action="" method="post">
  <table>
	<% If msg <> "" Then %>
		<tr><td colspan="2"><font color=red><%=msg%></font></td></tr>
	<%End If%>
		<tr>
			<td>UserName:</td>
			<td><input type="text" name="username"></td>
		</tr>
		<tr>
			<td>Password:</td> 
			<td><input type="Password" name="password"></td>
		</tr>
		<tr>
			<td colspan="2"><input type="submit" name="Submit"></td>
		</tr>
	</table>
</form>
</body>
</html>
__________________
tech-nico.com
  #3 (permalink)  
Antiguo 22/06/2003, 13:06
AZP
 
Fecha de Ingreso: junio-2003
Mensajes: 83
Antigüedad: 21 años
Puntos: 0
Gracias Nicolás!

Lo probaré.

AZP
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 19:17.