Problema con variable de Sesion

18/10/2006 - 19:54 por Allan | Informe spam
Hola Comunidad, me vuelvo dirigir a ustedes por otro problemita que tengo :$
y es el siguiente: Tengo un site realizado en asp con base de datos access y
lo estoy implementando en un windows 2000 server. el prroblema ocurre cuando
en la pagina de inicio (index.asp) en el cual esta el login ,para ingresar,
creo unas variables de session tales como id del login(base de datos),login,
etc. si la persona existe en la base de datos... cual es mi sorpresa cuando
paso del login y entro en el home del site.. que no se crearon las varibles
de session.. les pongo a continuacion parte del codigo a ver si me logran
ayudar o guiarme, gracias.

<%
Dim TheMessage, RSFindUser
if Request.form"Ingresar") = "Ingresar" then
%>
<!--#include file="Connections/db.asp" -->
<%
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open(MM_db_STRING)

set RSFindUser = conn.Execute("select id_login, login, admin, mensaje from
usuarios where login = '" & Request.Form("Login") & "' and password = '" &
Request.Form("Pass") & "'")
if RSFindUser.EOF then
TheMessage = "Usuario inexistente o contraseña incorrecta."
else
Session("id") = RSFindUser("id_login")
caso = RSFindUser("admin")
response.Write(caso)
select case caso
case 2:
Session("admi") = "Super Administrador"
case 1:
Session("admi") = "Administrador"
case else:
Session("admi") = "Usuario"
end select
'Session("admin") = RSFindUser("admin")
Session("login") = RSFindUser("login")
Session("Mensaje") = RSFindUser("mensaje")
Session("Admin") = RSFindUser("admin")
response.Write(Session("admi"))
set RSFindUser = nothing
conn.close
set conn = nothing
Response.Redirect "home.asp"
end if
set RSFindUser = nothing
conn.close()
set conn = nothing
else
TheMessage = " "
end if
%>

Preguntas similare

Leer las respuestas

#1 Manuel Vera
18/10/2006 - 20:30 | Informe spam
Revisa que en tu navegador web se estan aceptando las cookies.
Si tienes deshabilitadas las cookies no podras utilizar las variables de
Session() en ese navegador.

Salu2
MV

"Allan" escribió en el mensaje
news:
Hola Comunidad, me vuelvo dirigir a ustedes por otro problemita que tengo
:$
y es el siguiente: Tengo un site realizado en asp con base de datos access
y
lo estoy implementando en un windows 2000 server. el prroblema ocurre
cuando
en la pagina de inicio (index.asp) en el cual esta el login ,para
ingresar,
creo unas variables de session tales como id del login(base de
datos),login,
etc. si la persona existe en la base de datos... cual es mi sorpresa
cuando
paso del login y entro en el home del site.. que no se crearon las
varibles
de session.. les pongo a continuacion parte del codigo a ver si me logran
ayudar o guiarme, gracias.

<%
Dim TheMessage, RSFindUser
if Request.form"Ingresar") = "Ingresar" then
%>
<!--#include file="Connections/db.asp" -->
<%
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open(MM_db_STRING)

set RSFindUser = conn.Execute("select id_login, login, admin, mensaje from
usuarios where login = '" & Request.Form("Login") & "' and password = '" &
Request.Form("Pass") & "'")
if RSFindUser.EOF then
TheMessage = "Usuario inexistente o contraseña incorrecta."
else
Session("id") = RSFindUser("id_login")
caso = RSFindUser("admin")
response.Write(caso)
select case caso
case 2:
Session("admi") = "Super Administrador"
case 1:
Session("admi") = "Administrador"
case else:
Session("admi") = "Usuario"
end select
'Session("admin") = RSFindUser("admin")
Session("login") = RSFindUser("login")
Session("Mensaje") = RSFindUser("mensaje")
Session("Admin") = RSFindUser("admin")
response.Write(Session("admi"))
set RSFindUser = nothing
conn.close
set conn = nothing
Response.Redirect "home.asp"
end if
set RSFindUser = nothing
conn.close()
set conn = nothing
else
TheMessage = " "
end if
%>
Respuesta Responder a este mensaje
#2 Allan
19/10/2006 - 21:57 | Informe spam
Hola manuel, probe eso que me dijiste y en todas las pc's incluyendo el
servidor estan habilitadas las cookies.. se me habia olvidado decir que hasta
en el propio servidor no se creaban las variables de session. gracias :)

