Linie skift i textarea

Jeg har følgende side men kune godt tænke mig linie skift nede i tekstboxen

<table width="360">
<tr>
<td>


<%
Dim fso, f, filespec
Set fso = CreateObject("Scripting.FileSystemObject")
filespec = Server.Mappath("../forside.txt")

If Request.Form("hej") <> "" Then

Set f = fso.OpenTextFile(filespec,2)

' Skriv tekst i en linie
f.Write Request.Form("hej")

' Åbn filen til læsning og Læs linie for linie
Set f = fso.OpenTextFile(filespec,1)
Do While not f.AtEndOfStream
  Response.write f.ReadLine & "<br>"
Loop
f.Close
End If

Set f = fso.OpenTextFile(filespec,1)
Do While not f.AtEndOfStream
  test = test & f.ReadLine
Loop
f.Close
%>


</td>
</tr>
<tr>
<td>
<center>
<FORM ACTION="ret-hovedside.asp" METHOD="POST">
<TEXTAREA WRAP="off" NAME="hej" cols="40" rows="10"><%=test%></TEXTAREA><br>
</td>
</tr>
<tr>
<td align="center">
<INPUT TYPE="submit" VALUE="    Ret    ">
</td>
</tr>
</center>
</table>
</FORM>