Hallo Spezis!
Ich versuch ein Script zu schreiben, welches die aktiven User auf einer Seite per ApplicationObject und SessionObject zählen soll.
Hierzu habe ich die Datei global.asa erstellt (war nicht vorhanden) und folgenden Code dort hinein geschrieben. (Quelle: asp101.com)
Sub Application_OnStart
Application(„activeusers“) = 0
End Sub
Sub Application_OnEnd
End Sub
Sub Session_OnStart
Session.Timeout=20
Session(„Start“)=Now
application.lock()
application(„activeusers“) = application(„activeusers“) + 1
application.unlock()
End Sub
Sub Session_OnEnd
application.lock()
application(„activeusers“) = application(„activeusers“) - 1
application.unlock()
End Sub
Soweit so gut, aber wenn ich nun versuche, die Seite von einem Client zu erreichen, bekomme ich folgende FM:
Microsoft VBScript runtime error ‚800a01a8‘
Object required: ‚Session‘
/LM/W3SVC/1/Root/caUSP/KT/global.asa, line 12
Wenn ich folgende zwei Zeilen lösche:
Session.Timeout=20
Session(„Start“)=Now
funktioniert die Anmeldung an der Seite, allerdings weiss ich nicht, ob dann richtig gezählt wird.
Kann mir jemand sagen, was ich falsch mache, oder wo meine Einstellungen falsch sind?
Zusatz:
Ich habe die Web Seite als Application definiert.
OS: Win2003 Server
Browser der Clients: IE 5.5