Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

variables de Application

02/01/2004 - 22:49 por Neyla | Informe spam
Ayuda Hacer una pregunta
hola a todos

tengo problemas con el uso de las variables del objeto
Application, supuestamente se deben almacenar en la
memoria del servidor pero en este caso creo que no lo hace
El ejemplo trata de llevar el conteo de la cantidad de
visitantes de la pagina, lo saque de un libro

Les agradeceria mucho su ayuda

Neyla


Private Sub Page_Load(ByVal sender As System.Object,
ByVal e As System.EventArgs) Handles MyBase.Load

Dim Valor As Integer
Application.Lock()
Valor = CInt(Application.Get("visitantes")) + 1
Application.Add("visitantes", Valor)
Application.UnLock()

End Sub

Private Sub Button1_Click(ByVal sender As System.Object,
ByVal e As System.EventArgs) Handles Button1.Click

Response.Write(Application.Get("visitantes"))

End Sub
email Siga el debateRespuesta 4 respuestasRespuesta Tengo una respuesta
DRAGON AGE™: INQUISITION – Matadragones
 

Leer las respuestas

#1 Guillermo guille
03/01/2004 - 16:02 | Informe spam
hola,

Esa variable estará en la memoria del servidor si no lo reinician.
En cuanto reinician la aplicación (tu sitio web) esos valores se pierden.
Además, asegurate de hacer Lock y UnLock antes de cambiar los valores.
Por ejemplo, esto es lo que uso en Session_OnStart:
Application.Lock
Application("Usuarios") = Application("Usuarios") + 1
Application.Unlock

Nos vemos.
Guillermo
P.S.
Si te parece últil mi sitio:
http://www.elguille.info/lonuevo/lo....htm#dic30
Microsoft VB MVP desde 1997
Te invito a mi sitio dedicado al VB y más...
http://www.elguille.info/
http://www.mundoprogramacion.com/
(puede que el correo usado sea anti-spam)


"Neyla" wrote in message
news:021f01c3d17a$3de5c6f0$
hola a todos

tengo problemas con el uso de las variables del objeto
Application, supuestamente se deben almacenar en la
memoria del servidor pero en este caso creo que no lo hace
El ejemplo trata de llevar el conteo de la cantidad de
visitantes de la pagina, lo saque de un libro

Les agradeceria mucho su ayuda

Neyla


Private Sub Page_Load(ByVal sender As System.Object,
ByVal e As System.EventArgs) Handles MyBase.Load

Dim Valor As Integer
Application.Lock()
Valor = CInt(Application.Get("visitantes")) + 1
Application.Add("visitantes", Valor)
Application.UnLock()

End Sub

Private Sub Button1_Click(ByVal sender As System.Object,
ByVal e As System.EventArgs) Handles Button1.Click

Response.Write(Application.Get("visitantes"))

End Sub

Preguntas similares

 

Busqueda sugerida :