10/07/2003, 08:43
|
| | | Fecha de Ingreso: marzo-2003 Ubicación: onde toy?
Mensajes: 1.437
Antigüedad: 22 años, 2 meses Puntos: 9 | |
| Por qué no hace lo que quiero ?
que estaré haciendo mal? no caho pero el problema está destacado en verde, siendo usuario común o de Administración lo redirecciona igual a nuevomensaje.asp.
<%response.buffer="true"%>
<html>
<head>
<title>pagina validacion</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body bgcolor="#FFFFFF" text="#000000">
<%
dim usuario
dim mes
dim conexion
dim ano
dim tipousuario
dim sql
dim Res
usuario = session("usuario")
mes = request.querystring("mes")
ano = request.querystring("ano")
Set conexion = Server.CreateObject("ADODB.Connection")
Set Res = Server.CreateObject("ADODB.Recordset")
conexion.Open "calendario","sa",""
sql = "SELECT * FROM usuario where usuario = '"&usuario&"';"
Set Res = conexion.Execute(sql)
if Res.EOF then
tipousuario = res("tipousuario")
end if %>
<%
if tipousuario = "Administracion" then
response.redirect"nuevomensajeii.asp?numeroDia='"& numerodia&"'&mes='"&mes&"'&ano='"&ano&"'"
Res.Close
Set Res=Nothing
conexion.Close
Set conexion = Nothing
else
response.redirect"nuevomensaje.asp?numeroDia='"&nu merodia&"'&mes='"&mes&"'&ano='"&ano&"'" Res.Close
Set Res=Nothing
conexion.Close
Set conexion = Nothing
end if
%>
</body>
</html>
__________________
Buena Vida...
Francisco |