envoi impossible du mail

bonjour
j'ai installé sur mon pc un smtp client et j'ai exécuter le bout de code suivant:

Code:

---

1 2 3 4 5 6 7 8

Dim monmail As New MailMessage monmail.From = New MailAddress("beet2che@yahoo.fr") monmail.To.Add("latino_live@hotmail.fr") monmail.Subject = "mail de test" monmail.Body = "hello " Dim client As New SmtpClient client.Host = "192.168.1.150" client.Send(monmail)

---

mais une erreur se déclenche lors de l'exécution : échec d'envoi du courrier
System.IO.IOException:impossible de lire les données de la connexion de transport


merci
cordialement

Citation:

---

Envoyé par beet2che

bonjour
j'ai installé sur mon pc un smtp client et j'ai exécuter le bout de code suivant:

Code:

---

1 2 3 4 5 6 7 8

Dim monmail As New MailMessage monmail.From = New MailAddress("beet2che@yahoo.fr") monmail.To.Add("latino_live@hotmail.fr") monmail.Subject = "mail de test" monmail.Body = "hello " Dim client As New SmtpClient client.Host = "192.168.1.150" client.Send(monmail)

---

mais une erreur se déclenche lors de l'exécution : échec d'envoi du courrier
System.IO.IOException:impossible de lire les données de la connexion de transport


merci
cordialement

---

peut être qu'il faut préciser le port ?

le port par défaut c'est le port 25 mais même si on rajoute la ligne qui définisse le port c'est la même erreur qui se déclenche.

Y a pas d'identification à faire ?

A part ça je vois pas ... Vérifier le serveur ...

non il n'y a pas d'identification à faire .
vérifier le serveur? de quel côté?

Salut,
tu as essayé comme ça?

Code:

---

1 2 3 4 5 6 7 8 9

Dim AdrExp As New MailAddress("Ami@free.fr") Dim AdrDest As New MailAddress("be@societe.com") Dim Mail As New MailMessage(AdrExp, AdrDest) Dim Sauvegarde As New Attachment(AttachFile) Mail.Attachments.Add(Sauvegarde) Mail.Body = "texte mail" Mail.Subject = "mon mail" Dim SmtpMail As New SmtpClient("192.168.1.150") SmtpMail.Send(Mail)

---