Envoi de message avec piece jointe

Question

Bonjour &#224; tous,



J'ai un probl&#232;me avec l'envoi de mail avec une piece jointe.

Voici le code source :



        Dim monMail As New MailMessage

        Dim monSMTP As SmtpMail

        Dim mailPieceJointe As MailAttachment

        ' envoi de mail

        monMail = New System.Web.Mail.MailMessage

        monMail.From = "xxx@xxx.xxx"

        monMail.To = "xxx@xxx.xxx

        monMail.Subject = "test"

        monMail.BodyFormat = Web.Mail.MailFormat.Text

        monMail.Body = "test"

        monMail.Priority = Web.Mail.MailPriority.High

        mailPieceJointe = New MailAttachment("test.txt")

        monMail.Attachments.Add(mailPieceJointe)

        monSMTP.Send(monMail)


J'obtient le message "Impossible d'acc&#233;der &#224; l'objet 'CDO.Message'".
Quand j'envoie le message sans ajouter de pi&#232;ce jointe, il n'y a pas de
probl&#232;me...

Quelqu'un a d&#233;j&#224; ce genre de probl&#232;me ?



Merci d'avance

Yoyo

cs_eldim · Answer

Bonjour,
(Y a une solution simple... utiliser Blat de sourceforge.org)
sinon la syntaxe c'est :
Dim Attachement 
As 
New System.Web.Mail.MailAttachment(Fichier, Web.Mail.MailEncoding.UUEncode)Mail.Attachments.Add(Attachement)

Envoi de message avec piece jointe

1 réponse

Discussions similaires