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

codigo de acceso para pagina

Estas en el tema de codigo de acceso para pagina en el foro de ASP Clásico en Foros del Web. Buenas quisiera saber si existe un codigo javascript o asp con la cual pueda un usuario ke tenga cierto codigo pueda acceder a una pagina ...
  #1 (permalink)  
Antiguo 09/04/2004, 19:46
Avatar de the_LiZaRd_  
Fecha de Ingreso: noviembre-2003
Ubicación: Lima
Mensajes: 102
Antigüedad: 20 años, 7 meses
Puntos: 0
codigo de acceso para pagina

Buenas quisiera saber si existe un codigo javascript o asp con la cual pueda un usuario ke tenga cierto codigo pueda acceder a una pagina de lo contrario de lo contrario si no existe el codigo se vaya a una pagina de "no existe el codigo" o kizas pueda ser un mensaje "no existe el codigo".

ke se tenga en cuenta ke existe codigo para determinadas paginas ,

y sin utilizar base de datos

gracias
  #2 (permalink)  
Antiguo 09/04/2004, 20:25
Avatar de u_goldman
Moderador
 
Fecha de Ingreso: enero-2002
Mensajes: 8.031
Antigüedad: 22 años, 5 meses
Puntos: 98

Podría ser un javascript, pero no es seguro de ninguna manera, pues tendrías que poner esas claves dentro del javascript con lo cual pueden en todo momento ver los códigos de acceso...

Ahora una solución podría ser con un código validador en VB server side, pero se me hace que sería un gran problema estar actualizando este código si es que van a existir nuevos usuarios o si necesitas cambiar esas claves...porque podrías hacer un case gigante para cada clave y una bandera

bandera = false
password = request.form("password")

Select case password
case "hola"
bandera = true
case "mundo"
bandera = true
case "hola mundo"
bandera = true
case "otra clave"
bandera = true
End Select

If bandera Then
session("autorizado") = "ok"
Else
Respose.redirect "no_autorizado.asp"
End If

La sesión autorizado puedes evaluarla en un archivo evaluar.asp que llamas a nivel de include para todos los archivos relacionados con esta parte segura

--------------------------------
evaluar.asp
---------------------------------
If session("autorizado") <> "ok" Then
Response.redirect("no_autorizado.asp")
End If


Aqui está una solución aunque no es para nada funcional, ahora te respondo tu pregunta con otra pregunta:

Por qué no utilizar DB?

Otra que se me ocurre es que puedas utilizar un txt para contener las claves, solo por si necesitas cambiarlas, y acceder este archivo mediante FSO, pero a la larga sale igual de inseguro...y el mismo rabajo que hacerte una pequeña DB


Salu2,
__________________
"El hombre que ha empezado a vivir seriamente por dentro, empieza a vivir más sencillamente por fuera."
-- Ernest Hemingway
  #3 (permalink)  
Antiguo 12/04/2004, 10:51
Avatar de the_LiZaRd_  
Fecha de Ingreso: noviembre-2003
Ubicación: Lima
Mensajes: 102
Antigüedad: 20 años, 7 meses
Puntos: 0
..gracias ,,, pero ,, mira =P

graccias por tu ayuda ,
y la respuesta a tu pregunta , de porke no con bd es my simple por ke no dispongo de bd ahora jejeje porlo ke no tegno pc disponible para hacer eso ,, pero bueno

.... pero tu cres ke se pueda hacer con asp .. o como tu dices con txt aparte , me pareceria bien , ,

porke no se tratan de password sino de codigos ke se dan a los usuario para ke vean su pagina , esa fue la idea ,

ahora , el codigo ke me has dado lo entiendo pero no al 100% , donde configuro para ke ,por ejemplo ,
`COD01 se vaya a www.sitio.com/inmage/pos01.htm
de la misma manera
COD02 se vaya a www.sitio.com/inmage/pos02.htm`

de lo contrario aparesca un mensajes de "no existe codigo"

a ver tu ke sabes de estas cosas me podrias ayudar

gracias nuevamente
  #4 (permalink)  
Antiguo 12/04/2004, 23:18
Avatar de u_goldman
Moderador
 
Fecha de Ingreso: enero-2002
Mensajes: 8.031
Antigüedad: 22 años, 5 meses
Puntos: 98
Bueno, si es así, hazte una función, que te devuelva una URL o un string vacio en el caso que no exista, esto mediante un case

Function redirecciona(codigo)
mi_redireccion = ""
Select case codigo
case "COD01"
mi_redireccion = "http://www.sitio.com/inmages/pos01.htm"
case "COD02"
mi_redireccion= "http://www.sitio.com/inmages/pos02.htm"
End Select
redirecciona = mi_redireccion
End Function


Y la llamas con

variable = redirecciona(request.form("codigo"))

La evaluas

If variable <> "" Then
response.redirect variable
Else
response.redirect "no_encontrado.asp"
End If

Con eso ya tienes la redirección

Salu2,
__________________
"El hombre que ha empezado a vivir seriamente por dentro, empieza a vivir más sencillamente por fuera."
-- Ernest Hemingway
  #5 (permalink)  
Antiguo 13/04/2004, 13:56
Avatar de the_LiZaRd_  
Fecha de Ingreso: noviembre-2003
Ubicación: Lima
Mensajes: 102
Antigüedad: 20 años, 7 meses
Puntos: 0
muchas muchas gracias

gracias de verdad ,, pero aun ahi un problema ,,,

donde pongo cada codigo ?.... aver si me explicas paso a paso como ponerlo , y va entre las etiketas script ? ... como hago ,, explica pls ,
gracias nuevamente
  #6 (permalink)  
Antiguo 13/04/2004, 14:42
Avatar de u_goldman
Moderador
 
Fecha de Ingreso: enero-2002
Mensajes: 8.031
Antigüedad: 22 años, 5 meses
Puntos: 98
Vamos un poco de voluntad al menos, las funciones por estructura es lo primero que se pone en un código, puedes poner la función en un archivo aparte y llamarlo a nivel de include donde lo requieras, y todo es VB debe ir entre <%%>


Salu2,
__________________
"El hombre que ha empezado a vivir seriamente por dentro, empieza a vivir más sencillamente por fuera."
-- Ernest Hemingway
  #7 (permalink)  
Antiguo 14/04/2004, 08:46
Avatar de the_LiZaRd_  
Fecha de Ingreso: noviembre-2003
Ubicación: Lima
Mensajes: 102
Antigüedad: 20 años, 7 meses
Puntos: 0
ok gracias de verdad muchas gracias
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 21:29.