CFF KB - Carrz-Fox-Fire Promotions Knowledge Base

CFF KB is all about 1 thing: The Sharing of Knowledge and the Power we gain from it.
  • Breadrumbs:
  • Microsoft VBScript compilation error '800a03f3' Expected '='

  • CFF Knowledge Base - Share With Facebook CFF Knowledge Base - Share on Twitter CFF Knowledge Base - Share on Reddit CFF Knowledge Base - Share on Digg It CFF Knowledge Base - Share on Stumble Upon It CFF Knowledge Base - Share on Delicious
    Share With Friends (Updated 6-8-2010)
  • Article ID:
    117
  • Date Created
    Saturday, March 12, 2011
  • Last Updated
    Saturday, March 12, 2011
  • This Article Has been Viewed
    4000 times
  • Short Desc
    When you write your update, insert, delete statement, it is expecting an execute to happen, not a set.
  • Details
    When you write out your INSERT, UPDATE, DELETE statements, you must write out your execute statement, if it is improperly writen, you will receive the following error.

     
    Microsoft VBScript compilation error '800a03f3'
    Expected '='
    /rhc/data/Resets.asp, line 53
    set chESQL
    --------------^
  • Recreate Issue
    To recreate this issue:

    Insert statements running procedures, will be written like this.

    set rsESQL = chESQL.execute

    Writting the Update, Insert or Delete statements, you must Execute the statement, not Set.

    <%
    Set chESQL = Server.CreateObject("ADODB.Command")
    chESQL.ActiveConnection=RHCConn
    chESQL.commandtext="update mytable set rec1=? where rec2=?"
    chESQL.Parameters.Append chESQL.CreateParameter("@rec1", adInteger, adParamInput, , getrec1)
    chESQL.Parameters.Append chESQL.CreateParameter("@rec2", adInteger, adParamInput, , getrec2)
    set chESQL
    %>

    The above will cause this error, as it is expecting an = chESQL.execute for a select statement, not an update, insert or delete statement.
  • Resolve Issue
    To Resolve this issue
    when you write out your update, insert or delete statement with using Parameters, you must execute your code

    <%
    Set chESQL = Server.CreateObject("ADODB.Command")
    chESQL.ActiveConnection=RHCConn
    chESQL.commandtext="update mytable set rec1=? where rec2=?"
    chESQL.Parameters.Append chESQL.CreateParameter("@rec1", adInteger, adParamInput, , getrec1)
    chESQL.Parameters.Append chESQL.CreateParameter("@rec2", adInteger, adParamInput, , getrec2)
    chESQL.execute
    %>