Syntax error in UPDATE statement.

Jeg får en:

Microsoft JET Database Engine error '80040e14'

Syntax error in UPDATE statement.

/update.asp, line 17

fejl for denne kode:
<!--#include file="include/db.asp"-->
<%
Function OpdaterUpdate()
Call OpenDB
TheId        = Request.Form("MAINid")
TheTitel    = Request.Form("MAINoverskrift")
TheText        = Request.Form("MAINmyTextarea")

strSQL = "SELECT [TextID], [TextOverskrift], [TextMain] FROM index"
strSQL = strSQL & " WHERE [TextID] = " & TheId & ""
Set objRSupdater = objConn.Execute(strSQL)

strSQL = "UPDATE index SET "
strSQL = strSQL & "TextOverskrift='" & TheTitle & "',"
strSQL = strSQL & "TextMain='" & TheText & "',"
strSQL = strSQL & " WHERE [TextID] = '" & TheId & "'"
objConn.Execute(strSQL)
End Function

OpdaterUpdate()
Response.Redirect("default.asp")
%>

hvad kan fejlen skyldes !?