Envoi mail avec header "Return-Receipt-To", pas d'accusé

Réponse acceptée !
Salut,

Tu es sur que le serveur n'est pas configuré pour ne pas les envoyer ?
Voir aussi si la propriété MailMessage.DeliveryNotificationOptions ne joue pas un rôle, même avec ajout manuel du header (d'ailleurs avec cette prorpiété tu pourrais peut être te passer de l'ajout si tu ne spécifie pas une adresse différente de celle de l'expéditeur, à vérifier).
Si tu spécifies une adresse différente, vérifier que ce scénario est supporté par le serveur.
Enfin, vérifier que tu ne te retrouves pas dans ce cas là : SMTPClient Not setting DeliveryNotificationOptions for each message sent


/*
coq
MVP Visual C#
CoqBlog
*/

Réponse acceptée !
Salut coq et merci pour tes éclaircissements

Dans l'ordre :

* je ne maitrise pas le paramètrage du serveur et ne sait donc pas si il est configuré pour ne pas les envoyer (mais c'est a priori ok, voir réponse suivante)
* MailMessage.DeliveryNotificationOptions : j'ai effectivement testé avant ta réponse cette option. Chose incompréhensible, ça n'a pas marché la première fois et ça a fonctionné ensuite ??? La seule chose dont je ne suis pas sûr, c'est de ne pas avoir mélangé l'ajout de header manuel et l'utilisation de cette option lors de mon premier essai.

=> Donc, ça semble fonctionner avec l'utilisation de MailMessage.DeliveryNotificationOptions seul sans les ajouts manuel "mail.Headers.Add"

* Pour ta dernière remarque, je ne suis pas dans ce cas (j'avais trouvé cet article), car j'envoie un seul mail

Merci


Pour info si quelqu'un d'autre à le souci, mon code final :

serveurSMTP = cbbServeurSMTP.Text

from = txtDe.Text

a = txtA.Text

cc = txtCC.Text

cci = txtCCi.Text

objet = txtObjet.Text

corps = txtCorps.Text

mail =

New MailMessage()

mail.From =

New MailAddress(from)

mail.To.Add(a)

If cc <> ""Then

mail.CC.Add(cc)

EndIf

If cci <> ""Then

mail.Bcc.Add(cci)

EndIf

mail.Subject = objet

mail.IsBodyHtml =

False

mail.BodyEncoding = System.Text.Encoding.UTF8

mail.Body = corps

mail.DeliveryNotificationOptions = DeliveryNotificationOptions.OnSuccess Or DeliveryNotificationOptions.Delay Or DeliveryNotificationOptions.OnFailure

Dim server AsNew SmtpClient(serveurSMTP)

server.Send(mail)

mail.Dispose()

mail =

Nothing

server =

Nothing

MessageBox.Show(

"Mail envoyé !")