I HAVE IT WORKING!!!!!!!!!!!!!!!!!!!!!
This is the working Code
strSQL = "Update([Products_Tbl] INNER JOIN [Parts Types] ON [Products_Tbl].[Item Code] = [Parts Types].[Parts ID]) " & _
" INNER JOIN [Car_Parts] ON [Parts Types].[Parts Type] = [Car_Parts].[Parts Type] " & _
" SET Products_Tbl.[Qty on Hand] = [Qty on hand]-[Car_Parts].[Qty] " & _
" WHERE [Car_Parts].[Product Code] ='" & [Forms]![Sales_Entry_Form]![Prod_Code_Text] & "'" & _
" And [Products_Tbl].[Item Code] = [Parts Types].[Parts ID] " & _
" And ([Car_Parts].[Basic Package] = True " & _
" Or [Car_Parts].[Luxury Package]= True) "
I have no idea what all was the problem.
I am gonna try iff in it just to see. Will post results.
Thanks again for all the help