RunTime Error 3075

SunnySide · January 12th, 2012, 04:46 PM

I have looked this over and over and couldn't seem to find anything....can someone else take a look at this and let me know if you see anything that shines light on why I'm getting this Error?

Code:

    'Create table for Chargeback Non-Reversal
        DoCmd.RunSQL ("DELETE * FROM Chrgback_NonReversal")
        mySQL = "INSERT INTO Chrgback_NonReversal ( [CBVND#], CBTHED, CBTHAM, CBNSRF, CBTHAF, CBNRDT, CBRAMT, CBNRAM, CBCRNO, CBCRSQ, CBCUST, [CBORD#], CBORLN )"
        mySQL = mySQL & " SELECT " & DCFPCBNRDTtemp & ".[CBVND#]," & DCFPCBNRDTtemp & " .CBTHED," & DCFPCBNRDTtemp & " .CBTHAM," & DCFPCBNRDTtemp & " .CBNSRF," & DCFPCBNRDTtemp & " .CBTHAF, " & DCFPCBNRDTtemp & ".CBNRDT, " & DCFPCBNRDTtemp & ".CBRAMT, " & DCFPCBNRDTtemp & ".CBNRAM, " & DCFPCBNRDTtemp & ".CBCRNO, " & DCFPCBNRDTtemp & ".CBCRSQ, " & DCFPCBNRDTtemp & ".CBCUST, " & DCFPCBNRDTtemp & ".[CBORD#]," & DCFPCBNRDTtemp & " .CBORLN  FROM " & DCFPCBNRDTtemp
        
        DoCmd.RunSQL (mySQL)
        Set mySQL = Nothing

Any help would be apreciated. Thanks!

HiTechCoach · January 12th, 2012, 07:57 PM

Looks like in several places you have extra spaces(s) after the table name and before the .fieldname

Code:

...  DCFPCBNRDTtemp & " .CBTHED,"   ...
....................../^\........

Also try adding

Code:

        Debug.Print mySQL    ' print to Immediate Window

        DoCmd.RunSQL (mySQL)
        Set mySQL = Nothing

After running the code go the the Immediate Window (ctrl-g) and copy and paste the SQL line in the the query design in SQL view. Switch to Design view to see what issues you have.