Sub Session_End funktioniert nicht richtig oder unzuverlässig

19/12/2007 - 11:23 von Bert Maurer | Report spam
Hallo NG,

möchte auf meiner Webseite anzeigen wieviele Leute gerade online sind, mache
es so:

Sub Session_Start(ByVal sender As Object, ByVal e As EventArgs)

' Wird beim Starten der Sitzung ausgel"st

Application.Lock()

Application("UserCounter") = Convert.ToInt64(Application("UserCounter")) + 1

Application.UnLock()

End Sub



Sub Session_End(ByVal sender As Object, ByVal e As EventArgs)

' Wird am Ende der Sitzung ausgel"st

Application.Lock()

Application("UserCounter") = Convert.ToInt64(Application("UserCounter")) - 1

Application.UnLock()

End Sub


aber das funktioniert nicht richtig, es werden definitiv immer mehr User,
die Abmeldung scheint nicht richtig bzw. nur manchmal zu funktionieren.

Was ist falsch oder wie kann man so etwas noch lösen?

Gruß Bert
 

Lesen sie die antworten

#1 Stefan Falz [MVP]
19/12/2007 - 11:42 | Warnen spam
Hallo Bert,

"Bert Maurer" schrieb

aber das funktioniert nicht richtig, es werden definitiv immer mehr User, die Abmeldung scheint nicht richtig bzw. nur manchmal zu
funktionieren.



Wann erwartest Du denn, dass der Zàhler wieder runtergeht? Direkt nach dem
Schließen des Browsers? Falls ja, falsch gedacht :) Eine Session wird nach
dem Erreichen des Timeouts (oder manuellem Aufruf von Session.Abandon)
beendet, wenn keine besonderen Einstellungen gemacht wurden, also 20 min.
nach der letzten Aktion (Seitenaufruf ...)

Tschau, Stefan
Microsoft MVP - Visual Developer ASP/ASP.NET
http://www.asp-solutions.de/ - Consulting, Development
http://www.aspnetzone.de/ - ASP.NET Zone, die ASP.NET Community

Ähnliche fragen