Envoyer des mails en vb net 2010 ExpressRésolu

Question

Je souhaite envoyer des mails via un progiciel que je crée

Imports System.Net


Dim MyMail As MailMessage = New System.Net.Mail.MailMessage
        Dim SMTPMail As New SmtpClient("smtp.live.com")
        SMTPMail.Credentials = New Net.NetworkCredential("#EXPEDITEUR#@hotmail.com", "#MDP#")
        SMTPMail.Port = 25
        SMTPMail.EnableSsl = True
        MyMail.Priority = MailPriority.High
        MyMail.From = New MailAddress("#EXPEDITEUR#@hotmail.com")
        MyMail.To.Add(New MailAddress("#DESTINATAIRE#@hotmail.fr"))
        ' msg.CC.Add(New MailAddress("#EXPEDITEUR#@hotmail.com"))
        MyMail.Body = "#MESSAGE#"
        Try
            SMTPMail.Send(MyMail)
        Catch ex As SmtpException
            MessageBox.Show(ex.StatusCode & vbCrLf & ex.Message) 

        End Try
        MyMail.To.Clear()
        MyMail = Nothing
        SMTPMail = Nothing

Le résultat ca ne marche pas et j'ai une erreur pas très explicite :
"-1, Echec dans l'envoie".

Merci de m'aider.

Utilisateur anonyme · Accepted Answer

Salut,
Il me semble que chez live.com le port de connexions sécurisées SSL est 587.
Bonne soirée.

deatheart666 · Answer

Oui c'est exact j'avais trouve ^^
Mais merci.

Envoyer des mails en vb net 2010 Express

2 réponses

Votre réponse

Discussions similaires