Office: (Office 2010) Haupt-/Unterformular gegenseitig verknüpfen

Anhänge? Das geht sicherlich irgendwie.
Da kenn ich mich aber nicht aus - ich arbeite mit Access 2003, dort gibt es keine Anlagefelder. Ich speichere den Pfad als Text und öffne dann die Originaldatei (per ShellExecute).
maike

 

Hey Nouba,

erstmal Danke für deinen Input. Aber ich habe leider nicht ganz verstanden wie du das meinst und dementsprechend auch nicht wofür das gut sein könnte:/
Güße Rapid

 

Ja mit dem Anhang muss ich mal schauen. Werde dann wohl differenzieren mit bei Klick und bei Doppelklick und bei Doppelklick soll der dann nicht mehr die andere filtern sondern den Anhang gemäß dem Datenpfad laden oder so...muss mal schauen ob und wie ich das alles noch hin gebogen bekomme.
Viele Grüße Max

 

Hi Rapid,

mein Beitrag sollte nur eine Anregung zu einem besseren Datenmodell sein.

Bis auf dir ProjektInfos sind alle Tabellen gleich aufgebaut. Hätte man eine Tabelle, die Datensätze mit Textbeschreibungen wie "Ad-Hoc", "Auftragsabschlussbericht", "tblClaimListe", ..., enthält (also Deine bisherigen Tabellennamen), so könnte exakt eine Tabelle die bisherigen 6 Tabellen ersetzen - natürlich mit einem Fremdschlüsselfeld auf die zuvor erwähnte Tabelle.

Weiterhin könnte es sinnvoll sein, alle Stichworte (ggf. auch eingeschränkt auf über die vorherige Tabelle) separat zu führen. Man wird einheitliche Schreibweisen und eher dieselben Ausdrücke für die selbe Sache verwenden, als das bei Freitexten der Fall ist. Und weil es zu einem Infoeintrag mehrere Stichworte geben kann und ein Stichworteintrag mehreren Infoeinträgen zugeordnet werden kann, wird man eine m:n-Beziehung über eine 3. Tabelle aufbauen.

 

Hey Nouba,

ich glaube du hast dir nur die eine Datenbank von mir angeguckt mit den vielen Tabellen?!
Wir arbeiten gerade eher an der anderen wo bereits das was du angemerkt hast so halb umgesetzt ist (bis auf das mit der dritten Tabelle was eine gut Idee ist aber gerade so etwas die Zeit fehlt weil das Teil eigentlich Freitag fertig sein müsste)*biggrin.gif*

Habe auch noch zwei Code Fragen: einmal geht es um die Erweiterung des Suchcodes der auf das Haupt zugreift habe das jetzt erstmal versuchshalber so mit der Auftragsnummer erweitert(weil ich mir dachte mit nem string funktioniert es schonmal garnicht):
Code:

aber eine Suche nach der Auftragsnummer ist nicht möglich. Kann es sein das ich im Len / Mid teil weiter unten im Code was ändern muss. Da ich den teil nicht ganz verstanden habe (warum das and weggeschnitten werden muss z.B.) habe ich da auch nicht effektiv was versuchen / experimentieren können.

Das andere bezieht sich jetzt auf die Kontrollkästchen habe versucht mal das erste Kontrollkästchen zu implementieren und den Code eingesetzt:
Code:

leider filtert der mir aber nicht die Ad-Hoc Mitteilungen raus wie es eigentlich der Fall sein sollte wenn das Kontrollkästchen nicht angeharkt ist (aus der Liste) sonder lehrt sie und füllt sie leider nicht mehr:/

Jemand ne Idee?*Smilie

Viele Grüße Max

 

Hallo Max,

Feldnamen die Sonder- oder Leerzeichen enthalten, musst du in eckige Klammern setzen.

 

Danke für die Anmerkung aber das hat leider auch keinen Erfolg gebracht:/

Eigentlich müsste das ja auch wieder über nen Filter des Listenfeldes funktionieren, aber an der Filterung eines Listenfeldes und am besten gleichzeitig eine Filterung nach verschiedenen Feldern bin ich ja schon vorher gescheitert:/

Grüße Max

 

Keiner ne Idee bezüglich des Codes für die Kontrollkästchen?:/

Viele Grüße Rapid

 

Zwischen Verfasser und Stichwort1 fehlt wohl ein Komma, das sind zwei Felder, vermute ich mal.
Code:

maike

 

Mhh das funktioniert leider auch nicht.

Aber trotzdem Danke Maike*Smilie

 

Poste mal den String aus dem Direktfenster (Debug.Print st 'Ausgabe zum Testen). Das Direktfenster öffnest du mit Tastenkombination Strg +g.
Den dort gezeigten String (Select ...) kannst du zum Testen in den Abfrageentwurf (SQL-Ansicht) kopieren, dann Umschalten auf Entwurfsansicht.
maike

 

Hey habe jetzt eine Filterung mithilfe von einem Textfeld und diesem Code hinbekommen:
Code:

Habe es dann im Folgenden jetzt auch hinbekommen mithilfe diesem Codes und einer kleinen Modifikation mithilfe des Kontrollkästchens zu filtern.
Code:

Jetzt tauchen unterschiedliche Probleme / Fragen auf.

-Willst du trotzdem noch das ich für dich die Geschichte aus dem Direktbereich rauskopiere Maike (Die Filterung funktioniert auf die Weise erstmal ohne Probleme)?

-Dann war ja die Idee (falls ihr euch noch erinnert) über die Kontrollkästchen grob einzugrenzen und über ein Kombinations bzw. jetzt Textfeld im Detail zu suchen. Leider überschreibt sozusagen die eine Suche die andere. Sprich wenn ich zuerst über das Kontrollkästchen eingrenzen Möchte, dass keine Ad-Hoc Mitteilungen im Listenfeld sein sollen und dann über dann über das Textfeld suche werden trotzdem alle treffer (auch die Ad-Hoc Mitteilungen) angezeigt. Da jemand ne Idee?

-Weiterhin fällt es mir immer noch schwer die Suche im Textfeld für mehrere Felder im Listenfeld zu implementieren bzw. die richtige Syntax zu finden sprich für Stichwort1, Stichwort2 und Stichwort3 zu suchen habe das halt mit and bzw. or versucht, kam leider nichts gescheites raus:/

Viele Grüße Rapid

 

Dafür kannst du dir, wie in diesem Beispiel gezeigt, den Filter in einer eigenen Prozedur zusammensetzen (mit AND bzw. OR) und im AfterUpdate der Suchfelder dann jeweils nur diese Prozedur aufrufen:
http://www.ms-office-forum.de/forum/...77&postcount=4
maike

 

Hey erst einmal Danke für den Link.

Habe das jetzt mal versucht für das ungebundene Hauptformular umzusetzen. Habe hier auch erstmal das Kombinationsfeld durch ein Textfeld ersetzt.
Code:

Leider funktioniert es nicht. Nach dem Aktualisieren des Textfeldes erscheint eine Inputbox wo ich eine Projketnummer eingeben soll. Wenn ich die wegklicke wird debuggt und die Zeile mit"...FilterOn = True" wird gelb markiert.

Jemand ne Idee?

Viele Grüße Rapid

 

Code:

Entweder AND oder OR, XOR kennt (Jet-)SQL imho nicht.

Edit: Zeig mal den debug.print aus dem Direktfenster, ob und welcher Wert da für Me.Text26 enthalten ist.
maike