Tengo montado un sistema, basado en GLOBAL.asa en el que cada vez que alguien entra en la web (si ya esta registrado) lo muestre por pantalla. El codigo para mostrarlo no lo pongo, por que creo que hay no hay ningun problema, y me da que el problema esta aqui:
Código:
Sub Session_OnStart
Session("usrName") = Request.Cookies("User")("Name")
Application.lock
Application("online")=application("online")+1
If session("usrName") <> "" Then
If application("online") = 0 Then
application("somos") = application("somos") & session("usrName")
Else
application("somos") = " - " & application("somos") & session("usrName") & " - "
End If
Else
application("anonim") = application("anonim") + 1
End If
Application.unlock
End Sub
Cuando veo como han quedado los resultados (imprimiendo en pantalla la variable application("somos") ) entonces veo que si, hay 2 usuarios online, queda asi:
- - - usuario1 - usuario2
Si hay 3,
- - - - usuario1 - usuario2 - usaurio3
¿Donde puede estar el fallo? ¿Como puedo optimizar este codigo? Gracias
¿Como puedo hacer luego para sacar el numero de Usuarios Online?
Se me ha ocurrido que a lo mejor era mejor si la variable la cambiaba en vez del nombre por la ID unica de cada usuario, pero... ¿Como recorro la variable para quedarme solo con cada ID=?