1 Tilføje følgende til global.asa Sub Session_OnEnd Application.Lock Application.Contents.remove(Session.SessionID&"_place") Application.UnLock End Sub
2 Følgende skal tilføjes på alle sider: Application.Lock application(session.SessionID&"_place")=Request.ServerVariables("SCRIPT_NAME") Application.UnLock 3. Følgende tæller antal online brugere i en mappe: guest = 0 subfoldername="tt" For Each applv in Application.Contents if right(applv, 6) = "_place" then page_array=split(application(applv),"/") if UBound(page_array)>1 then if page_array(UBound(page_array)-1) = subfoldername then guest = guest+1 end if end if end if next Response.Write guest
nej det er onend. 2 gemmer en generel variabel(application), hvor den bruger sessionid til at gøre variablen brugerspecifik. Variablen indeholder data om, hvilken side brugeren sidst har loadet.
1 Når bruger forlader hele siden, er man nødt til at benytte global.asa. onend benyttes til at nedlægge variblen, på denne måde tæller brugeren ikke med, når dennes session ikke længere er aktiv.
3 Tæller bruger op, ved at betragte alle applicationsvaribaler som er sat for hele webstedet. Jeg undersøger om navnet ender på _place, på den måde ved jeg om der en som jeg skal tælle med. Hvis navnet ender på place undersøger jeg indholder for at finde ud af, hvilken side brugern sidst har været inde på. Dette gør jeg ved at dele adressen op i en array. Jeg bentter / til at dele strengen. Hvis arrayen indeholder mere end 2 poster ved jeg, at der er data om en undermappe på den næst sidste plads. Og på den måde finder jeg ud af, hvor mange bruger der er.
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.