Archiv
Ansicht:   
Suche   erweiterte Suche

Nachricht aus dem Archiv

Tonisailer schrieb am 09.June.2010, 13:16:04 in der Kategorie pc.sw.office

Access 2003 Abfangen einer Fehlermeldung

Hallo Access-Experten,
habe folgendes Problem. In einem Hauptformular ist ein Unterformular eingebettet, in dem sich wiederum ein Unterformular befindet.

Das erste Unterformular greift auf die Tabelle tbl_Konten zu, in dem u.a. ein Feld AnmeldeNr (indiziert, ohne Duplikate) existiert.

Im ersten Unterformular besteht lediglich ein Textfeld namens txt_AnmeldeNr. Hier habe ich folgenden Code unterlegt:

Private Sub txt_AnmeldeNr_Exit(cancel As Integer)

DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70

End Sub

Private Sub txt_AnmeldeNr_KeyDown(KeyCode As Integer, Shift As Integer)

On Error GoTo Ende

Select Case KeyCode
    Case 9, 34, 40   \' 9 = Tabulator, 34 = BildNachUnten, 40 = PfeilUnten
    DoCmd.GoToControl \"Teilnehmer (Unterformular)\"
End Select

Ende:

End Sub


Bei Neuanlage einer Anmeldenummer läuft die Geschichte einwandfrei; mit dem Verlassen des txt_AnmeldeNr wird in tbl_Konten ein neuer Datensatz geschrieben und der Cursor in das Unterunterformular „Teilnehmer(Unterformular)“ gesetzt.
Bei einer bereits vorhandenen Anmeldenummer erfolgt logischerweise eine Fehlermeldung, da Access aufgrund der Indizierung ohne Duplikate den Datensatz nicht zurückschreiben kann. Demzufolge schlägt Access den Debug-Modus vor.
In diesem Fall möchte ich die Fehlermeldung und das Ausführen des Speicherns unterbinden, das txt_AnmeldeNr-Feld leeren und den Focus dort wieder setzen.

Kann mir jemand einen Tipp geben, mit welchem Ereignis ich die Fehlermeldungen abfangen und/oder unterbinden kann.

Bin für jeden Tipp dankbar.
Gruß aus dem Bergischen Land
Toni

Archiv
Ansicht:   
Suche   erweiterte Suche
Auf unserer Web-Seite werden Cookies eingesetzt, um diverse Funktionalitäten zu gewährleisten. Hier erfährst du alles zum Datenschutz