"Manuel Vera" wrote:

Revisa que en tu navegador web se estan aceptando las cookies.
Si tienes deshabilitadas las cookies no podras utilizar las variables de
Session() en ese navegador.

Salu2
MV

"Allan" escribió en el mensaje
news:
> Hola Comunidad, me vuelvo dirigir a ustedes por otro problemita que tengo
> :$
> y es el siguiente: Tengo un site realizado en asp con base de datos access
> y
> lo estoy implementando en un windows 2000 server. el prroblema ocurre
> cuando
> en la pagina de inicio (index.asp) en el cual esta el login ,para
> ingresar,
> creo unas variables de session tales como id del login(base de
> datos),login,
> etc. si la persona existe en la base de datos... cual es mi sorpresa
> cuando
> paso del login y entro en el home del site.. que no se crearon las
> varibles
> de session.. les pongo a continuacion parte del codigo a ver si me logran
> ayudar o guiarme, gracias.
>
> <%
> Dim TheMessage, RSFindUser
> if Request.form"Ingresar") = "Ingresar" then
> %>
> <!--#include file="Connections/db.asp" -->
> <%
> Set conn = Server.CreateObject("ADODB.Connection")
> conn.Open(MM_db_STRING)
>
> set RSFindUser = conn.Execute("select id_login, login, admin, mensaje from
> usuarios where login = '" & Request.Form("Login") & "' and password = '" &
> Request.Form("Pass") & "'")
> if RSFindUser.EOF then
> TheMessage = "Usuario inexistente o contraseña incorrecta."
> else
> Session("id") = RSFindUser("id_login")
> caso = RSFindUser("admin")
> response.Write(caso)
> select case caso
> case 2:
> Session("admi") = "Super Administrador"
> case 1:
> Session("admi") = "Administrador"
> case else:
> Session("admi") = "Usuario"
> end select
> 'Session("admin") = RSFindUser("admin")
> Session("login") = RSFindUser("login")
> Session("Mensaje") = RSFindUser("mensaje")
> Session("Admin") = RSFindUser("admin")
> response.Write(Session("admi"))
> set RSFindUser = nothing
> conn.close
> set conn = nothing
> Response.Redirect "home.asp"
> end if
> set RSFindUser = nothing
> conn.close()
> set conn = nothing
> else
> TheMessage = " "
> end if
> %>



Respuesta Responder a este mensaje
#3 Dani Castillo
19/10/2006 - 23:21 | Informe spam
Para estos casos lo mejor es primero comprobar si se crean o no variables,
haz dos paginas sencillas, una inicializa una variable de sesion y hace
redirect a la otra que la muestra, asi descartas si es por tema de
configuracion y de que "de verdad" no se mantienen las variables, o si es
por otro tema

supongo que RSFindUser("admin") es de tipo entero, aparte de eso bueno el
codigo no podemos seguirlo mucho al ser solo "parcial" (sin ver la base de
datos ni el salto) reduce el codigo a la minima expresion para trazar el
problema y/o publica tanto el home.asp (una version simplificada) como el
resultado html (con ver->codigo fuente si quieres) de lo que se muestra en
pantalla al ejecutar :-|


___________________________
Dani Castillo

Mis Fotos:
http://picasaweb.google.com/dcdani
___________________________
"Allan" escribió en el mensaje
news:
Hola manuel, probe eso que me dijiste y en todas las pc's incluyendo el
servidor estan habilitadas las cookies.. se me habia olvidado decir que
hasta
en el propio servidor no se creaban las variables de session. gracias :)

"Manuel Vera" wrote:

Revisa que en tu navegador web se estan aceptando las cookies.
Si tienes deshabilitadas las cookies no podras utilizar las variables de
Session() en ese navegador.

Salu2
MV

