Access-o-Mania

Access-Forum (Deutsch/German) => Formular => Thema gestartet von: UFO am Mai 08, 2012, 23:16:35

Titel: Zwei Formulare synchronsieren
Beitrag von: UFO am Mai 08, 2012, 23:16:35
Hallo an alle Access-Profis!
Folgendes "kleines" Problem beschäftigt mich:
Ich wähle in einem Fomular "frmANLAGE" eine bestimmte Anlage (biogasanlage) aus und möchte über eine Schaltfläche mit passendem Befehl ein neues Formular "frmProjektAnlegen" öffnen (soweit kein Problem).
Im frmProjektAnlegen soll nun ein neues Projekt/Auftrag (genau zu dieser Anlage) angelegt werden.

Tabellen AUFTRAG (AUFTRAG_KEY, ANLAGE_KEY etc.), ANLAGE (ANLAGE_KEY etc) da es  zu jeder Anlage mehrere Aufträge gibt.

In der Tabel AUFTRAG wird als Fremdschlüssel  demnach ANLAGE_KEY gespeichert.

Ich schaffe es das Auftragsformular zu öffnen und ein neuer Datensatz lässt sich anfügen, das Textfeld ANLAGE_KEY (nur für den Testzweck) bleibt aber leer.
Habe schon ne Weile rumprobiert und habe selbst schon keine Ahnung mehr, was ich wo schon an vba eingetragen habe.
Wer kann mir die einzelnen Verfahrensschritte aufskizzieren, d.h. gegen eine fertige Lösung ist auch nichts einzuwenden.
Habe schon alles mögliche gelesen und komme mit vergleichbaren Lösungen nicht klar.

DANKE
Titel: Re: Zwei Formulare synchronsieren
Beitrag von: Beaker s.a. am Mai 08, 2012, 23:25:41
Hallo Ufo,
Übergebe ANLAGE_KEY als OpenArgs an das Auftragsformular.
Beachte aber, dass OpenArgs ein String ist. Da musst Du
evtl. zweimal eine Typumwandlung vornehmen.
hth
gruss ekkehard
Titel: Re: Zwei Formulare synchronsieren
Beitrag von: DF6GL am Mai 09, 2012, 08:39:34
Hallo,

schlage zusätzlich noch vor, den Fremdschlüsselwert in der Eigenschaft  "Standardwert" abzulegen:


.
.
.
Docmd.Openform " frmProjektAnlegen, , , , acFormAdd, acDialog, Me!ANLAGE_KEY
.
.
.



Im Form "frmProjektAnlegen":

Sub Form_Load()
If Not isnull(Me.Openargs) Then Me!ANLAGE_KEY.Defaultvalue = Me.Openargs
End Sub
Titel: Re: Zwei Formulare synchronsieren
Beitrag von: UFO am Mai 09, 2012, 15:20:28
Ihr seid super.
Es funktioniert. Habe es genau so wie beschrieben umgesetzt.
Werde jetzt mit den Feinheiten weiter machen und hoffe dass ich klar komme.
Vielen Dank
UFO :)