En SQL - fejl!

Hej

Function fixQuotes( theString )
    fixQuotes = Replace( theString, "'", "''" )
End Function

strSQL = "Insert into konkurrencesvar (konkurrenceid, ip, svar, navn, adresse, post, by, mail)"
strSQL = strSQL & " values('" & request.querystring("id") & "', "
strSQL = strSQL & "'" & request.ServerVariables("REMOTE_ADDR") & "', "
strSQL = strSQL & "'" & replace(request.form("svar"),"'","''") & "', "
strSQL = strSQL & "'" & replace(request.form("navn"),"'","''") & "', "
strSQL = strSQL & "'" & replace(request.form("adresse"),"'","''") & "', "
strSQL = strSQL & "'" & replace(request.form("post"),"'","''") & "', "
strSQL = strSQL & "'" & replace(request.form("by"),"'","''") & "', "
strSQL = strSQL & "'" & replace(request.form("mail"),"'","''") & "')"
Conn.Execute(strSQL)

Men jeg får fejlen:

Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

[Microsoft][ODBC Microsoft Access Driver] Syntax error in INSERT INTO statement.


Help me!

Mvh.

Langfinger