Macro calc mail multi destinataires avec PJ via Thunderbird

turtly3600 Messages postés 1 Date d'inscription   Statut Membre Dernière intervention   -  
OOoForum Messages postés 3873 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,
Je souhaiterais envoyer un fichier en pièce jointe d'un mail via Thunderbird à plusieurs
destinataires.
Or j'ai beau séparer les destinataires par un point virgule ou une virgule cela
ne fonctionne pas.
La séparation avec la virgule ne prend en compte que mon premier destinataire.
La séparation par le point virgule ajoute une double quote entre le prénom et le
nom du premier destinataire et fait suivre le tout par le second destinataire
tel que :
toto.machin"@truc.fr;titi.bidule@truc.fr
Lors de l'envoi dans Thunderbird, un message d'erreur apparaît "Bad recipient address syntax"
Je vous remercie pour votre aide.

Voici mon code avec le point virgule

sub mail2
Dim Sujet as String, Corps as String
Dim oFichier as string 'Utilisée pour un fichier

'fichier à envoyer
oFichier="file:///C:/essai.ods"
Sujet = "Coucou"
Corps = "Bonjour" & "%2C" & "%0A" & "%0A" & "Vous trouverez ci-joint un
fichier." & "%0A" & "%0A" & "Cordialement"
Des = "toto.machin@truc.fr;titi.bidule@truc.fr"
shell(ConvertToURL("D:\Thunderbird\thunderbird.exe"),3, "-compose body=" &
Corps & ",subject=" & Sujet & ",to=" & Des & ",attachment=" & oFichier)

end sub
A voir également:

1 réponse

OOoForum Messages postés 3873 Date d'inscription   Statut Membre Dernière intervention   961
 
Quand on poste son problème sur plusieurs forums et que l'on obtient une réponse, il est courtois de revenir donner la solution en mettant un lien vers celle-ci :
https://forum.openoffice.org/fr/forum/viewtopic.php?f=8&t=42496
Question de partage de connaissances :/

.
0