Antal online

Kan man ikke lave en rimelig enkel "online tæller" som viser hvor mange der online på ens side via ASP? Håber der er nogen der lige gider skrive hvordan
Mvh.
Rune Jensen
---------------------------------------------------------------------------
##The one who laugh last is the one who think slowest!##
---------------------------------------------------------------------------

Kan laves ganske nemt med en global.asa f.eks:

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

Sub Application_OnStart
application("antalbrugere") = 0
application("maxbrugere") = 0
application("maxbrugeredato") = now()
End Sub

Sub Session_onStart

Dim i
i = application("antalbrugere") + 1
application.Lock
application("antalbrugere") = i

If i > application("maxbrugere") Then
application("maxbrugere") = i
application("maxbrugeredato") = now()
End If

application.Unlock

End sub

Sub Session_OnEnd

Dim i

i = application("antalbrugere") - 1
application.Lock
application("antalbrugere") = i
application.Unlock

End Sub

</Script>

Gem hele molivitten i en fil og giv den navnet global.asa.
opret derefter en applikation med root i den mappe hvor du gemmer global.asa filen derefter kan du i en asp fil skrive følgende:

<%
response.write "Der i øjeblikket "
response.write application("antalbrugere")
response.write " Aktive brugere på sitet nu"
%>

Håber at du kan bruge dette eksempel ;o)

MVH
Claus Pryds

Altså jeg har lavet en asa fil med din kode med det med at lave en root applikation forstod jeg ikke lige. Jeg har også lavet asp filen men for at vise den kan jeg så loade til dem med php include koden?
Mvh.
Rune Jensen
---------------------------------------------------------------------------
##The one who laugh last is the one who think slowest!##
---------------------------------------------------------------------------

[Redigeret d. 31/01-04 19:50:35 af Rune Jensen (RoZ)]