Har sökt på forumet om detta men kan icke finna svaret. Jag undrar hur man skriver för att visa alla aktiva sessioner. Det borde väl finnas nån trevlig kodsnutt, typ
<%showallsessions%>
Sub Application_OnStart
Application("visitors")=0
End Sub
Sub Session_OnStart
Application.Lock
Application("visitors")=Application("visitors")+1
Application.UnLock
End Sub
Sub Session_OnEnd
Application.Lock
Application("visitors")=Application("visitors")-1
Application.UnLock
End Sub
Sub Application_OnStart
Application("visitors")=0
End Sub
Sub Session_OnStart
Application.Lock
Application("visitors")=Application("visitors")+1
Application.UnLock
End Sub
Sub Session_OnEnd
Application.Lock
Application("visitors")=Application("visitors")-1
Application.UnLock
End Sub
For Each item in Session.Contents
If IsObject(Session.Contents(item)) Then
Response.Write(item & : det går inte att visa objekt" & "<br>")
Else
if IsArray(Session.Contents(item)) Then
Response.Write "array: " & Session.Contents(item)
For Each ObjArray in Session.Contents(item)
Response.Write "<li>" &_
Session.Contents(item)(objArray)& "<br>"
next
Response.Write "</li>"
Else
Response.write(item & " : "& Session.Contents(item) & "<br>")
End if
End if
Next
Tack för era synpunkter. Måste erkänna att jag inte använder global.asa som EchO pratade om. Behövs den? Hur ser den ut? Jag har sökt på forumet och förstått att den kan se ut på lite olika sätt...
I global.asa finns rutiner som anropas när sessioner startas och avslutas, så därför är det ganska bekvämt att använda. Det går att klara sig utan den , i de flesta fall, men det innebär en hel del extra kodning.
jag måste ju säga att jag missupfattade dig vad min kod gör i ovanstående fall är att den tar ut varje session som en enskild användare har för tillfället
mvh icaaq
395 ms totalt · 4 externa anrop · v20260731065814-full.51f67c91