Apostrof?

Jeg har denne kode:

<%
if request.form("send_debatemne") >"" then
Set Conn = Server.CreateObject("ADODB.Connection")
dbConn = "SERVER=Local;DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("/fpdb/include.mdb")
Conn.open dbConn
                           
'dato = FormatDateTime(Now, 1)
'tid = FormatDateTime(Now, 4)
tekst=Replace(tekst,"'","''")

strSQL = "insert into debat (nick, emne, kommentar) values('" & Request.Form("nick") & "', '" & Request.Form("emne") & "', '" & Request.Form("kommentar") & "')"
'strSQL = "insert into debat (nick, emne, kommentar, dato, tid) values('" & Request.Form("nick") & "', '" & Request.Form("emne") & "', '" & Request.Form("kommentar") & "', #" & dato & "#, & #" & tid & "#& "')"

Conn.Execute(strSQL)
                           
response.redirect ("default.asp")

Conn.Close
Set Conn = nothing
end if
%>


Jeg troede, at

tekst=Replace(tekst,"'","''")

ville sørge for, at apostrofer kunne medtages i et notatfelt?