OVH Cloud OVH Cloud

Plusieurs fichiers attaches dans un envoi de mail

3 réponses
Avatar
Luc de Kin
Bonjour a tous,

Dans le code suivant :

With Ol_Item
.To = destinataire@domaine.fr
.subject = "L'objet du message"
.Body = "Le corps du message"
.Attachments.Add "F:Mes Documentsfichier.jpg"
.Save
.send
End With

On envoie un seul fichier attache. Comment faire pour en envoyer plusieurs ?

Merci et bonne journee a tous.

Luc

3 réponses

Avatar
Gilles MOUGNOZ
Bonjour a tous,
Dans le code suivant :
With Ol_Item
.To =
.subject = "L'objet du message"
.Body = "Le corps du message"
.Attachments.Add "F:Mes Documentsfichier.jpg"
.Save
.send
End With
On envoie un seul fichier attache. Comment faire pour en envoyer plusieurs
?
Merci et bonne journee a tous.
Luc


Bonjour, Luc

A première vue, je dirais simplement de dupliquer la ligne qui ajoute un
attachement:
.Attachments.Add "F:Mes Documentsfichier1.jpg"
.Attachments.Add "F:Mes Documentsfichier2.jpg"
.Attachments.Add "F:Mes Documentsfichier3.jpg"
...

Ca marche?

Avatar
Luc de Kin
Merci Gilles, je vais essaye ca !

Autre chose dans le meme ordre d'idee :
quand on a 2 .To ou 2 .Cc... la syntaxe doit etre differente ?

Luc


Bonjour a tous,
Dans le code suivant :
With Ol_Item
.To =
.subject = "L'objet du message"
.Body = "Le corps du message"
.Attachments.Add "F:Mes Documentsfichier.jpg"
.Save
.send
End With
On envoie un seul fichier attache. Comment faire pour en envoyer plusieurs
?
Merci et bonne journee a tous.
Luc


Bonjour, Luc

A première vue, je dirais simplement de dupliquer la ligne qui ajoute un
attachement:
.Attachments.Add "F:Mes Documentsfichier1.jpg"
.Attachments.Add "F:Mes Documentsfichier2.jpg"
.Attachments.Add "F:Mes Documentsfichier3.jpg"
....

Ca marche?






Avatar
Gilles MOUGNOZ
Merci Gilles, je vais essaye ca !
Autre chose dans le meme ordre d'idee :
quand on a 2 .To ou 2 .Cc... la syntaxe doit etre differente ?

Luc



Bonjour, Luc

Dans le cas des destinataires, je pense qu'il faudrait utiliser la syntaxe
habituelle des logiciels de messagerie, c'est-à dire, séparer les
différentes adresses par des points-virgules:

.To = adresse1 & ";" & adresse2
.Cc = adresse3 & ";" & adresse4

Dans mon exemple, je suppose que la valeur des adresses est rangée dans des
variables de type texte.

ATTENTION: il s'agit de simples suggestions, je ne l'ai jamais testé et il
ne s'agit que de suppositions (certes logiques mais ma logique a déjà été
maintes fois prise en défaut...). Alors, il se peut que tu ais quelques
ajustements à faire.

Bonne continuation