readline?

<%
Set Conn = CreateObject("Scripting.FileSystemObject")
Set RecSet = Conn.OpenTextFile(server.mappath("min.txt"))
%>

den ska skriva ut HELA filen sen efter här.... jag har gjort något men det måste finnas en bättre lösning:

<%
Set Conn = CreateObject("Scripting.FileSystemObject")
Set RecSet = Conn.OpenTextFile(server.mappath("min.txt"))
%>
<%

f1 = RecSet.Readline
f2 = RecSet.Readline
f3 = RecSet.Readline
%>
<%=f1%><br>
<%=f2%><br>
<%=f3%><br>

typ någon loop av något slag....
så att hela filen laddas på en gång.. så att man kan köra
objRegExp.Pattern = "\[pelle\]"
filnamn = objRegExp.Replace(filnamn,"<font color='#FFFFFF'")

Fixat readall bara..

Vad är frågan, du har redan fixat .ReadAll säger du ju? ;)

Om jag fattar dig rätt så är det bara att läsa hela filen med .ReadAll och sen köra ditt pattern o skriva ut.

Är det bara radbrytningarna du är ute efter så:

Replace(RecSet.ReadAll, vbcrlf, "<br>")

PS. att döpa läsning ur en fil till RecSet är kanske lite förvillande? ;)

kanske =) men jag kör så nu =)