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
Rejoignez-nous