Bonjour,

Je rencontre un problème dans mon problème, lorsque j'utilise une librairie extérieure et lorsque j'ai une perte de la liaison avec celle-ci.

Donc j'ai une fonction qui utilise une librairie extérieur (MonEx.MaLib)
Je définie ma variable (Set g_maLib = ....), une fois initialisée elle est bien présente dans les processus.

Puis je boucle, jusqu'à temps que cette librairie se connecte à un serveur distant.
Si la librairie n'arrive pas à se connecter, elle se "tue" toute seule; au moment ou l'on passe sur g_maLib.Connect, la boucle passe en erreur et va dans Error_Handled.
A ce moment là, l'erreur suivante apparait : "Erreur Automation. L'objet invoqué s'est déconnecté de ses clients".
J'ai donc une perte de liaison avec ma librairie.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
Public WithEvents g_maLib As MonEx.MaLib
 
Function maFunction()
    On Error GoTo Error_Handled
 
    Set g_maLib = New MonEx.MaLib
 
    Do While g_maLib.IsConnected = False And cpt / 60 < 5
        g_maLib.Connect
        cpt = cpt + 1
        Sleep (1000)
    Loop
    ...
 
Error_Handled:
    debug.print g_maLib.Status 
    ...
End Function
Ma question est donc la suivante:
Existe-il un moyen de détecter cette erreur ?

Mon objectif est de relancer la librairie et recommencer l'opération.
Seulement, je ne vois pas comment faire. Pourriez-vous m'aider dans ma recherche ??? Merci.