It keeps throwing a run-time error 3141
DoCmd.RunSQL "INSERT INTO Resent_FileExtracts ( SUPPLIER, PART_NUMBER, AFN, DATE ) SELECT [" & strFullName & "].Company, [" & strFullName & "].[Part Number], """ & strAFN & """, """ & strDate & """ FROM [" & strFullName & "];"
The part that's torching my ulcer is that it ran two days ago just fine using exactly the same tables.
Thanks one and all.
PerryG
DoCmd.RunSQL "INSERT INTO Resent_FileExtracts ( SUPPLIER, PART_NUMBER, AFN, DATE ) SELECT [" & strFullName & "].Company, [" & strFullName & "].[Part Number], """ & strAFN & """, """ & strDate & """ FROM [" & strFullName & "];"
The part that's torching my ulcer is that it ran two days ago just fine using exactly the same tables.
Thanks one and all.
PerryG