Chat og lagring via txt fil?

Hej Alle!

Jeg er i gang med at lave en simpel support chat, og jeg har valgt at lagringsmediet skal være en txt fil. :)

Jeg bruger Fso til at tilføje en linie til txt filen.

Set fso = CreateObject("Scripting.FileSystemObject")
filespec = Server.Mappath("\ocs\txt\chat.txt")
Set f = fso.OpenTextFile(filespec,8,True)
f.WriteLine("" & Now & ": " & Request.Form("message") & "" & VbCrLF)
f.Close

Jeg henter så txt filen hvert 3 sekund i en iframe. Det fungerer jo også fint nok.

Set fs=Server.CreateObject("Scripting.FileSystemObject")
Set f=fs.OpenTextFile(Server.MapPath("\ocs\txt\chat.txt"), 1)

Response.Write Replace(f.ReadAll, vbCrLf, "<br>")

f.Close
Set f=Nothing
Set fs=Nothing


Og så til problemet. Når jeg skriver til txt filen bliver det jo til:

Linie 1: Hej
Linie 2: Med
Linie 3: Dig

Med det er jo lidt dumt at hente det sidst skrevne i bunden :) Findes der nogen måde, at vende læsningen, så det bliver til:

Linie 3: Dig
Linie 2: Med
Linie 1: Hej

:) Michael