Hvordan får jeg indsat <br>?

Hey ?!

Jeg har følgende kode:

***************************
<%
Dim Conn
Dim tbl

ID = trim(request.querystring("ID"))
strConnect = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("*.mdb")
Set Conn = Server.CreateObject ("ADODB.Connection")

strSQL = "SELECT * FROM artikler WHERE ID = "& ID

Conn.Open strConnect
Conn.Execute (strSQL)
Set tbl = Conn.Execute(strSQL)
If Not tbl.eof Then

Artikel = trim(tbl("artikel"))
Forfatter = trim(tbl("forfatter"))

Response.Write "<table><tr>"

Response.Write "<td>Artikel:</td><td>" & artikel & "</td></tr>"
*********************************'

Den tekst jeg trækker ud kommer i én lang smøre - Jeg mister linieskift.
I en tidligere kode jeg fik bakset sammen brugte jeg:
  Replace(rs("artikel"), vbCrLf, "<br>")
men i denne sammenhæng kan jeg ikke lige knække den.

Jeg er (meget) nybegynder, og lidt pædagogisk omsorg er derfor nødvendig :-)

Venlig hilsen
Michael Boysen