"Allan" escribió en el mensaje
news:
> Hola Comunidad, me vuelvo dirigir a ustedes por otro problemita que
> tengo
> :$
> y es el siguiente: Tengo un site realizado en asp con base de datos
> access
> y
> lo estoy implementando en un windows 2000 server. el prroblema ocurre
> cuando
> en la pagina de inicio (index.asp) en el cual esta el login ,para
> ingresar,
> creo unas variables de session tales como id del login(base de
> datos),login,
> etc. si la persona existe en la base de datos... cual es mi sorpresa
> cuando
> paso del login y entro en el home del site.. que no se crearon las
> varibles
> de session.. les pongo a continuacion parte del codigo a ver si me
> logran
> ayudar o guiarme, gracias.
>
> <%
> Dim TheMessage, RSFindUser
> if Request.form"Ingresar") = "Ingresar" then
> %>
> <!--#include file="Connections/db.asp" -->
> <%
> Set conn = Server.CreateObject("ADODB.Connection")
> conn.Open(MM_db_STRING)
>
> set RSFindUser = conn.Execute("select id_login, login, admin, mensaje
> from
> usuarios where login = '" & Request.Form("Login") & "' and password =
> '" &
> Request.Form("Pass") & "'")
> if RSFindUser.EOF then
> TheMessage = "Usuario inexistente o contraseña incorrecta."
> else
> Session("id") = RSFindUser("id_login")
> caso = RSFindUser("admin")
> response.Write(caso)
> select case caso
> case 2:
> Session("admi") = "Super Administrador"
> case 1:
> Session("admi") = "Administrador"
> case else:
> Session("admi") = "Usuario"
> end select
> 'Session("admin") = RSFindUser("admin")
> Session("login") = RSFindUser("login")
> Session("Mensaje") = RSFindUser("mensaje")
> Session("Admin") = RSFindUser("admin")
> response.Write(Session("admi"))
> set RSFindUser = nothing
> conn.close
> set conn = nothing
> Response.Redirect "home.asp"
> end if
> set RSFindUser = nothing
> conn.close()
> set conn = nothing
> else
> TheMessage = " "
> end if
> %>



