Envoie d'email avec system.net.mail

Version imprimable

Bonjour,

Je cherche à envoyer un mail depuis mon programme vb.net (visual studio 2008). Hors j'ai une erreur avec se code sur client.Send(mm)

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Private Sub bt_envoi_mail_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bt_envoi_mail.Click
        Dim mm As New Net.Mail.MailMessage("expéditeur", "destinataire")
 
        mm.IsBodyHtml = True
 
        mm.Body = "TEST"
 
        mm.Subject = "Test"
 
        Dim client As New Net.Mail.SmtpClient("mon serveur smtp")
 
        client.Credentials = New Net.NetworkCredential("login", "password")
 
        client.Send(mm)
    End Sub

Echec d'envoie du courrier. j'utilise le serveur smtp de mon entreprise. Quelqu'un a une idée...Merci

Merci

Bonjour,

Ton code, marche bien chez moi, tt en donnant une adresse expéditeur valide, et une de destinataire valide.
Peut etre que t'as pas specifie le bon serveur SMTP, essaye d'ajouter un try catch, pour voir le probleme exacte:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
 
Try
        Dim mm As New Net.Mail.MailMessage("expéditeur", "destinataire") 
        mm.IsBodyHtml = True 
        mm.Body = "TEST" 
        mm.Subject = "Test"
 
        Dim client As New Net.Mail.SmtpClient("mon serveur smtp") 
        client.Credentials = New Net.NetworkCredential("login", "password") 
        client.Send(mm)
 
Catch ehttp As System.Web.HttpException
            Console.WriteLine("0", ehttp.Message)
            Console.WriteLine("Here is the full error message")
            Console.Write("0", ehttp.ToString())
End Try

24/06/2009, 08h53
urbanspike

Bonjour, le code fonctionne effectivement. L'envoie de mon mail était bloqué par l'antivirus (mcafee viruscan enterprise).

Pour corriger le problème, il faut ouvrir la console viruscan, sur protection lors de l'accès, faites un clic droit et propriété.
De là sur la règle "Empêcher les vers à* diffusion massive d'envoyer des messages électroniques", ajouter le nom de votre application dans les exceptions.

Voilà, merci de l'aide