Bonjour,

j'ai l'impression que cela boucle à l'infini.
A votre place, je testerais le retour de la fonction DDEConnecte(). D'après l'aide si égale 0 avec voir DDErreur()

Cordialement.