Probleme mit Kombinationsfeld / Abfrageverknüpfung

[DF6GL]

Hallo,

zunächst:  diese ganze Vorgehensweise mit Öffnen der Abfrage  ist  nicht zielführend (wobei ich das Ziel gar nicht kenne..)

Wenn beim Auswählen eines Kombifeld-Wertes die Abfrage jeweils erneut geöffnet werden soll , dann muss eben dafür gesorgt werden:



Private Sub Befehl8_Click()
On Error GoTo Err_Befehl8_Click
DoCmd.Close acQuery, "abfrage_1"   
Dim stDocName As String

    stDocName = "Abfrage_1"
    DoCmd.OpenQuery stDocName, acNormal, acEdit

Exit_Befehl8_Click:
    Exit Sub

Err_Befehl8_Click:
    MsgBox Err.Description
    Resume Exit_Befehl8_Click
   
End Sub

Private Sub Kombinationsfeld0_AfterUpdate()
Befehl8_Click
End Sub

Private Sub Kombinationsfeld2_AfterUpdate()
Befehl8_Click
End Sub

[was_crix]

Hallo nochmal,
wo wird der Code eingefügt? Ich habe ihn bei der Abfrage eingefügt. Das hat natürlich ins leere geführt....     Fehlermeldung.
Ich weiß, langsam wird kindisch. Aber ich hätte mir das Einarbeiten in Access einfacher vorgestellt...

Warum funktioniert die Variante mit dem Zauberstab (Generator ) nicht? Das wäre so schön einfach...

[was_crix]

Manches hat sich geklärt.Z.B. wo der Code hin kommt...

Ich musste allerdings was an der Datenbank ändern.Die Beziehungen waren schlecht gewält.
Ich habe versucht in SQL Deine Vorlage umzubauen, bzw. mit dem Generator zu helfen.

ich weiß auch warum es erst nicht ging... Ich habe zu wenige Felder in der Abfrage ausgewählt. z.B. fehlten die n:m Beziehungen.

Ich lade die DB nochmal hoch weil es wieder nicht klappt mit dem Aktualisieren.

Deinen VB Code habe ich ebenfalls schon eingefügt. Alles ohne großen Erfolg.

Ich bin am verzweifeln... Was habe ich da nur angefangen...



[Anhang gelöscht durch Administrator]

[DF6GL]

Hallo,

"Die Beziehungen waren schlecht gewählt" 

in der Tat. Deshalb habe ich ja eine Änderung an den Beziehungen vorgeschlagen.

Fehler ist/war:  Du musst bei "Sonderbau"  (auch)  mit den ID-Feldern arbeiten ...

SELECT [Bundesland(B)].B_ID, [Sonderbau(S)].S_ID, [Sonderbau(S)].Sonderbauart, [Reg_tec(R)].Reg_tec, [Reg_tec(R)].Art, [Reg_tec(R)].Link, [Gesetze(G)].Gesetze, [Gesetze(G)].Link
FROM [Reg_tec(R)] INNER JOIN ([Sonderbau(S)] INNER JOIN (([Bundesland(B)] INNER JOIN [Gesetze(G)] ON [Bundesland(B)].B_ID = [Gesetze(G)].B_ID) INNER JOIN [n:m_G_S_R] ON [Gesetze(G)].G_ID = [n:m_G_S_R].G_ID) ON [Sonderbau(S)].S_ID = [n:m_G_S_R].S_ID) ON [Reg_tec(R)].R_ID = [n:m_G_S_R].R_ID
WHERE ((([Bundesland(B)].B_ID)=[Forms]![Formular_Abfrage1]![Kombinationsfeld11]) AND (([Sonderbau(S)].S_ID)=[Forms]![Formular_Abfrage1]![Kombinationsfeld13]));



Und bitte:  Eliminiere ÜBERALL in den (Objekt-)Namen die Sonderzeichen und benenne die Tabellen und und Tabellen/Formular-Felder entspr. ihrer inhaltlichen Bedeutung...

[MzKlMu]

Hallo,
das Datenmodell hinkt noch an mehr Stellen. Wieso gibt es bei den Gesetzen Doppelungen, z.B. Ind, IndRL, InduRL; LBO usw. völlig unlogische Einträge. Die Doppelungen deuten für mich daraufhin, dass hier Gesetze den Bundesländern zugeordnet werden. Das wiederum bedeutet, dass eine Tabelle fehlt zur Zuordnung der Gesetze zu den Bundesländern. n:m zwischen BL und Gesetz.
Weiterhin sollten für die Beziehungen keine Textfelder verwendet werden, sondern die Paarung Autowert-LongInteger. Jede Tabelle sollte einen Autowert haben als Primärschlüssel der dann auch für die Beziehungen verwendet wird.

Was die Abfrage betrifft, so ist diese in der Form gar nicht notwendig. Man öffnet im Datenbankbetrieb keine Abfragen, sondern Formulare. Aber das hat Franz auch schon angemerkt.

Und verzichte auf Tabellenamen mit Klammern () und so etwas "n:m_G_S_R", das schreibt man etwas verürzt eher so: "Ges_Sonderb_Reg".

Bevor das Datenmodell nich klar ist, solltest Du Dich nur im die Tabellen kümmern, Formulare etc. werden noch nicht benötigt.

Erkläre also bitte erst mal die Aufgaben der DB und die Zusammenhänge zwischen Gesetz, Bundesland, Sonderbauarten und Techn Regeln.