I can&#039;t this piece of code to up date my access database, where am I going wrong?<BR><BR>&#060;%<BR> Dim objRSDesc, objRSSkill, bolFound, strSQLSkill, strUsername, strSQLDesc <BR> Dim strWorktype, strOperating, strApps, strMail, strHardware, strComms, strMethod, strLanguages, strDevelopment, strWeb, strAuthoring, strGraphic, strExperience, strEmails <BR> Dim aWorktypeArray, aOperatingArray, aAppsArray, aMailArray, aHardwareArray, aCommsArray, aMethodArray, aLanguagesArray, aDevelopmentArray, aWebArray, aAuthoringArray, aGraphicArray, aExperienceArray, aEmailsArray<BR> Dim iLoopWorktype, iLoopOperating, iLoopApps, iLoopMail, iLoopHardware, iLoopComms, iLoopMethod, iLoopLanguages, iLoopDevelopment, iLoopWeb, iLoopAuthoring, iLoopGraphic, iLoopExperience, iLoopEmails <BR> If ((Request.Form("firstname") = "") OR (Request.Form("secondname") = "") OR (Request.Form("email") = ""))Then<BR> Server.Execute "includes/AccountConfirm/InvalidEntry.asp"<BR> Else<BR> <BR> strUsername = Request.Cookies("SeekerLogin")("userid")<BR> <BR> Set objRSDesc = Server.CreateObject("ADODB.Recordset")<BR> objRSDesc.Open "user_description", objConn, , adLockOptimistic, adCmdTable<BR> bolFound = False <BR> <BR> Do Until objRSDesc.EOF OR bolFound<BR> If (StrComp(objRSDesc("userid"), strUsername, vbTextCompare) = 0) Then<BR> BolFound = True<BR> Else<BR> objRSDesc.MoveNext<BR> End If<BR> Loop<BR> <BR> objRSDesc("firstname") = Request.Form("firstname")<BR> objRSDesc("secondname") = Request.Form("secondname")<BR> objRSDesc("email") = Request.Form("email")<BR> <BR> strWorktype = Request.Form("worktype") <BR> aWorktypeArray = split(strWorktype, ",")<BR> For iLoopWorktype = Lbound(aWorktypeArray) to Ubound(aWorktypeArray)<BR> Select Case Trim(aWorktypeArray(iLoopWorktype))<BR> Case "full":<BR> objRSDesc("full") = true<BR> Case "part":<BR> objRSDesc("part") = true<BR> Case "contract":<BR> objRSDesc("contract") = true<BR> Case "placements":<BR> objRSDesc("placements") = true<BR> End Select<BR> Next<BR> strExperience = Request.Form("experience")<BR> aExperienceArray = split(strExperience, ",")<BR> For iLoopExperience = Lbound(aExperienceArray) to Ubound(aExperienceArray)<BR> Select Case Trim(aExperienceArray(iLoopExperience))<BR> Case "grad":<BR> objRSDesc("grad") = true<BR> Case "postgrad":<BR> objRSDesc("postgrad") = true<BR> Case "6mts":<BR> objRSDesc("6mts") = true<BR> Case "1yr":<BR> objRSDesc("1yr") = true<BR> Case "2yr":<BR> objRSDesc("2yr") = true<BR> Case "4yr":<BR> objRSDesc("4yr") = true<BR> Case "8yr":<BR> objRSDesc("8yr") = true<BR> End Select<BR> Next<BR> strEmails = Request.Form("emails")<BR> aEmailsArray = split(strEmails, ",")<BR> For iLoopEmails = Lbound(aEmailsArray) to Ubound(aEmailsArray)<BR> Select Case Trim(aEmailsArray(iLoopEmails))<BR> Case "receive":<BR> objRSDesc("receive") = true<BR> End Select<BR> Next <BR> <BR> objRSDesc.Update<BR> <BR> ObjRSDesc.Close<BR> Set objRSDesc = Nothing<BR><BR>I keep getting this error<BR><BR>[Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression <BR> <BR>Any Ideas?<BR><BR>Chris