<SCRIPT LANGUAGE="VBScript" RUNAT="Server">
Sub Application_OnStart
Application("strVisitors") = 0
End Sub


Sub Session_OnStart
Application.lock
Application("strVisitors")=Application("strVisitors") + 1
Application.unlock
End Sub

Sub Application_OnEnd
Application("strVisitors") = 0
End Sub

Sub Session_OnEnd
Application.lock
Application("strVisitors")=Application("strVisitors") - 1
Application.unlock
End Sub
</SCRIPT>
Kod site de online olanları sürekli artış şeklinde gösteriyor çıkanı eksiltmiyor. Acaba kodun neresi hatalı?