Ver Mensaje Individual
  #4 (permalink)  
Antiguo 07/09/2007, 05:26
rokiu
 
Fecha de Ingreso: septiembre-2007
Mensajes: 72
Antigüedad: 17 años, 7 meses
Puntos: 1
Re: seciones en asp

si mira, este es mi codigo del frame que recoge el formulario:

<%
'Datos recibidos del formulario
Usuario= request.form("pUsuario")
Clave= request.form("pClave")

Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "bloggus"

sSQL = "select nombre,clave,idusu from usuarios where (nombre='"&usuario&"' and clave='"&clave&"');"
Set Rs = Conn.Execute(sSQL)


if not rs.EOF then
session ("usuario")=Rs("idusu")
Response.Redirect("../html/privado/titulofijo_privado.html")
'Response.Write( session ("usuario"))
else
Response.Write("<script language='Javascript'>")
Response.Write("top.frames['titulo'].location.href='../html/publico/titulofijo.html';")
Response.Write("alert('Usuario o clave erroneas, INTENTALO DE NUEVO');")
Response.Write("</script>")
'Response.Write( session ("usuario"))
end if
%>

entonces si el usuriao esta registrado, al hacer la consulta lo encuentra, y se guarda la id, para todo lo que haga durante la sesion, ya sea crear algo, modificar algo... etc. y redirecciona el frame al que te comente que tiene los 3 servicios de mas.

Si no lo encuentra en la cosulta, saca un "alert" de error, y redirecciona en el frame a la misma pagina en la ke estaba, es decir a la que te sigue pidiendo usuario/clave y que no te ofrece esos 3 servicios de mas.

mas o menos claro?