title image


Smiley Re: Anfügefehler abfangen?
Hi,

wenn du die Abfragen aus VBA heraus startest, kannst du die Fehler folgendermaßen protokollieren:



private sub beispiel()

On error goto error_handler

Dim dbs as dao.database

dim rcs as dao.recordset



>



exit sub

error_handler:

set dbs = currentdb()

set rcs = dbs.openrecordset("Name_der_Protokolltabelle")



rcs.addnew

rcs!Fehlermeldung = err.description

rcs!Quelle = err.source

rcs.update

rcs.close



resume next

end sub



Auf diese Weise kannst du die Fehlermeldungen in eine Tabelle "Name_der_Protokolltabelle" mit den Spalten "Fehlermeldung" und "Quelle" (des Fehlers) einfügen. Das Resume Next sorgt dafür, dass der Code an der nächsten Stelle weitergeführt wird.

Allerdings wüßte ich keinen Weg, die dabei fehlgeschlagenen Datensätze mit zu protokollieren.



Gruß

SpiderWoman





geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: