Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Form.-Ref. auf UFOs/UFO-Container vereinfacht {Nachgefragt}
zurück: Verzeichnisauswahl - Dialog Erweiterung weiter: Probleme bei Auslese Query mit Recordset Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Diskussion Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
Gast



Verfasst am:
12. Jul 2013, 22:43
Rufname:

Form.-Ref. auf UFOs/UFO-Container vereinfacht {Nachgefragt} - Form.-Ref. auf UFOs/UFO-Container vereinfacht {Nachgefragt}

Nach oben
       Version: (keine Angabe möglich)

Nachfragen zum Thema Formularreferenzen auf UFOs/UFO-Container vereinfacht (Willi Wipp)

funktioniert das bei irgend jemanden ?

Ich bekomme da nur Fehlermeldungen !
Bitsqueezer
Office-VBA-Programmierer


Verfasst am:
12. Jul 2013, 23:09
Rufname:


AW: Formularreferenzen auf UFOs/UFO-Container vereinfacht - AW: Formularreferenzen auf UFOs/UFO-Container vereinfacht

Nach oben
       Version: (keine Angabe möglich)

Hallo,

ja, bei mir...Wink

Das Ding ist in einer noch immer verwendeten Datenbank nach wie vor im täglichen Einsatz.
Vielleicht solltest Du dazu ein bißchen mehr erzählen als nur "ich bekomme nur Fehlermeldungen". Damit kann niemand etwas anfangen.
Am besten meldest Du Dich an, trittst der Upload-Gruppe bei und lädtst eine Beispiel-Datenbank hoch, dann kann man dazu am ehesten eine Aussage treffen.

Gruß

Christian
Gast



Verfasst am:
13. Jul 2013, 16:49
Rufname:

