online list problem

Hej...
Jeg har et problem med online liste.

Den bliver ved med at skrive det samme profilnavn under hinanden når man reloader siden.

Og så kan jeg ikke få den til at liste dem i 2 rækker.
Online liste filen kan I se her:
http://www.spotpeople.dk/onlineliste/default.txt

Global.asa kan I se her:

<script language="vbscript" runat="server">

Sub Application_OnStart
  Application.Lock
  Application("OnlineUsers") = ","
  Application.UnLock
End Sub

Sub Application_OnEnd
    ' Skriv kode som skal køres når applikationen (serveren) stoppes
End Sub

Sub Session_OnStart
  Application.lock
    Application("Visits") = Application("Visits") + 1
  Application.unlock
 
  Application.lock
    Application("ActiveUsers") = Application("ActiveUsers") + 1
  Application.unlock
End Sub

Sub Session_OnEnd
  If Len(Session("id")) > 0 Then
    Application.Lock
  Application("OnlineUsers") = Replace(Application("OnlineUsers"), Session("id") & ",", "")
  Application.UnLock
End If
End Sub

</script>

På forhånd tak!
// Rene