Hallo mal wieder...
im Anhang habe ich ein bild von meinem Formular... der schwarze Rand ist ein UF sfm_ObjTyp...
in diesem UF ist ein weiteres UF mit subfrmObjAust im Fussbereich eingefügt rot markiert.
Im HF ist noch ein weiteres UF subfrmEinrichtung grün markiert.
Nun wo oder wie muss ich denn nun das formular requery damit der dazugehörige DS aus subfrmObjAust im subfrmEinrichtung erhalte?
Habe es mit dem Ereignis beim Anzeigen beim sfm_ObjTyp und im subfrmObjAust probiert aber leider keinen Erfolg bislang gehabt.
Kann mir hier bitte jemand helfen ich hab schon geschaut und probier aber leider weis ich nicht weiter :(
Private Sub Form_Current()
Dim ParentDocName As String
On Error Resume Next
ParentDocName = Me.Parent.Name
If Err <> 0 Then
GoTo Form_Current_Exit
Else
On Error GoTo Form_Current_Err
Me.Parent![subfrmEinrichtung].Requery
End If
Form_Current_Exit:
Exit Sub
Form_Current_Err:
MsgBox Error$
Resume Form_Current_Exit
End Sub
Lg und vielen Dank wiedermal :)
Albert
Hi,
du kannst die Verknüpfung des "subfrmEinrichtung" so einstellen, dass automatisch synchronisiert wird. Welche Datenfelder werden dazu benötigt?
Das Aktualisieren sollte folgendermaßen aussehen:
Me.Parent![subfrmEinrichtung].Form.Requery
Hi Maggie!
Danke Dir für Deine mail! Also es geht um ObjArtAust_id PK im subfrmObjAust
Und im subfrmEinrichtung ist es ObjArtAust_id_f als FK
muss ich da noch etwas machen??
LG
Also ich habe es nun im Beim Anzeigen von subfrmObjAust Deinen Code eingegeben da bekomme ich einen Laufzeitfehler 2465 kann das in Ihren Ausdruck angesprochene Feld subfrmEinrichtung nicht finden..
muss ich das wo anders einfügen??
Also bei einem anderen formular??
Habe es auch im sfm_ObjTyp probiert da bekomme ich auch einen Laufzeitfehler 2455 Sie haben einen Ausdruck eingegeben der einen ungültigen Verweis auf die Form/Report Eigenschaft enthält.
hmm?
Also entweder per Code:
Private Sub Form_Current()
On Error GoTo Form_Current_Err
Dim ParentDocName As String
ParentDocName = Me.Parent.Name
Me.Parent![subfrmEinrichtung].Form.Requery
Form_Current_Exit:
Exit Sub
Form_Current_Err:
If Err.Number = 2452 Then
Else
MsgBox Err.Description, , Err.Number
Resume Form_Current_Exit
End If
End Sub
Oder über die Verknüpfung mit einem Hilfsfeld im Hauptformular mit dem Steuerelementinhalt:
=[sfm_ObjTyp].[Formular]![subfrmObjAust].[Formular]![ObjArtAust_id]
PS:
Es sind ja zwei Ufos, also Me.Parent.Parent.subfrmEinrichtung.Form.Requery
Hallo Maggie,
ma tut mir leid aber es geht nicht..
In welchen Formular muss ich den diesen Code einfügen?
Beim Anzeigen des HF?
Zitat
Me.Parent.Parent.subfrmEinrichtung.Form.Requery
Und warum diesen Code noch ..
Ich schrieb ja "entweder - oder", also entweder aktualisierst du das UF "subfrmEinrichtung" im Ereignis "Beim Anzeigen" des UF "subfrmObjAust" (wo sonst?!) ODER du synchronisierst das UF über ein Hilfsfeld im HF über die Verknüpfungseigenschaften.
Beides funktioniert, der Verknüpfung würde ich den Vorzug geben.
Hallo Maggie,
vielen dank nochmal für die Info..
Also ich muss da noch probieren denn irgendwo ist da noch ein Problem es geht leider noch nicht ...
ich werd noch ganz gar mit diesem Formular grr..
Aber vielen Dank!!
LG
Kannst du konkret beschreiben oder zeigen was du gemacht hast und was genau nicht funktioniert? Gibt es Fehlermeldungen?
Also ich habe folgendes Probiert..
Beim Anzeigen von subfrmObjAust
On Error GoTo Form_Current_Err
Dim ParentDocName As String
ParentDocName = Me.Parent.Name
Me.Parent![subfrmEinrichtung].Form.Requery
Form_Current_Exit:
Exit Sub
Form_Current_Err:
If Err.Number = 2452 Then
Else
MsgBox Err.Description, , Err.Number
Resume Form_Current_Exit
End If
dann bekomme ich eine Fehlermeldung...2465 als Msgbox Microsoft kann das in Ihren Ausdruck angesprochene Feld 'subfrmEinrichtung nicht finden.
Dann habe ich den gleichen Code beim Anzeigen des subfrmEinrichtung eingefügt dann kommt keine Fehlermeldung aber sobald ich im endlosformular das es ja auch ist einen DS darunter anklicke ist der DS weg.. bei wieder öffnen ist der aber immer noch nicht sichtbar sondern fängt wieder bei einen neuen DS an.
Das mit dem Hilfsfeld verstehe ich leider nicht.. ein textfeld einfügen im HF oder wie?
Ich weis bin lästig tut mir leid!!!
Lg
Dass hier ein doppeltes "Parent" gebraucht wird, wurde bereits festgestellt.
ZitatDann habe ich den gleichen Code beim Anzeigen des subfrmEinrichtung eingefügt
Da gehört er aber nicht hin. ::)
Nochmal zum Hilfsfeld:
Füge ein unsichtbares Textfeld ins Hauptformular ein und gib ihm den bereits geposteten Steuerelementinhalt.
Dann gehe in die Eigenschaften des Unterformulars "subfrmEinrichtung", Register "Daten" und trage dort den Namen des Textfeldes unter "Verknüpfen nach" ein und den Namen des Referenzfeldes im "subfrmEinrichtung" in die Zeile darunter.
Die Ereignisprozdur kannst du dann wieder entfernen.
Hallo Maggie,
Dass hier ein doppeltes "Parent" gebraucht wird, wurde bereits festgestellt.
Ja das stimmt schon das Du das geschrieben hast aber brauche ich den noch oder nicht? Bin ganz durcheinander :o
Und wenn ja dann wo gehört der hin??
Also jetzt habe ich es so gemacht .. im HF txtTest mit Steuerelementinhalt =[sfm_ObjTyp].[Formular]![subfrmObjAust].[Formular]![ObjArtAust_id]
Im Eigenschaftsfenster des subfrmEinrichtung
Verknüpfen von txtTest
Verknüpfen nach ObjArtAust_id_f
Ansonsten keinen weiteren Code... jetzt kann ich ohne Fehlermeldung daten einfügen. Gehe ich dann wieder zurück auf den DS en ich vorher ausgewählt habe im subfrmObjAust dann werden diese Daten nicht mehr angezeigt im subfrmEinrichtung.
:'(
Ist das UF evtl. zur Dateneingabe eingestellt? Schau dir die Eigenschaften an.
ZitatGehe ich dann wieder zurück auf den DS en ich vorher ausgewählt habe im subfrmObjAust dann werden diese Daten nicht mehr angezeigt im subfrmEinrichtung.
Klar, wenn du den Datensatz in "subfrmObjAust" wechselst, ändert sich auch die Einrichtung - oder was meintest du?
Also im UF subfrmEinrichtung "Daten eingeben" das ist das Feld das Du meinst oder?
Dort steht nein
Ich meine wenn ich im subfromObjAust den ersten DS auswähle und im subfrmEinrichtung DS eingebe.. das geht..
wechsle ich nun den DS in subfrmObjAust zu DS 2 ändert sich as subfrmEinrichtung.. das soll es auch ist schon klar...
Geht ich aber nun wieder zurück zum 1 DS in Ausstattung bleiben die DS in Einrichtung leer.
Also bei mir funktioniert das...
Zeig doch mal den SQL-Code der Abfrage zu "subfrmEinrichtung".
Na ja der ist ja auch sehr schlimm noch denn das mit den comboboxen funktioniert auch noch nicht bei mir ;)
aber hier mal der SQL dazu :)
SELECT tblMaterial.Mat_Kat_id_f, tblMaterial.Mat_Name, tblMaterial.ZusatzInfo_id_f, tblEinrichtung.ObjArtAust_id_f, tblEinrichtung.ME_id_f, tblEinrichtung.Ein_id, tblEinrichtung.Ein_Name, tblEinrichtung.Ein_Info, tblEinrichtung.Anzahl, tblEinrichtung.Mat_id_f, tblMaterial.Mat_id, tblEinrichtung.Ein_GeSt_id_f
FROM tblZusatzInfo RIGHT JOIN ((tblMaterialKategorie INNER JOIN tblMaterial ON tblMaterialKategorie.MatKat_id = tblMaterial.Mat_Kat_id_f) INNER JOIN tblEinrichtung ON tblMaterial.Mat_id = tblEinrichtung.Mat_id_f) ON tblZusatzInfo.ZusatzInfo_id = tblMaterial.ZusatzInfo_id_f
WHERE (((tblMaterial.Mat_Kat_id_f)=[Forms]![frmObjekt]![sfm_ObjTyp]![subfrmObjAust]![cboMatKategorie]));
Du hast ja leider den anderen Thread (Abhängige Kombifelder im Endlosformular (http://www.access-o-mania.de/forum/index.php?topic=20657.msg116447#msg116447)) im Stich gelassen, dort hatte ich bereits gesagt, dass es das Kombifeld "cboMatKategorie" in "subfrmObjAust" nicht gibt und auch nicht geben sollte. Es gibt keine Beziehung zwischen den Ausstattungsobjekten und dem Material bzw. den Materialkategorien. Wenn es die geben sollte, müsstest du erst das Datenmodell erweitern.
Hallo na den anderen thread hab ich aus dem grund im stich gelassen weil ich es einfach nicht hinbekomme...
es funktioniert einfach nicht hab schon Tage lang herumprobiert...
Ich hab ja kein Kobofeld in subfrmAustattung ?? da ist nur ein cbo_ObjAust
das cboMatKategorie ist im subfrmEinrichtung ..
Ich verstehe gar nichts mehr pfff
Mach erstmal Pause. ;-)
Und dann mach dir klar, was du überhaupt willst.
Schau dir das Beziehungsfenster an, die Abhängigkeiten die du herstellen willst gibt es im Realen nicht.
Versuche es zunächst einmal verbal zu beschreiben, wie du dir das vorstellst, dann sehen wir weiter.
Hallo Maggie,
ich hab mir nun die Beziehungen nochmals angesehen.. ja das würde schon so passen.
Aber ich glaube ich habe einen Fehler mti dem Kriterium und den Abfragen aber da kenn ich mich nicht mehr aus.
Eigentlich gehört das wieder in den anderen thread aber ich wollte nur mal bescheid sagen :)
LG