AW: Form.-Ref. auf UFOs/UFO-Container vereinfacht {Nachgefra - AW: Form.-Ref. auf UFOs/UFO-Container vereinfacht {Nachgefra

Nach oben
       Version: (keine Angabe möglich)

Das ging aber schnell ....

Ich habe ein HFO mit 2 UFO und 1 UFO mit nochmals einem UFO drinnen.
Macht in Summe 5 Formulare und in jedem Form erstelle ich beim Laden die Objekte .
Code:
Code:
Private oFR As clsCCFormRefs

Private Sub Form_Load()
    Set oFR = New clsCCFormRefs
    oFR.GetForms Me
End Sub
Beim Aufrufen des HFO kommt mir Fehlermeldung
Zitat:
Sie haben einen Ausdruck eingegeben, der einen unzulässigen Verweis auf die Eigenschaft Form/Report enthält.
Dies Fehlermeldung kommt 3x.
Ausstieg erfolgt in der Sub procGetAllSubforms:
Code:
' -------- Collections mit den Unterformularen/Containern füllen
Private Sub procGetAllSubforms()
    Dim ctl As Access.Control
    Dim i As Long
   
    i = 0
    Set prv_colSubformControls = New Collection
    Set prv_colSubforms = New Collection
    For Each ctl In prv_frmParent
        If TypeOf ctl Is Subform Then
            prv_colSubformControls.Add ctl, ctl.Name
            If ctl.SourceObject <> "" Then
                prv_colSubforms.Add ctl.Form, ctl.Name '<--- genau hier im Zusammenhang mit dem ctl.form
              Else
                prv_colSubforms.Add Nothing, ctl.Name
            End If
            i = i + 1
        End If
    Next ctl
    prv_lngCount = i
End Sub
Bitsqueezer
Office-VBA-Programmierer


Verfasst am:
14. Jul 2013, 15:14
Rufname:

AW: Form.-Ref. auf UFOs/UFO-Container vereinfacht {Nachgefra - AW: Form.-Ref. auf UFOs/UFO-Container vereinfacht {Nachgefra

Nach oben
       Version: (keine Angabe möglich)

Hallo,

ist ja schon drei Jahre her, daß ich diese Module gebastelt habe, aber ich denke, das Problem hier ist, daß Du das Objekt in JEDES Unterformular eingefügt hast.

Das Modul kann zwar auch die Formularreferenz auf ein Unterformular verwenden und findet von da aus das Hauptformular, aber es gibt ein Problem durch die Art, wie Access die Formulare lädt:
Zuerst werden immer die Unterformulare geladen und dann das zugehörige Hauptformular. Da sie Referenz-Klasse aber ALLE UFOs und HFOs des gesamten Baums scannt, müssen diese logischerweise alle schon geladen worden sein, um sie zu finden. Wenn ein UFO also lädt und dann darin dieses Objekt instantiiert wird, versucht es bereits, ein Hauptformular zu finden, das noch nicht existiert, was natürlich nicht funktioniert.

Die Abhilfe ist also ganz einfach: Entferne den Code aus allen Unterformularen, nur im Hauptformular beläßt Du den Code. Dann kannst Du über das Hauptformular auf alle UFOs in jeder Verschachtelungstiefe direkt zugreifen. Zu dem Zweck empfiehlt es sich, die Objektvariable "oFR" im Hauptformular als "Public" zu deklarieren, dann kannst Du von jedem Modul aus darauf zugreifen.

Gruß

Christian
JensFliese66
Gast


Verfasst am:
19. Feb 2014, 14:26
Rufname:

AW: Formularreferenzen auf UFOs/UFO-Container vereinfacht - AW: Formularreferenzen auf UFOs/UFO-Container vereinfacht

Nach oben
       Version: (keine Angabe möglich)

Hallo
ist es möglich eine Beispiel-DB zu dieser Funktion hoch zu laden.
Es würde mich sehr die Arbeitsweise dieser Klassen interessieren und wie sie in einem Formular eingebaut werden sollen Smile

Jens
Bitsqueezer
Office-VBA-Programmierer


Verfasst am:
19. Feb 2014, 14:37
Rufname:

AW: Formularreferenzen auf UFOs/UFO-Container vereinfacht - AW: Formularreferenzen auf UFOs/UFO-Container vereinfacht

Nach oben
       Version: (keine Angabe möglich)

Hallo,

leider habe ich dazu keine Beispieldatenbank, da diese Klassen in einer produktiven Datenbank entwickelt wurden.

Aber wie oben beschrieben, kannst Du das ganz schnell selbst machen. Einfach zwei neue Klassenmodule anlegen, wie oben beschrieben benennen und den kompletten Codetext in das jeweilige Modul kopieren.

Zur Anwendung nimmst Du dann ein Formularkonstrukt mit einem oder mehreren Unterformularen und verwendest den oben gezeigten Code in einem der Formulare, um an eines Deiner Formulare heranzukommen. Ist also alles nicht mehr als Copy/Paste und die Anpassung der Formularnamen in Deiner eigenen Datenbank.

Gruß

Christian
JensFliese66
Gast


Verfasst am:
19. Feb 2014, 18:07
Rufname:


AW: Formularreferenzen auf UFOs/UFO-Container vereinfacht - AW: Formularreferenzen auf UFOs/UFO-Container vereinfacht

Nach oben
       Version: (keine Angabe möglich)

Danke erstmal für die Hilfe, dann werde ich es erstmal in meine DB einbauen und dann die Felder anpassen.

Jens
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Access Tabellen & Abfragen: Bei Eingabe in Tabelle, Werte automatisch ref.tabelle 1 Mimax 484 01. Okt 2010, 11:07
Marmeladenglas Bei Eingabe in Tabelle, Werte automatisch ref.tabelle
Keine neuen Beiträge Access Tabellen & Abfragen: Im Form eingegebeneDaten werden nicht an Table zurückgegeben 15 KimSim 481 02. Apr 2009, 15:21
Marmeladenglas Im Form eingegebeneDaten werden nicht an Table zurückgegeben
Keine neuen Beiträge Access Tabellen & Abfragen: Form basierten Filter in Tabelle ausgeben 1 der Jöns 600 02. Sep 2008, 22:21
maike kaluscha Form basierten Filter in Tabelle ausgeben
Keine neuen Beiträge Access Tabellen & Abfragen: Berechnetes Feld aus einem Form. in eine Tabelle speichern?? 1 Realhasko 402 21. Jul 2008, 16:40
rita2008 Berechnetes Feld aus einem Form. in eine Tabelle speichern??
Keine neuen Beiträge Access Tabellen & Abfragen: Zeiten in Form 3:30 addieren 5 <X> 1084 10. Jul 2008, 20:10
<X> Zeiten in Form 3:30 addieren
Keine neuen Beiträge Access Tabellen & Abfragen: Unmöglich oder nur Kniffelig? - Adressen mit Ref. Integr. 2 Smartiie 481 02. Sep 2007, 17:30
Smartiie Unmöglich oder nur Kniffelig? - Adressen mit Ref. Integr.
Keine neuen Beiträge Access Tabellen & Abfragen: ref. Integrität zw. versch. Anwendungen 1 Thorsten7 495 19. Feb 2007, 13:20
Nouba ref. Integrität zw. versch. Anwendungen
Keine neuen Beiträge Access Formulare: Zwischenspeichern in Form ohne zu 1. Datensatz zu springen 2 Gast 802 14. Aug 2006, 14:01
Gast Zwischenspeichern in Form ohne zu 1. Datensatz zu springen
Keine neuen Beiträge Access Formulare: 2 Ufo's in einem Hauptformular 1 thw 489 24. Jul 2006, 19:58
Gast 2 Ufo's in einem Hauptformular
Keine neuen Beiträge Access Formulare: Daten in UFOs werden nicht angezeigt. 8 KingRalph 681 28. Jun 2006, 16:07
KingRalph Daten in UFOs werden nicht angezeigt.
Dieses Thema ist gesperrt, du kannst keine Beiträge editieren oder beantworten. Access Tabellen & Abfragen: Zähler Abfrage vereinfacht 1 Gast_user 1007 17. Feb 2006, 12:28
Willi Wipp Zähler Abfrage vereinfacht
Keine neuen Beiträge Access Formulare: Markierten Datensatz aus U-Form in anderes Form übernehmen. 1 Menzek 1186 20. Jan 2006, 09:28
s_drink Markierten Datensatz aus U-Form in anderes Form übernehmen.
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Microsoft Word Serienbriefe