VBA - CDO Message => Gérer une erreur

VBA - CDO Message => Gérer une erreur - VB/VBA/VBS - Programmation

Marsh Posté le 11-12-2014 à 11:11:25    

Bonjour à tous,
 
Je rencontre un souci assez récurrent qui est le suivant :
 
J'utilise un code VBA pour envoyer des mails via CDO Message et régulièrement l'exécution s'arrête avec le message :"Le transport a échoué dans sa connexion au serveur".
Ce qui est très bizarre c'est que sur une trentaine de mails, ça arrive aléatoirement, au début, à la fin ou même parfois pas du tout donc il ne s'agit pas d'un problème sur les paramètres.
 
Plus étrange encore, il me suffit de faire : Débogage et d'appuyer sur F5 pour que le traitement reprenne son cours et aboutisse sans aucune modification.
 
Ce que je souhaiterais, c'est intégrer un bout de code pour de ne plus avoir à intervenir manuellement avec ce fameux "Débogage + F5".
 
Je vous remercie d'avoir pris le temps de me lire et si vous avez une solution... Je prends !  :)  
 
Bonne journée et bon courage à tous,
 
Farid

Reply

Marsh Posté le 11-12-2014 à 11:11:25   

Reply

Marsh Posté le 11-12-2014 à 16:48:17    

Salut, je commencerai par ajouter un/des DoEvents aux endroits idoines pour voir.


Message édité par kiki29 le 11-12-2014 à 16:48:51

---------------
Myanmar 90/91 : http://gadaud.gerard.free.fr/publi [...] index.html
Reply

Marsh Posté le 11-12-2014 à 16:51:20    

Salut Kiki,
 
Merci pour ta réponse.
 
Néanmoins, je suis un peu une quiche en VBA ou du moins un novice donc  il va falloir que je cherche ce qu'est DoEvents, à quoi ça sert et comment l'utiliser.
 
Je te remercie pour cette piste. :)  
 
Farid

Reply

Marsh Posté le 11-12-2014 à 17:44:53    

Reply

Marsh Posté le 11-12-2014 à 17:47:54    

Yep, c'est la première chose que j'ai faite. ;)  
 
Je vais voir où je dois le caser dans mon code.
 
Encore merci à toi,
 
Farid

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed