Global.asa fejl

Hej. Jeg prøvede i går aftes at komme denne global.asa kode op på mit site. Den skulle gerne kunne tælle antal online brugere. Men med det samme jeg lagde den op gik websitet ned med en 500-12 fejl. Hvad kan problemet være?

<script language="vbscript" runat="server">
sub Application_OnStart
    Application("OnlineUsers") = 0
end sub

sub Session_OnStart
    Application.Lock
    Application("OnlineUsers") = Application("OnlineUsers") + 1
    Application.UnLock
end sub

sub Session_OnEnd
    Application.Lock
    Application("OnlineUsers") = Application("OnlineUsers") - 1
    Application.UnLock
end sub
</script>

Mvh Mark
--
www.gameshots.dk