envoie de mail

Bonjour,

Je suis dans actuellement dans une impasse, j'ai construis une application qui envoie des mails automatiquement quand j'execute l'application(F5 sous Visual Studio) tous marche nikel. Sauf que quand je compile le projet et quand j'installe mon msi et que je lance l'appli j'ai le message suivant:

Code:

---

1 2 3

erreur d'execution -2147220973 (80040213) transport échoué dans sa connexion au serveur

---

le code que j'utilise pour l'envoie des mails est le suivant:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24

Dim couriel As CDO.Message Dim config As CDO.Configuration   Set couriel = New CDO.Message Set config = New CDO.Configuration   With config.Fields .Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = CDO.cdoSendUsingPort .Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "serveur_smtp" 'nom du serveur pas l'adresse ip .Update End With     With couriel Set .Configuration = config .From = AdrMail End With   couriel.To = listdest ' liste des adresses mails des destinataires (separées par des ";" )   couriel.TextBody = corp couriel.Subject = sujet couriel.Send

---

je vous signale que l'adresse mail de l'envoyeur n'est pas gerée par le serveur smtp precisé dans le code precedent ni les adresse mails destinataires, peut etre que c'est ça qui pose probleme!!? Je verrai ça.

Sinon si quelqu'un est deja passé par cette experience ou qu'il a simplement une idée de l'origine de l'erreur je suis preneur. Merci d'avance

bonjour,

Je viens d'essayer la dll CDONTS pour envoyer mais mail sous VB6, mais j'ai un probleme, en effet à l'execution du projet, j'ai l'erreur suivante et que je ne comprend pas:

Code:

---

1 2 3 4 5

ActivX ne peut creer l'objet 'objet crée pour envoyer le mail comme ceci: Dim mail As CDONTS.NewMail Set mail = CreateObject("CDONTS.NewMail")

---

Mets juste ça:

Code:

---

Dim mail As New CDONTS.NewMail

---

Mais je ne saurais que trop te conseiller d'utiliser aspemail à la place; c'est gratuit et ça se trouve ici: www.aspemail.com. Avec CDONTS certains de mes emails n'arrivaient jamais à destination.

Bonjour,


Merci de votre reponse mais meme avec la modification que tu m'as proposée j'ai toujours la meme erreur en sortie. Je ne vois pas quelle peut etre l'origine du probleme???!!!