Office: (Office 2013) Access Artikeldatenbank

Hallo,
das Ufo kann so nicht stimmen wenn Du Einträge erfassen willst. Hier muss die Tabelle "tblEigenschaftenZuArtikelEintrag" bzw. eine entsprechende Abfrage verwendet werden. Im Ufo haben die Felder "artGruppeBezeichnung" und "artBArtName" nichts zu suchen, sind dort auch bedeutungslos.

 

Ok dann stehe ich komplett an, da die Tabelle tblEigenschaftenZuArtikelEintrag leer ist bzw. bei einem Eintrag von einem Artikel noch leer ist. Stehe komplett auf dem Schlauch

 

Hallo,

sag ich doch die ganze Zeit. Die Tabelle muss erst gefüllt werden, entweder manuell, oder per Anfügeabfrage. Es müssen die Eigenschaften angefügt werden, die in der Tabelle "tblEigenschaftenZuArtikel" dem Artikel zugeordnet wurden.
Wenn Du in meinem Beispiel (das mit den Merkmalen) das Formular "frmErfassung" öffnest, gibt es dort einen Button "Zutreffende Merkmale anfügen", der macht genau dieses automatische Anfügen, damit überhaupt Einträge erfasst werden können.
Eigentlich sollten Dir die Zusammenhänge vollständig klar sein, wenn Du das Beziehungsbild betrachtest. Du musst das unbedingt verstehen, sonst nutzt Dir das nichts.

Mich baue Dir das mal ein, ich komme aber erst heute Abend dazu.

 

Also der 5er ist fast gefallen.

ich habe nun ein Hauptartikel Formular mit einem Unterformular (aus einer Abfrage erzeugt qryEigenschaftenZuArtikelEinträge).

Im Unterformular ist ebenfalls ein Button, welcher bei einem Klick via VBA die ArtikelID und EigenschaftID in die Tabelle EigenschaftenZuArtikelEinträge einfügt. So weit so gut.

Also ziemlich gleich wie bei Dir. Wenn ich nun den Button 2 Mal drücke, legt er mir dieselben Daten noch einmal in die Tabelle EigenschaftenZuArtikelEinträge ab.

 

Hallo,
Du musst in der Tabelle "EigenschaftenZuArtikelEinträge" über die Felder ArtikelID und EigenschaftID einen eindeutigen zusammengesetzten Index legen. Dann wird das verhindert.
Die sich hieraus ergebenden Fehlermeldungen müssen abgefangen werden. Ist in meinem Beispiel alles zu sehen.

 

ich weiss jetzt nicht ob wir das selbe meinen. meinst du mit index die indizes ?

 

Hallo,

indizes ist die Mehrzahl von Index. Es ist also das Gleiche und ja, das meine ich. Auch dieser Index ist in meinem Beispiel zu sehen.

 

Vielen Dank! Dann bin ich jetzt endlich so weit ,dass ich das ganze kapiert habe und nachbilden konnte. Danke nochmals für die Geduld

ev kannst Du mir noch verraten was folgende Code-schnipsel bedeuten:

Brauche ich dies..
Private Sub ApparateArtID_F_AfterUpdate()
DoCmd.RunCommand acCmdSaveRecord
End Sub

Denke die folgenden 2 sind nicht angewendet:
Private Sub btnNeuSort_Click()
Me.Requery
End Sub

Private Sub Eintrag_DblClick(Cancel As Integer)
Select Case Me.MerkmalID_F
Case 40, 41, 62, 63
DoCmd.OpenForm "frmWerkstoff"
End Select
End Sub

Lg Andy

 

Hallo,
kannst Du in Deinem Fall alle löschen.

Mein Gott jetzt hat er's.*grins
Sorry, konnte ich mir nicht verkneifen. Wenn Du das System begriffen hast, wirst Du merken, wie einfach das insgesamt ist. Neuer/alter Artikel mit neuen/anderen Eigenschaften ist nur ein neuer Datensatz in den entsprechenden Tabellen und natürlich in den entsprechenden Zuordnungstabellen. Auch wenn es zu einem Artikel neue Eigenschaften gibt, kann man die einfach per Knopfdruck zur Erfassung der Einträge erweitern. Es werden nur die neuen angefügt.

Ich finde immer, es lohnt sich wenn man da auch als Helfer hartnäckig ist und sich nicht auf scheinbar einfachere Umsetzungen einlässt.

 

Super es funktioniert ! Eigentlich müsste ich Dir eine Flasche Wein zukommen lassen *wink.gif*

 

Hallo,
siehe mein Beitrag in #40

PS: Ich bin Biertrinker, vorzugsweis Bitburger. *grins

 

Ja, ehrlich gesagt bin ich auch froh, dass ich es nun so umgesetzt habe wie Du es empfohlen hast und Du nicht nachgegeben hast. Scheint nun wirklich super zu sein. Ich habe nicht kapiert warum die Beziehungen sich schliessen und warum zuerst Eigenschaften zum Artikel gefügt werden müssen, aber nun ist es Sonnenklar!