MS Access vba Abfrage wo

Question

Einfache Frage. Zum Beispiel habe ich einen Kunden, der 10 Bestellungen hat und jede Bestellung 6-10 Artikel enthält.

Ich möchte eine VBA-Abfrage erstellen, die alle Artikel eines bestimmten Kunden anzeigen wird.

Meine Frage ist:

x = CustomerNum 
Query = "Select OrderNum from CustomerOrderT Where CustomerNum = " & x 
Set result = CurrentDb.OpenRecordset(Query) 

y = result!OrderNum 
'(there is a lot of orders on y) 

Query = "Select Product From OrderProducts Where OrderNum = " & y 
Set result = CurrentDb.OpenRecordset(Query) 

Das Problem ist, dass ich nur die Produkte der ersten Ordnung sehen, und ich kann nicht die Produkte aller Aufträge sehen, die ich auf der ersten Abfrage wählen. Brauchen Sie etwas Hilfe, um diese Situation zu behandeln. Vielen Dank.

Answer 1

Sie können nur eine einzelne Abfrage für alle Aufträge ausführen:

x = CustomerNum 
Query = " SELECT CustomerOrderT.CustomerNum, " & _ 
        CustomerOrderT.OrderNum, " & _ 
     "   OrderProducts.Product " & _ 
     " FROM CustomerOrderT INNER JOIN OrderProducts " & _ 
       ON CustomerOrderT.OrderNum = OrderProducts.OrderNum " & _ 
     " WHERE (((CustomerOrderT.CustomerNum)=" & x & ")) " & _ 
     "ORDER BY CustomerOrderT.OrderNum, " & _ 
     "   OrderProducts.Product;" 

Und dann Schleife über alle Datensätze, OrderNum

in jeder Änderung der Feststellung Aber Vorsicht SQL wie diese, wenn Sie bauen don Sie können nicht steuern, wie die Variable CustomerNum zugewiesen wird, wenn Sie sich für SQL-Injection-Angriffe öffnen.