Enter til <BR>

Jeg skal have lavet, så når du trykker enter eller skrive en hjemmeside adr. så bliver det automatisk lavet om til henholdsvis <br> og et link i databasen.

Hvordan gør man det og hvor skal det sættes ind:

<%
Response.Buffer = True

FUNCTION fixQuotes( theString )
    fixQuotes = Replace( theString, "'", "''" )
END FUNCTION

    nick = Request( "Nick" )
    over = Request( "Over" )
    besked = Request( "Besked" )
strIP = Request.ServerVariables("REMOTE_HOST")

Set Con = Server.CreateObject( "ADODB.Connection" )
    DBPath = "DBQ=" & server.mappath("db/tagwall.mdb")
    Con.Open "DRIVER={Microsoft Access Driver (*.mdb)}; " & DBPath

IF Request.Servervariables("Content_Length") > 0 THEN
    Sql = "INSERT INTO tag (dato, besked, over, nick, strIP) VALUES('" & now() & "','" & fixQuotes( besked ) & "','" & fixQuotes( over ) & "','" & fixQuotes( nick ) & "','" & strIP & "')"
    Con.Execute Sql

    Response.Write "<strong>Thx for the tag :D </strong>"
   
END IF

%>