Código:
Cuando veo como han quedado los resultados (imprimiendo en pantalla la variable application("somos") ) entonces veo que si, hay 2 usuarios online, queda asi: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
- - - 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=?