Respuesta Responder a este mensaje
#4 Allan
20/10/2006 - 16:00 | Informe spam
Hola Dani, hice lo que me dijiste cree una pagina donde creaba una variable
de session ya inicializada( <% session("prueba") = "funciona"%>) y luego
redericcionaba a otra donde la mostraba (<%= session("prueba")%>, lo curioso
del caso es que IE no me funciona.. no muestra la variable.. pero en firefox
si me lo muestra. acoto en explorer habilite todo para las cookies.. bueno yo
sigo averiguando, si usted o alguien puede ayudarme a terminar esta
"pesadilla" se lo agradeceria muchisimo. Saludos

"Dani Castillo" wrote:

Para estos casos lo mejor es primero comprobar si se crean o no variables,
haz dos paginas sencillas, una inicializa una variable de sesion y hace
redirect a la otra que la muestra, asi descartas si es por tema de
configuracion y de que "de verdad" no se mantienen las variables, o si es
por otro tema

supongo que RSFindUser("admin") es de tipo entero, aparte de eso bueno el
codigo no podemos seguirlo mucho al ser solo "parcial" (sin ver la base de
datos ni el salto) reduce el codigo a la minima expresion para trazar el
problema y/o publica tanto el home.asp (una version simplificada) como el
resultado html (con ver->codigo fuente si quieres) de lo que se muestra en
pantalla al ejecutar :-|


___________________________
Dani Castillo

Mis Fotos:
http://picasaweb.google.com/dcdani
___________________________
"Allan" escribió en el mensaje
news:
> Hola manuel, probe eso que me dijiste y en todas las pc's incluyendo el
> servidor estan habilitadas las cookies.. se me habia olvidado decir que
> hasta
> en el propio servidor no se creaban las variables de session. gracias :)
>
> "Manuel Vera" wrote:
>
>> Revisa que en tu navegador web se estan aceptando las cookies.
>> Si tienes deshabilitadas las cookies no podras utilizar las variables de
>> Session() en ese navegador.
>>
>> Salu2
>> MV
>>
>> "Allan" escribió en el mensaje
>> news:
>> > Hola Comunidad, me vuelvo dirigir a ustedes por otro problemita que
>> > tengo
>> > :$
>> > y es el siguiente: Tengo un site realizado en asp con base de datos
>> > access
>> > y
>> > lo estoy implementando en un windows 2000 server. el prroblema ocurre
>> > cuando
>> > en la pagina de inicio (index.asp) en el cual esta el login ,para
>> > ingresar,
>> > creo unas variables de session tales como id del login(base de
>> > datos),login,
>> > etc. si la persona existe en la base de datos... cual es mi sorpresa
>> > cuando
>> > paso del login y entro en el home del site.. que no se crearon las
>> > varibles
>> > de session.. les pongo a continuacion parte del codigo a ver si me
>> > logran
>> > ayudar o guiarme, gracias.
>> >
>> > <%
>> > Dim TheMessage, RSFindUser
>> > if Request.form"Ingresar") = "Ingresar" then
>> > %>
>> > <!--#include file="Connections/db.asp" -->
>> > <%
>> > Set conn = Server.CreateObject("ADODB.Connection")
>> > conn.Open(MM_db_STRING)
>> >
>> > set RSFindUser = conn.Execute("select id_login, login, admin, mensaje
>> > from
>> > usuarios where login = '" & Request.Form("Login") & "' and password =
>> > '" &
>> > Request.Form("Pass") & "'")
>> > if RSFindUser.EOF then
>> > TheMessage = "Usuario inexistente o contraseña incorrecta."
>> > else
>> > Session("id") = RSFindUser("id_login")
>> > caso = RSFindUser("admin")
>> > response.Write(caso)
>> > select case caso
>> > case 2:
>> > Session("admi") = "Super Administrador"
>> > case 1:
>> > Session("admi") = "Administrador"
>> > case else:
>> > Session("admi") = "Usuario"
>> > end select
>> > 'Session("admin") = RSFindUser("admin")
>> > Session("login") = RSFindUser("login")
>> > Session("Mensaje") = RSFindUser("mensaje")
>> > Session("Admin") = RSFindUser("admin")
>> > response.Write(Session("admi"))
>> > set RSFindUser = nothing
>> > conn.close
>> > set conn = nothing
>> > Response.Redirect "home.asp"
>> > end if
>> > set RSFindUser = nothing
>> > conn.close()
>> > set conn = nothing
>> > else
>> > TheMessage = " "
>> > end if
>> > %>
>>
>>
>>



Respuesta Responder a este mensaje
#5 Dani Castillo
20/10/2006 - 16:20 | Informe spam
Bien al menos ya lo tenemos centrado el tema :D, si en firefox funciona
tiene pinta de ser exclusivamente un tema de seguridad del IE


Una pregunta: ¿has probado desde "otro sitio"? no me refiero a otro pc, sino
a probar desde un ordenador completamente fuera de tu entorno de trabajo ,
si quieres postea la direccion de la web y la pruebo desde aqui (sabiendo
que en mi ordenador otros server funcionan)

Supongo que ambas paginas se encuentran en el mismo directorio

tambien podrias hacer la prueba de usar un enlace normal (un <a href=)
en lugar del redirect a ver si funciona

Otra opcion es añadir tu dominio como sitio de confianza... si asi funciona
ya es cuestion de comprobar la configuracion de seguridad entera :-|

y una ultima pregunta ¿no tendras algun programa "extra" instalado en todos
los equipos bloqueando cookies? no suelen eliminar las de session pero
algunos si lo hacen (firewalls, anti-spams o antivirus )



___________________________
Dani Castillo

