Unter-Unterformular Datensatzzeiger nach Requery

[Rychy]

Guten Abend,

Ich habe ein Formular (frmProjekte) mit einem Unterformular (frmVertraege_UV01).

In dem Unterformular (frmVertraege_UV01) gibt es dann selbst noch ein Unterformular (frmDienstleistungen].
(frmDienstleistungen] ist also quasi ein Unter/Unterformular.

Nachdem ich in frmDienstleistungen Änderungen vorgenommen habe, möchte ich nach dem Requery wieder den letzten
(eben geaenderten) Datensatz anzeigen lassen.

Das wäre dann zum Beispiel im fmProjekt (die "ProjektID" 15), im ersten Unterformular (frmVertraege_UV01, die "VertragsID" 101)
und im UnterUnterformular (rmDienstleistungen] die "DienstleistungsID" 357.

Muss ich dazu setfocus nutzen ?

Nach dem Requery liegt der Focus im (frmDienstleistungen].

Ich denke eines meiner Probleme ist wie ich mich zwischen den Formularen "bewegen" muss.

Hilfe wäre schon.

Viele Grüsse von Rychy

[DF6GL]

Hallo,

die Frage hast Du doch hier schon gestellt:

http://www.access-o-mania.de/forum/index.php?action=post;topic=17277.0;num_replies=0

und wurde auch zuvor schon  beantwortet.....   

[Rychy]

Moin,

Nein das Thema Unter Unterformular im genannten Zusammenhang wurde noch nicht beantwortet.
Da hakt es bei mir.

Ein Tipp waere schoen.

Gruss von Rychy

[DF6GL]

Hallo,

hier sind  die Beschreibungen:


http://www.donkarl.com/?FAQ4.5
http://www.donkarl.com/?FAQ4.2

[Rychy]

Guten Abend,

sorry komme hier irgendwie immer noch nicht weiter.

Ich habe wie gesagt ein Formular mit zwei ineinanderverschachtelten Unterformularen.

Soweit so gut.

Ich poste mal meinen Code hier.

###

Dim VertragsID2 As Long ' Wird Benötigt um den gleichen Datensatz nach dem Requery anzeigen zu lassen


VertragsID2 = Forms![frmProjekte].Form![IDProjekt]

MsgBox VertragsID2 

'die ID wird auch richtig in der Msgbox angezeigt


Me.Painting = False

Forms![frmProjekte]![frmVertraege_UF_01].Form.Requery


Me.Parent.Parent!IDProjekt.SetFocus

'das funktioniert auch

    MsgBox VertragsID2

'wird immer noch korrekt angezeigt
   

    Me.Recordset.FindFirst "IDProjekt = " & VertragsID2
   

    Me.Painting = True
   
   
   
    End With

###

Das Ganze finde nach dem AfterUpdate Ereignis statt.

Ich mache ein Requery auf das erste Unterformular und möchte anschliessend im Hauptformular
wieder auf die gespeicherte IDProjekt zurückkommen. Die IDProjekt wird in der MSGBOX auch richtig angezeigt.

Den Fokus setze ich korrekt auf IDProjekt (funktioniert auch).

Leider falle ich dennoch auf den ersten Datensatz zurück.

Ein Tipp wäre schoen.

Viele Grüsse von Rychy

[DF6GL]

Hallo,

verstehe die Logik nicht...

Warum machst Du ein Requery?

Warum soll das HF auf den selben DS gesetzt werden, den es gerade anzeigt? (Durch das Requery auf das UFO, wird der Ds im HF nicht verändert, außer es wird weiterer Code irgendwo ausgeführt oder die HF/UF-Konstruktion ist nicht sauber.)


Am Besten lädst Du die DB (repariert/komprimiert und gezippt) hier hoch...