access2003 kombinationsfeld code bei klick

13/01/2010 - 21:59 von Roburn | Report spam
Ich habe folgende Access 2003 Basis
Die tbl_Personen Entitàt enthàlt:
Personen_ID as PK, Autonumber
Vorname as text
Nachname as text
Sex as text

Die tbl_Hobby Entitàt enthàlt:
Hobby_ID as PK, Autonumber
Hbby_Bezeichnung as text

Die ztbl_Hobby_zu_Personen Entitàt enthàlt:
Personen_ID as FK, Number von tbl_Personen
Hobby_ID as FK, Number von tbl_Hobby

PK = Primary Key
FK = Foreign Key
Ungarische Notation
tbl_ Tabelle
frm Formular
hfrm Hauptformular
ufrm Unterformular

Darin ist ein hfrm_Hobbys_zu_Personen integriert ist ein
ufrm_Hobbys_zu_Personen
und ein Kombinationsfeld
Das ufrm_Hobbys_zu_Personen soll eine Liste von Hobbys anzeigen, damit einer
Person mehr als ein Hobby zugeordnet werden kann. Die Hobbys werden
aufgelistet können aber nicht ausgewàhlt werden.
Das Kombinationsfeld soll eine Liste anzeigen von Name, Vorname und Sex.
Dazu ist bei Klick das Makro hinterlegt
Sub Namensuchen_Click()
Me!Personen_ID.SetFocus
Docmd.Findrecord Personensuchen , , True , , True
Me!Namensuchen = Null
Me!Ufrm_Hobbys_zu_Personen.SetFocus
End Sub
das ich nicht zum laufen kriege
kann mir dabei bitte jemand helfen?
Bin für jede Hilfe dankbar.

Gruss Roburn
 

Lesen sie die antworten

#1 Ekkehard Böhme
13/01/2010 - 22:40 | Warnen spam
Hallo Roburn,

Roburn schrieb:
Ich habe folgende Access 2003 Basis
Die tbl_Personen Entitàt enthàlt:
Personen_ID as PK, Autonumber
Vorname as text
Nachname as text
Sex as text

Die tbl_Hobby Entitàt enthàlt:
Hobby_ID as PK, Autonumber
Hbby_Bezeichnung as text

Die ztbl_Hobby_zu_Personen Entitàt enthàlt:
Personen_ID as FK, Number von tbl_Personen
Hobby_ID as FK, Number von tbl_Hobby

PK = Primary Key
FK = Foreign Key
Ungarische Notation
tbl_ Tabelle
frm Formular
hfrm Hauptformular
ufrm Unterformular

Darin ist ein hfrm_Hobbys_zu_Personen integriert ist ein
ufrm_Hobbys_zu_Personen



Das ist nicht ganz klar.
Ein hfrm (Datenherkunft ztbl_Hobby_zu_Personen) mit einem ufrm mit der
gleichen Datenherkunft?

und ein Kombinationsfeld
Das ufrm_Hobbys_zu_Personen soll eine Liste von Hobbys anzeigen, damit einer
Person mehr als ein Hobby zugeordnet werden kann. Die Hobbys werden
aufgelistet können aber nicht ausgewàhlt werden.



Das sollte das Kombifeld sein, kein ufrm.

Das Kombinationsfeld soll eine Liste anzeigen von Name, Vorname und Sex.
Dazu ist bei Klick das Makro hinterlegt
Sub Namensuchen_Click()
Me!Personen_ID.SetFocus
Docmd.Findrecord Personensuchen , , True , , True
Me!Namensuchen = Null
Me!Ufrm_Hobbys_zu_Personen.SetFocus
End Sub
das ich nicht zum laufen kriege
kann mir dabei bitte jemand helfen?
Bin für jede Hilfe dankbar.



Der "normale" Aufbau sollte folgender sein:
hfrm mit Datenherkunft tbl_Personen
ufrm mit Datenherkunft ztbl_Hobby_zu_Personen
auf dem ufrm das Kombi mit Datenherkunft tbl_Hobby
hfrm und ufrm verknüpfst Du über Personen_ID

Da brauchst Du keine einzige Zeile Code, weil Dir Access das Suchen abnimmt
Beim Blàttern im hfrm wird das ufrm automatisch aktualisiert.


Gruss Roburn



hth
ekkehard

Ähnliche fragen