Connexion ADO

Résolu
wahidov2000
Messages postés
31
Date d'inscription
mercredi 9 novembre 2005
Statut
Membre
Dernière intervention
15 septembre 2013
- 5 oct. 2008 à 13:30
wahidov2000
Messages postés
31
Date d'inscription
mercredi 9 novembre 2005
Statut
Membre
Dernière intervention
15 septembre 2013
- 7 oct. 2008 à 14:06
bonjour tm;

j'essai de tester une connexion ADO en utilisant le langage delphi, ds le premier cas ou la chaine de connexion est correcte(ADOConnection1.ConnectionString) j'affiche le message 1 sont problem; par contre quand j'attribut une chaine fausse c'est pas le message 2 qui s'affiche mais un autre message d'exception.
est ce qu'il ya qq qui à une idéé pour ke je puisse affiche le message 2 ds le cas d'échoue
merci d'avance

mon code est le suivant:

ADOConnection1.ConnectionString:='ggfgfgfdggggfdg ..........................';

     Try
        ADOConnection1.Connected:=True;
        MessageDlg('Test de Connexion Réussi !',MtInformation, [mbOK],0); //message 1
     Except
  MessageDlg('Echec de Test de Connexion en raison d''une Erreur sur le Serveur "SRV1" !',MtError, [mbOK],0);//message2


    End;

2 réponses

vergil3a
Messages postés
28
Date d'inscription
mercredi 30 avril 2008
Statut
Membre
Dernière intervention
12 mars 2012

7 oct. 2008 à 13:50
bonjour :
              vous utilisez le block TRY.. EXCEPT alors a l'execution
si vous etes en envirennemnt de Delphi Message database error produits
mais si tu executer le programme hors delphi Le Message2 produis Si la chaine est Fausse Message1 si elle est correct
3
wahidov2000
Messages postés
31
Date d'inscription
mercredi 9 novembre 2005
Statut
Membre
Dernière intervention
15 septembre 2013

7 oct. 2008 à 14:06
merci pour votre reponse, g trouvé la solution pour affiché le Message 2 en envirennement Delphi; il suffit de decoché l'option
Stop on Delphi Exceptions
3