Ich habe die folgende SQl-Abfrage in VBA und es gibt mir einen Syntaxfehler, wenn ich das Formular ausführen. Ich habe versucht, die Abfrage erneut zu schreiben, aber ich endete mit dem gleichen Fehler. Jede Hilfe wäre appreciated.Thank Sie:Syntaxfehler in SQL-Abfrage-Ms-Zugriff
Set RS = CurrentDb.OpenRecordset("SELECT & _
Purchases.SupplierLocation & _
, Purchases.MinWeight & _
, Purchases.MaxWeight & _
, Purchases.PortofDischarge & _
, Purchases.PlaceofDelivery & _
, Purchases.PriceTermsLocation " & _
"FROM (& _
Vendors & _
RIGHT JOIN Purchases & _
ON Vendors.VendorID=Purchases.VendorID & _
) & _
INNER JOIN & _
(SELECT Max(PODate) as MaxPODate & _
FROM Purchases & _
WHERE Purchases.VendorID = '" & Nz(Me.VendorID, "") & "' & _
AND Purchases.Grade = '" & Nz(Me.Grade, "") & "' & _
AND Purchases.PurchaseID <> " & Nz(Me.PurchaseID, 0) & " & _
) RecentPurchase & _
ON Purchases.PODate = RecentPurchase.MaxPODate " & _
"WHERE Purchases.VendorID = '" & Nz(Me.VendorID, "") & "' & _
AND Purchases.Grade = '" & Nz(Me.Grade, "") & "' & _
AND Purchases.PurchaseID <> '" & Nz(Me.PurchaseID, 0)"' & _
"ORDER BY Min(IIf(Vendors.VendorID=Purchases.VendorID,1,2))")
Ich hoffe, das ist nicht zu unhöflich, aber Sie könnten wahrscheinlich leicht Ihren Code beheben, wenn er gut formatiert war ... zumindest konnte es nicht schaden. –