Antal inloggade på siten...

[Lukaspojken]

För att använda denna funktion så måste du behörighet att använda global.asa (gratis webbhotell tillåter oftast inte detta).

Denna kod ska finnas i global.asa
<font size="1" face="Verdana, Arial, Helvetica, sans-serif">Kod:[/kod]<font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#006666">
<script language=VBScript runat=Server>
Sub Application_OnStart
Application("antal") = 0
End Sub

Sub Session_OnEnd
IF session("userID") <> "" THEN
Application.Lock
Application("antal") = cint(Application("antal")) -1
Application.Unlock
End if
End Sub
</script>
[/kod]

När användaren loggar in och får en session så ska du lägga till denna application("antal"). Ska ge ett exempel.

Ett utdrag ur login.asp
<font size="1" face="Verdana, Arial, Helvetica, sans-serif">Kod:[/kod]<font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#006666">
session("userID") = userID

Application.Lock
Application("antal") = cint(Application("antal")) +1
Application.Unlock

Response.Redirect "medlem.asp"
[/kod]

Eventuella diskussioner kring scriptet kan göras i denna tråd:
http://cgi.webforum.nu/wf/Forum11/HTML/006675.html

------------------
Alltid lär man sig något nytt varje dag...

[Redigerat av Lukaspojken den 08 okt 2001]