PDA

Vollständige Version anzeigen : Kombifeld in umgekehrter Abhängigkeit?


herrephraim
25.06.2003, 13:08
Ich möchte in einem Formular Maschinen Anzeigen lassen. Diesen Maschinen sind über eine Zwischentabelle ein oder mehrere Verfahren zugeordnet. Nun möchte ich über das erste Kombifeld ein Verfahren abfragen. Das klappt auch mit dem Code:

Me!Kombinationsfeld92.Requery
Me.RecordSource = "SELECT Verfahren.Verfahrensnummer, Verfahren.Bezeichnung, Maschine.*" _
& " FROM Maschine INNER JOIN (Verfahren INNER JOIN VerfahrenMaschine ON Verfahren.Verfahrensnummer = VerfahrenMaschine.Verfahrensnummer) ON Maschine.Maschinennummer = VerfahrenMaschine.Maschinennummer WHERE ((Verfahren.Verfahrensnummer= '" & Me![Kombinationsfeld90] & "'))"
Me![Kombinationsfeld92].SetFocus
Me![Kombinationsfeld92].Dropdown
End Sub

Jetzt möchte ich aber, falls mehrere Verfahren zugeordnet sind, in einem zweiten Kombifeld aus diesen weiteren aussuchen können. Weiss jemand wie das funktioniert? :D

racoon0506
25.06.2003, 13:10
Hab leider zur Zeit nur 17-Zoll Bildschirm......
Bau mal ein paar Zeilenumbrüche ein, das ist sonst zu breit........

herrephraim
25.06.2003, 13:19
Hast ja recht!
Ich möchte in einem Formular Maschinen Anzeigen lassen. Diesen
Maschinen sind über eine Zwischentabelle ein oder mehrere Verfahren
zugeordnet. Nun möchte ich über das erste Kombifeld ein Verfahren
abfragen. Das klappt auch mit dem Code:

Private Sub Kombinationsfeld90_AfterUpdate()

Me!Kombinationsfeld92.Requery
Me.RecordSource = "SELECT Verfahren.Verfahrensnummer, Verfahren.Bezeichnung, Maschine.*" _

& " FROM Maschine INNER JOIN (Verfahren INNER JOIN VerfahrenMaschine ON Verfahren.Verfahrensnummer = VerfahrenMaschine.Verfahrensnummer)
ON Maschine.Maschinennummer = VerfahrenMaschine.Maschinennummer

WHERE ((Verfahren.Verfahrensnummer= '" & Me![Kombinationsfeld90] & "'))"
Me![Kombinationsfeld92].SetFocus
Me![Kombinationsfeld92].Dropdown
End Sub

Jetzt möchte ich aber, falls mehrere Verfahren zugeordnet sind, in einem
zweiten Kombifeld aus diesen weiteren aussuchen können.
Weiss jemand wie das funktioniert?

Hoffe jetzt siehts besser aus