Global.asa

<script language="VBScript" runat="server">
Sub Application_OnStart

Application("Giocatore") = ""

End Sub

Sub Session_OnEnd
n = Replace(Application("Giocatore"), Session("Giocatore") & "#^#" & Session("Locazione") & "|", "")
Application.Lock
Application("Giocatore") = n
Application.UnLock
End Sub
</script>

<--------------------------------------------------------------------->

Online.asp


nomi = Split(Application("Giocatore"), "|")
For i = 0 To UBound(nomi)
nome= split(nomi(i), "#^#")

for f = 0 to ubound(nome)-1
comp = nome(f)
locazione = replace(nome(1), "_", " ")
sql = "select * from Giocatori Where Nome ='"&comp&"'"
set rs = conn1.execute(sql)
%> <tr>
<td class="bordo_tabelle"><%=nome(f)%></td>
<td class="bordo_tabelle"><%=RS("Razza")%></td>
<td class="bordo_tabelle"><%=locazione%></td>
</tr>
<% next
Next
%>

<------------------------------------------------------------------------>

Login.asp (Controllo)

UserID = Request.Form("Nome")
Password = Request.Form("Password")

SQL = " SELECT * FROM Giocatori WHERE Nome = '" & UserID & "'"
Set RS = Conn1.Execute(SQL)

If Not RS.EOF then
If Password=RS("Password") AND RS("Attivazione")="Attivo" Then
Session("Giocatore") = UserID
session("ID") = RS("ID")
session("Locazione") = "Principale"
If InStr(1, Application("Giocatore"), Session("Giocatore") & "#^#" & Session("Locazione") & "|" ) = 0 Then
Application.Lock
Application("Giocatore") = Application("Giocatore") & Session("Giocatore") & "#^#" & Session("Locazione") & "|"
Application.UnLock
End If

Response.Redirect "ITA/index.asp"
Else
Response.Redirect "index.asp?accesso=no"
End If
Else
Response.Redirect "index.asp?accesso=no"
End If
<-------------------------------------------------------------------------->

salve, ho un piccolo problemino con ll'uscita nel momento del log out siccome la sessione/applicazione mi rimane sempre nella lista degli online è non viene rimosso dal session.timeout ho anche seguito il post in cui se ne è parlato ma non sono riuscito a risolverlo qualcuno potrebbe darmi una piccola illimunazione.

Grazie :master: