con questo script memorizzo il nominativo collegato:

If InStr(1, Application("users"), Session("cognome") & "|" ) = 0 Then
Application.Lock
Application("users") = Application("users") & Session("cognome") & "|"
Application.UnLock
End If

e con questo lo visualizzo:
dim arrUtenti
dim a
a=1
arrUtenti = Split(Application("Users"),"|")
for i = 0 to UBound(arrUtenti)-1
%>
<tr >
<td><%=a%></td>
<td><%=arrUtenti(i)%></td>
</tr>
<%
a=a+1
next

quando visualizzo l'elenco qualche nome lo visualizza insieme esempio:

1 pioppocaioecc
2 osvaldo

Dipende dal fatto che si collegano tutti insieme?