pagina distinta para cada usuario

aruizroldan · #1 (**permalink**) 29/10/2003, 15:03

Hola. Quiero hacer una web en el que dependiendo del usuario le salga una pagina distinta.

Es decir, en una pagina principal cada uno mete su nombre de usuario y contraseña, y con esto cada uno va a su pagina personal. Pero lo que quiero es que los campos de esta pagina no se tengan q cambiar manualmente, no se si me explico.

dobled · #2 (**permalink**) 29/10/2003, 15:15

podrias utilizar unos campos para guardar datos personales ej:
musica, deportes, electronica, autos.

despues cuando el usuario se logea ves sus gustos y en los articulos escritos por ejemplos le listas todos los que tienen que ver con electronica por ejemplo y asi lo puedes hacer con varios tipos de datos , cargar un archivo css de estilo por ej....

ojala sea de ayuda...

Bluesman74cl · #3 (**permalink**) 29/10/2003, 16:08

Tienes que hacer algo asi

Página1.asp

Algún formulario en el cual se ingrese el nombre y la clave...con lo cual podrás trabajar..

Pagina2.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 clave
dim Mi_Conexion
dim tipousuario
dim sql
dim Res
Set Mi_Conexion = Server.CreateObject("ADODB.Connection")
Set Res = Server.CreateObject("ADODB.Recordset")
Mi_Conexion.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=C:\Inetpub\wwwroot\horas\horas.mdb;"

sql = "SELECT * FROM usuarios"
Set Res = Mi_Conexion.Execute(sql)
if Res.EOF then
usuario = Request.form("usuario")
clave = Request.form("clave")
Res.Close
Set Res=Nothing
Mi_Conexion.Close
Set Mi_Conexion = Nothing
response.redirect "ingresar.asp"
else
usuario = Request.Form ("usuario")
sql = "SELECT * FROM usuarios WHERE usuario = '" & usuario & "';"
Set Res = Mi_Conexion.Execute(sql)
If Not Res.EOF Then
clave = Request.form("clave")

if clave = Res ("clave") then
tipousuario = Res"tipousuario")
if tipousuario = "Administracion" or tipousuario= "administracion" then
session("seguridad")= 1
session("usuario")=usuario
Res.Close
Set Res=Nothing
Mi_Conexion.Close
Set Mi_Conexion = Nothing
response.redirect "administracion.asp"
else
if tipousuario = "Medico" then
session("seguridad")=2
session("usuario")=usuario
Res.Close
Set Res=Nothing
Mi_Conexion.Close
Set Mi_Conexion = Nothing
response.redirect "menumedico.asp"
else
if tipousuario = "Paciente" then

session("seguridad")=3
session("usuario")=usuario
Res.Close
Set Res=Nothing
Mi_Conexion.Close
Set Mi_Conexion = Nothing
response.redirect "menupaciente.asp"
else
response.redirect "advertencia.asp"
end if
end if

end if
else
Res.Close
Set Res=Nothing
Mi_Conexion.Close
Set Mi_Conexion = Nothing
response.redirect "advertencia.asp"
end if
Else
Res.Close
Set Res=Nothing
Mi_Conexion.Close
Set Mi_Conexion = Nothing
Response.redirect "advertencia.asp"
End If
End if
%>
</body>
</html>

Si te das cuenta en lo de color azul....yo estoy definiendo que sean redireccionados a distintas páginas según el tipo de usuario.... espero te sirva...

aruizroldan · #4 (**permalink**) 29/10/2003, 17:25

Hola. Me gustaria que me dieran el codigo de dos ficheros asp. uno en el que esté el nombre de usuario y contraseña y otro en el que sea direccionado dicho usuario. La idea es que para distintos usuarios se direccionen a distintas paginas.

Gracias.

RootK · #5 (**permalink**) 29/10/2003, 17:39

Cita:

La idea es que para distintos usuarios se direccionen a distintas paginas.

Podrías ser un poco mas claro...??

, es que exactamente a donde quieres direccionar a los usuarios..? de que va a depender..?

Saludos