replace funktion

Jeg har sådan en sætning:

Besked = replace(request.form("besked"),chr(10),"<br>")

Jeg vil også gerne have at min Besked skal have endnu en replace , nemlig replce ' med ''. Men dette kan jo kun ske gennem en fucktion. Og igennem en funktion kan man ikke indsætte noget ind i min databse, har jeg erfaret(måske fokert).

Hvordan kan jeg lave flere replace's, og stadig sætte det ind i min database?

Hele koden er fx:

Besked = replace(request.form("besked"),chr(10),"<br>")

brugerID = cint(session("brugerID"))

SQL = "INSERT INTO forum (bruger,status,message) VALUES ("&brugerID&",1,'" &  Besked & "')"
 

  Conn.Execute(SQL)
 

  Conn.Close

  Set Conn = Nothing