Problem med at vise en fils indhold i et textarea?

Hey !

Jeg er ved og lavet et script til online redigering af ens hjemmeside.
Men jeg har det problem at når jeg for den til at vise indholdet i en fil skriver den det sådan:

<html><br><head><br>    <title>Nyt dokument</title><br></head><br><body><br></body><br></html><br>

Hvor den skulle have skrevet det sådan:

<html>
<head>
    <title>Nyt dokument</title>
</head>
<body>
</body>
</html>


Mit script ser sådan her ud:

<textarea cols="97" name="file" rows="36">
<%
Dim fso, f, filespec, Fil

Fil = Request.Querystring("fil")

Set fso = CreateObject("Scripting.FileSystemObject")
filespec = Server.Mappath("" & Fil & "")
Set f = fso.OpenTextFile(filespec,1)
   
Do While not f.AtEndOfStream
  Response.write f.ReadLine & "<br>"
  Loop
 
  f.Close
%>
</textarea>

hvordan for jeg så mit script til at sette det ordenligt op?

/Firehat