Discussion :

[thierry007]

Bonjour

pour envoyer un fichier attaché a un mail cela fonctionne

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

 Dim FileAttach As System.Net.Mail.Attachment = New Attachment(My.Application.Info.DirectoryPath & "\monfichier.pdf")

Je souhaiterais envoyer 4 fichiers en attaches, quelqu'un a t'il la syntaxe pour cela

Merci bien

[tomlev]

Ben tu crées 4 objets Attachment et tu les ajoutes tous à la collection Attachments du MailMessage... où est le problème ?

[anonymousse]

bonsoir,

je ne suis pas certain, mais est-ce que ce ne serait pas ça :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
Dim SendEmail As New System.Net.Mail.MailMessage(EmailFrom, EmailTo, EmailSubject, EmailBody)
SendEmail.Attachments.Add(New System.Net.Mail.Attachment(EmailAttachmentFileName1))
SendEmail.Attachments.Add(New System.Net.Mail.Attachment(EmailAttachmentFileName2))
SendEmail.Attachments.Add(New System.Net.Mail.Attachment(EmailAttachmentFileName3))
SendEmail.Attachments.Add(New System.Net.Mail.Attachment(EmailAttachmentFileName4))

battu au poteau par Tomlev ! c'est l'arthrose dans les doigts

[thierry007]

j'aurais pené a quelques chose de plus en syntaxe , mais bon

Merci bien

[tomlev]

battu au poteau par Tomlev ! c'est l'arthrose dans les doigts

Et peut-être aussi le fait que tu as posté du code et moi non