News & Tipps zu Microsoft Access

Lesen Sie hier einige der besten Beiträge aus SmartTools Access Weekly sowie ausgewählte Inhalte anderer E-Mail-Newsletter von SmartTools Publishing rund um Microsoft Access.

Beitrag aus SmartTools Access Weekly

Fehler bei der Dateneingabe abfangen

Access 365 2024 2021 2019 2016 2013 2010s

FRAGE Ich erfasse in einem Formular neue Aufträge. Dabei wird auch eine Auftragsnummer erfasst, für die sichergestellt werden muss, dass es keine Duplikate gibt. Ich habe dazu in der Tabelle das entsprechende Feld bei "Indiziert" auf den Wert "Ja (ohne Duplikate)" eingestellt. Das funktioniert gut, aber der Anwender erhält im Formular bei einer Duplikateingabe eine unverständliche Fehlermeldung von Access angezeigt. Gibt es die Möglichkeit, dem Anwender im Formular eine frei wählbare Fehlermeldung bei Duplikatseingabe anzuzeigen?

L. Urban

ANTWORT Für eine solche Aufgabe können Sie das Ereignis "Bei Fehler" eines Formulars nutzen:

Private Sub Form_Error(DataErr As Integer, _
                       Response As Integer)

  Select Case DataErr
    Case 1
      'Ihre Fehlermeldung
    Case 2
      'Ihre Fehlermeldung
    Case 3
      'Ihre Fehlermeldung
  End Select

  Response = acDataErrContinue

End Sub

Über den Parameter "DataErr" fragen Sie hier die Nummer des aufgetretenen Fehlers ab und zeigen abhängig davon Ihre eigene Fehlermeldung an. Über den Parameter "Response" teilen Sie Access dann durch die Zuweisung von "acDataErrContinue" mit, dass es keine weitere Meldung anzeigen soll.