Usuarios On-line

[Guest evie joyce]

Gostaria de mostrar quem são os usuarios on-line mas algo vai errado no meu codigo quando o usuario não esta mais on-line...pois não ocorre a subtracao da string, quando o Session_OnEnd é executado!!!

alguém podia me contar como faze-lo

Grata,

Joyce

<script language="vbscript" runat="server">

Sub Application_OnStart

Application("usu_corrente") = ""

End Sub

Sub Session_OnStart

Application.Lock

Application("usu_corrente") = Application("usu_corrente") + session("usuario")

Application.UnLock

End Sub

Sub Session_OnEnd

Application.Lock

Application("usu_corrente") = Application("usu_corrente") - session("usuario")

Application.UnLock

End Sub

</script>

[Eddie_666]

Ele tá incluíndo?

[negociadorweb]

tenta isto:

<script LANGUAGE=VBScript RUNAT=Server>

Sub Application_OnStart

application("usrativos")=0 'inicia o contador com o valor 0

End Sub

Sub Application_OnEnd

End Sub

Sub Session_OnStart

application.lock

application("usrativos")=application("usrativos") + 1 'incrementa a contagem dos ativos

application.unlock

End Sub

Sub Session_OnEnd

application.lock

application("usrativos")=application("usrativos") - 1 'subtrai 1 usuario quando a sessao termina

application.unlock

End Sub

</SCRIPT>

miguinha, vale lembrar que você só vai ver a subtração do usuario quando der um reload na página, beleza?

qualquer coisa dá o toque

washibano@bol.com.br

:ph34r:

[Guest Guest]

A codigo exclui!

O codigo não é um contador!

: )

[Eddie_666]

Do jeito que está parece um contador...