Radbyte i textfil

Är det möjligt att med en replace funktion bryta rader i en text som är inlästa från en textfil?

<%

Filename = "foto/" & request.querystring("txt") & "/readme.txt"
set FSO = server.createObject("Scripting.FileSystemObject")
Filepath = Server.MapPath(Filename)

if FSO.FileExists(Filepath) Then

Set f = fso.OpenTextFile(Filepath, 1)
ReadAllTextFile = f.ReadAll
ReadAllTextFile =   replace(ReadAllTextFile, vbcrlf, "<br />")
%>
<%=ReadAllTextFile%>
<%	
f.Close
Set f = nothing
Else %>
Det finns tyvär ingen information om detta album.<br />
Klicka på ett nummer för att se respektive bild.
<%
End If
Set FSO = nothing
%>
<% else %>
<img src="img/gif/spacer.gif" name="img1" width="1" height="18" id="img1" />V&auml;lj en bild i menyn till v&auml;nster.
<% end if %>

Kanske?

<%
   Response.Write(Replace(ReadAllTextFile,vbCrLf,"<br>"))
%>

Har givetvis testat det också.
Fungerar dock inte..

Löste problemet med readline och loop istället.