Abfangen Laufzeitfehler bei Anmeldung an DB

sternchendreizehn

Grünschnabel
Hallo!
Ich will eine Anmeldung über eine DB-Connection machen. Ist User oder Passwort nicht in der DB vorhanden, läuft das Programm auf den Laufzeitfehler '-2147217843(80040e4d)', ist ja im Prinzip auch richtig. Aber wie kann ich diesen Laufzeitfehler benutzerfreundlich vorher abfangen im Code?
 
hallo sternchendreizehn,

solche Fehler kannst Du abfangen, in dem Du am Anfang Deiner Funktion ein Label mit folgenden Code schreibst.

Private Fuction / Sub .....
On Error goto Fehler_Connection


Am Ende Deiner Funktion kannst Du dann den Fehler abfangen mit folgendem Code:

Fehler_Connection:
if Err = -2147217843 then
'Hier Dein Hinweistext als MSGBOX ausgeben
else
msgbox Err & "-" & Error(Err)
Resume next
endif

End Function/Sub

Was anderes fällt mir dazu nicht ein.

ANI
 
Jo, wobei vor "Fehler_Connection:" noch ein "exit Sub/Function" sollte, damit die Sub/Function verlassen wird wenn es keinen Fehler gegeben hat.
 
Zurück