Online Brugere
Hejsa!Er der nogen der har løsningen på scriptet til en online bruger
Mit ser sådan ud i global.asa
<OBJECT RUNAT=Server SCOPE=Session ID=BC PROGID=\"MSWC.BrowserType\">
</OBJECT>
<SCRIPT LANGUAGE=VBScript RUNAT=Server>
SUB Session_OnStart
Session.Timeout = 20
Application.lock
Application(\"Active\")= application(\"Active\") + 1
Application.unlock
END SUB
SUB Session_OnEnd
Application.lock
Application(\"Active\")= application(\"Active\") - 1
Application.unlock
END SUB
</SCRIPT>
Og det ser sådan ud i default.asp
<%=application(\"active\")%>
<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 3.2 Final//EN\">
<HTML>
<HEAD>
<TITLE> </TITLE>
<META HTTP-EQUIV=\"content-type\" CONTENT=\"text/html; charset=iso-8859-1\">
