Discussion :

[Amiral62]

Bonjour,
J'aurais aimé savoir comment tester l'échec d'une connexion ADODB dans cette configuration ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Set connexion = New ADODB.connection
Set Rs_Oracle = New ADODB.Recordset
 
 
connexion.Provider = "MSDAORA.1"
connexion.Properties("Data Source").Value = "DataSource"
connexion.Properties("User Id").Value = "ID"
connexion.Properties("Password").Value = "MDP"
connexion.Open

le but est que l'utilisateur ne se retrouve pas avec un message de débogage si sa connexion oracle plante..
Merci pour votre aide.

[Invité]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
on error resume Next
connexion.Open
If err<>0 then msgbox "connexion impossible"
Err.clear
On error goto 0

[Amiral62]

Bonjour rdurupt,
merci pour cette solution !