Mis Fotos:
http://picasaweb.google.com/dcdani
___________________________
"Allan" escribió en el mensaje
news:
Hola Dani, hice lo que me dijiste cree una pagina donde creaba una
variable
de session ya inicializada( <% session("prueba") = "funciona"%>) y luego
redericcionaba a otra donde la mostraba (<%= session("prueba")%>, lo
curioso
del caso es que IE no me funciona.. no muestra la variable.. pero en
firefox
si me lo muestra. acoto en explorer habilite todo para las cookies.. bueno
yo
sigo averiguando, si usted o alguien puede ayudarme a terminar esta
"pesadilla" se lo agradeceria muchisimo. Saludos

"Dani Castillo" wrote:

Para estos casos lo mejor es primero comprobar si se crean o no
variables,
haz dos paginas sencillas, una inicializa una variable de sesion y hace
redirect a la otra que la muestra, asi descartas si es por tema de
configuracion y de que "de verdad" no se mantienen las variables, o si es
por otro tema

supongo que RSFindUser("admin") es de tipo entero, aparte de eso bueno el
codigo no podemos seguirlo mucho al ser solo "parcial" (sin ver la base
de
datos ni el salto) reduce el codigo a la minima expresion para trazar el
problema y/o publica tanto el home.asp (una version simplificada) como el
resultado html (con ver->codigo fuente si quieres) de lo que se muestra
en
pantalla al ejecutar :-|


___________________________
Dani Castillo

Mis Fotos:
http://picasaweb.google.com/dcdani
___________________________
"Allan" escribió en el mensaje
news:
> Hola manuel, probe eso que me dijiste y en todas las pc's incluyendo el
> servidor estan habilitadas las cookies.. se me habia olvidado decir que
> hasta
> en el propio servidor no se creaban las variables de session. gracias
> :)
>
> "Manuel Vera" wrote:
>
>> Revisa que en tu navegador web se estan aceptando las cookies.
>> Si tienes deshabilitadas las cookies no podras utilizar las variables
>> de
>> Session() en ese navegador.
>>
>> Salu2
>> MV
>>
>> "Allan" escribió en el mensaje
>> news:
>> > Hola Comunidad, me vuelvo dirigir a ustedes por otro problemita que
>> > tengo
>> > :$
>> > y es el siguiente: Tengo un site realizado en asp con base de datos
>> > access
>> > y
>> > lo estoy implementando en un windows 2000 server. el prroblema
>> > ocurre
>> > cuando
>> > en la pagina de inicio (index.asp) en el cual esta el login ,para
>> > ingresar,
>> > creo unas variables de session tales como id del login(base de
>> > datos),login,
>> > etc. si la persona existe en la base de datos... cual es mi sorpresa
>> > cuando
>> > paso del login y entro en el home del site.. que no se crearon las
>> > varibles
>> > de session.. les pongo a continuacion parte del codigo a ver si me
>> > logran
>> > ayudar o guiarme, gracias.
>> >
>> > <%
>> > Dim TheMessage, RSFindUser
>> > if Request.form"Ingresar") = "Ingresar" then
>> > %>
>> > <!--#include file="Connections/db.asp" -->
>> > <%
>> > Set conn = Server.CreateObject("ADODB.Connection")
>> > conn.Open(MM_db_STRING)
>> >
>> > set RSFindUser = conn.Execute("select id_login, login, admin,
>> > mensaje
>> > from
>> > usuarios where login = '" & Request.Form("Login") & "' and password
>> > >> >> > '" &
>> > Request.Form("Pass") & "'")
>> > if RSFindUser.EOF then
>> > TheMessage = "Usuario inexistente o contraseña incorrecta."
>> > else
>> > Session("id") = RSFindUser("id_login")
>> > caso = RSFindUser("admin")
>> > response.Write(caso)
>> > select case caso
>> > case 2:
>> > Session("admi") = "Super Administrador"
>> > case 1:
>> > Session("admi") = "Administrador"
>> > case else:
>> > Session("admi") = "Usuario"
>> > end select
>> > 'Session("admin") = RSFindUser("admin")
>> > Session("login") = RSFindUser("login")
>> > Session("Mensaje") = RSFindUser("mensaje")
>> > Session("Admin") = RSFindUser("admin")
>> > response.Write(Session("admi"))
>> > set RSFindUser = nothing
>> > conn.close
>> > set conn = nothing
>> > Response.Redirect "home.asp"
>> > end if
>> > set RSFindUser = nothing
>> > conn.close()
>> > set conn = nothing
>> > else
>> > TheMessage = " "
>> > end if
>> > %>
>>
>>
>>



Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaSiguiente Respuesta Tengo una respuesta
Search Busqueda sugerida