Append error

[MA04]

Hi,

I wanted to append a SubString that was created by a search query that you guys helped me with which split a field into different records field named SubString of original Field PRMF. This result is displayed on a form and the user can then select and pree a button to append the viewed record, but i get an error 'Runtime error 3296' 'Join expression not supported'.

MY append query looks like:
Private Sub Command18_Click()

Dim strSQL As String
strSQL = "INSERT INTO ma_enq ( A4, A1, A2, A3 ) " & _
"SELECT ma_dbo_uk.postcode, ma_dbo_uk.PRMF, ma_dbo_uk.STR, ma_dbo_uk.CNT " & _
"FROM Integers, ma_dbo_uk LEFT JOIN ma_enq ON ma_dbo_uk.postcode = ma_enq.A4 " & _
"WHERE (((ma_dbo_uk.postcode)=[Forms]![Ma_search2]![Command18]));"

DoCmd.RunSQL strSQL

End Sub

Thanks in advance,
M-.

 

[MA04]

sorry the last bit was
"WHERE (((ma_dbo_uk.postcode)=[Forms]![Ma_search2]![PRMF_a1]));"