Office: (Office 2010) Doppelte Datensätze beim Erfassen verhindern

Hallo,

ich möchte gerne, dass in meiner DvD-Datenbank die Erfassung
gleicher Titel verhindert wird. Etwas so : Im Feld Titel darf kein identischer
Text erscheinen. Sonst Msg-Box : Datensatz existiert schon!
Danach soll nach einen Buttonklick zurück zur Datenerfassung gegangen
werden, um einen anderen DS zu erfassen.

Ich habe aus einem anderen Forum diesen String erhalten:

Option Compare Database
Option Explicit
Private Sub Form_Error(DataErr As Integer, Response As Integer)
If DataErr = 3022 Then
MsgBox "Den Titel gibt es schon"
Response = acDataErrContinue
End If
End Sub

Leider klappt das Teil nicht, weil ich dann diese Windows-Nachricht bekomme:
"Sie können nicht zu dem angegeben Datensatz springen."

Diese Nachricht müsste man irgendwie abstellen können, damit dann meine Msg-Box erscheinen kann.

Hat jemand von Euch eine Idee, wie ich das einfach lösen kann?

Danke

:)

 

Was spricht gegen einen entsprechenden Index auf Tabellenebene der doppelte Einträge verhindert?

 

Hallo,

Einfach nur das ich keine Msg-Box bekomme, auf die ich aber Wert lege.
Übrigens, wenn ich das so lösen würde bekäme ich auch den Windows
Hinweis: "Sie können nicht zu dem angegeben Datensatz springen."

Es muss doch einen Grund geben, warum der Hinweis erscheint und
wie ich ihn beseitigen kann, damit ich das Problem mit dem String
lösen kann.

 

*confused.gif*
Teste bitte folgendes:
Setze auf das Feld das geprüft werden soll in der Tabelle einen Index für eindeutige Werte
Erstelle im Formular den folgenden Code: Code:

Versuche einen doppelten Titel einzugeben

 

Hi Benny,

ich weiß nicht ich muss etwas total falsch machen.
Es klappt nicht. Ich bekomme erst die Windowsmeldung
und beim Abbruch kommt dann erst Deine Msg-Box

Den Indiz habe ich in der Tabelle unter Titel auf Ja(ohne Duplikate) gesetzt.
Den String einfach im Formular unter Form und unter Error.

Ich hoffe das ist richtig so ?

 

Mal ein ganz anderer Ansatz (jetzt nur mal gedanklich):

Gib den Titel in ein Kombifeld ein, dessen Herkunft bereits alle Titel alphabetisch sortiert drin hat (Eigenschaften: automatisch ergänzen etc.). Dann siehst Du gleich, was bereits vorhanden ist (auch wegen Schreibfehlern...).
Bei After_Update dann die Folge-Codes (Neuanlage, Abbruch etc.).

 

Ja gut, wäre eine Möglichkeit.

Aber ich habe weit über 1500 Titel einzugeben. Da wird sich die
Erfassung über Wochen hinziehen. Das würde unübersichtlich werden.

Nein, es sollte schon so sein, das bei der Erfassung der doppelte DS
erkannt wird.
Ironischer Weise ist es so, das dass Windowsfenster den Zweck voll erfüllen
würde, wenn der Text stimmen würde und ein Button da wäre, der zur
Neuerfassung zurück stellt.

 

Das "Windowsfenster" wird wohl eher eine Access-Meldung sein.
Prgrammsteuerung über Fehler wie oben halte ich für keinen guten Stil. Den Zustand, ob ein bestimmter Titel schon in der Tabelle steht, kann man prüfen, und das idealerweise bevor der neue Datensatz mit dem Duplikat in die Speicherung geht. Im entsprechenden Fall kann man dann die Datensatzspeicherung abbrechen bzw wie nachfolgend gezeigt die Eingabe im Control zurücknehmen:
Code:

 

Ja genau es ist eine Windowsmeldung.

Es ist so, da ich das Titelfeld in der Tabelle auf Indiz "Ja(ohne Duplikate)"
gesetzt habe. gibt Access als erstes bei doppelter Erfassung die Meldung:
"Sie können nicht zu dem angegeben Datensatz springen." aus.
Und block komplett ab bis ich die Eintag wieder lösche.
Das ist aber Mist, weil ich ja nicht diese Meldung haben möchte, sondern
die von meiner Msg-Box. Nur wie mache ich Access das klar?

 

So richtig scheinst Du Eberhards Tipp nicht gelesen zu haben...

Ergänzend möchte ich Dir FAQ 4.25 Doppelte Eingaben vermeiden empfehlen.

 

Doch habe ich.
Ich habe es auch probiert.

Aber ich habe auch hier immer wieder die gleiche Meldung.

Die Windowsmeldung : "Sie können nicht zu dem angegeben Datensatz springen."


Es ist zum verzweifeln.......wieso nur ?

Den Hinweis FAQ 4.25 kenne ich. Auch das habe ich probiert.
Natürlich bekam ich die Windowsmeldung....

 

Spätestens jetzt ist der Zeitpunkt gekommen, Deine (abgespeckte, komprimierte und auf A03 getrimmte) DB hochzuladen, um Dir weiter helfen zu können.

 

Bei meinem Vorschlag wird der Inhalt des Textfeldes (Controls) geprüft. Da wird kein Datensatz verlassen oder zu einem anderen Datensatz gesprungen. Das wären dann Maßnahmen, die Du extra veranlasst.

 

Hallo Eberhard,

Könnte aber sein, dass das Feld ohne Absicht
das letzte in der Reihenfolge ist und der Zyklus
nicht auf aktueller Datensatz eingestellt ist; -
und schon hast Du einen DS-Wechsel.
Dann noch die Frage, ob Dein Code nicht besser
im Before_Update aufgehoben ist. Bei After_
Update verliert das Feld den Focus, was er ja nicht
möchte. Und ein eingefügtes .SetFocus funzt
After_Update nur über irgendein anderes Control.
Before_Update füge ich ein Cancel = True ein
und bleibe im Feld.
gruss ekkehard

 

Das Feld wo keine doppelten Datensätze vorkommen dürfen
ist das erste in der Reihenfolge.

Ich bin mitlerweile davon überzeugt, das der String funzeln
würde, wenn nicht der Windowshinweis zuvor kommen würde.

Der muss weg ! Nur wie ? Ich glaube das ist der Punkt.....