ciao a tutti è un pò che ho dei problemi con lo script degli utenti connessi

fino a poco tempo fà funzionava, ora mi da dei numei immensi come se non cadessero le sessioni



questo è quello che ho nel global.asa

Sub Application_OnStart
Application.Lock
Application("collegati") = 0
Application.UnLock
End Sub

Sub Session_OnStart
Session.LCID = 1040
Session.Timeout = 20
Application.Lock
Application("collegati") = Application("collegati") + 1
Application.UnLock
End Sub


Sub Session_OnEnd
Application.Lock
Application("collegati") = Application("collegati") - 1
Application.UnLock
End Sub




Sub Application_OnStart
Application("UtentiOnLine") = 0
End Sub

Sub Session_OnStart
Session.Timeout = 20
Application.Lock
Application("UtentiOnLine") = Application("UtentiOnLine") + 1
Application.Unlock
End Sub

Sub Session_OnEnd
Application.Lock
Application("UtentiOnLine") = Application("UtentiOnLine") - 1
Application.Unlock
End Sub

mentre nella home ho

uol = Application("collegati")
'uol = uol + 2
if uol <= 1 then
collegati = "Nessuno"
elseif uol=1 then
collegati = "1"
else
collegati = uol
end if
e poi
Utenti collegati : <font color='#FF0000'><%=collegati%></font>

cosa è che gli sta dando fastidio?
ciao e grazie in anticipo