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

Response Redirect

Estas en el tema de Response Redirect en el foro de ASP Clásico en Foros del Web. Hola tengo una duda en un trozo de código . El tema es que el usuario ingresa su nombre y contraseña y se hace un ...
  #1 (permalink)  
Antiguo 11/08/2004, 18:33
 
Fecha de Ingreso: septiembre-2003
Ubicación: Montevideo Uruguay
Mensajes: 13
Antigüedad: 21 años, 8 meses
Puntos: 0
Response Redirect

Hola tengo una duda en un trozo de código .

El tema es que el usuario ingresa su nombre y contraseña y se hace un request a dónde los valida, la respuesta es si o no ( es decir si son usuarios o no) y yo lo que necesito es que si es si redireccione a otra pagina y si es no que haga un response.write y le diga que no es usuario.

Pero cuando cargo la página me aparece directamente que no o sea lo que devuelve el string de validación.
Si alguien tiene alguna idea de dónde está el error le agradezco mucho.

Disculpen si es muy largo el código.

saludos, Solange
El código sería así:
'Acá comienza el script que hace el request'
<%
Dim objXmlHttp
Dim strHTML
Set objXmlHttp = Server.CreateObject("Msxml2.ServerXMLHTTP")

'USULOG
usulog= "prueba"
'USUPASS
usupass = "prueba"
url = "http://www.uni.edu.uy/autogestion/Usuario/esusuario.asp?USULOG=" + usulog + "&USUPASS=" + usupass
objXmlHttp.open "GET", url, False

objXmlHttp.send

strHTML = objXmlHttp.responseText
Set objXmlHttp = Nothing

'En strHTML obtienes una 'S' o una 'N' indicando si la persona es o no usuario de la universidad
Response.write strHTML
%>
'Acá comenzaría el redireccionamiento si es usuario'
<%If (strHTML = "S") Then
Response.Redirect "bienvenida.asp"
else
Response.Write("Sólo pueden acceder usuarios de la Universidad ")
End If
%>

<form action=""http://www.uni.edu.uy/autogestion/Usuario/esusuario.asp?USULOG=" + usulog + "&USUPASS=" + usupass" method="post" name="login" id="login">
<%(Request.Cookies("usuario"))%>" name="nombre_usuario" type="text" class="formulario" id="nombre_usuario3" size="20" maxlength="40">
<input value="<%=(Request.Cookies("contrasena"))%>" name="contrasena" type="password" id="contrasena2" size="10" maxlength="10
<input name="imageField" type="image" src="imagenes/boton_loginrh.gif" width="100" height="24" border="0">
</form>
  #2 (permalink)  
Antiguo 11/08/2004, 19:11
 
Fecha de Ingreso: julio-2004
Ubicación: Capital Federal, Argentina
Mensajes: 283
Antigüedad: 20 años, 10 meses
Puntos: 1
primero un consejo
luego de Response.Redirect "bienvenida.asp"
pone una linea Response.End para finalizar la carga de la pagina

ahora vamos a lo tuyo
el codigo ASP se ejecuta al cargar la pagina porque no tenes ningun IF

deberias hacer algo como

<%

If Request.Form("nombre_usuario") <> "" Then

Dim objXmlHttp
Dim strHTML
Set objXmlHttp = Server.CreateObject("Msxml2.ServerXMLHTTP")

'USULOG
usulog= "prueba"
'USUPASS
usupass = "prueba"
url = "http://www.uni.edu.uy/autogestion/Usuario/esusuario.asp?USULOG=" + usulog + "&USUPASS=" + usupass
objXmlHttp.open "GET", url, False

objXmlHttp.send

strHTML = objXmlHttp.responseText
Set objXmlHttp = Nothing

'En strHTML obtienes una 'S' o una 'N' indicando si la persona es o no usuario de la universidad
Response.write strHTML
%>
'Acá comenzaría el redireccionamiento si es usuario'
<%If (strHTML = "S") Then
Response.Redirect "bienvenida.asp"
else
Response.Write("Sólo pueden acceder usuarios de la Universidad ")
End If

End If
%>

Asi, si no se ingresó aun el usuario entonces no correrá esa porción de script
  #3 (permalink)  
Antiguo 12/08/2004, 08:15
 
Fecha de Ingreso: septiembre-2003
Ubicación: Montevideo Uruguay
Mensajes: 13
Antigüedad: 21 años, 8 meses
Puntos: 0
Response Redirect

Hola Forvan,

Muchas gracias por tu respuesta ya mismo lo voy a probar.

Saludos,

Solange
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 08:11.