Macro calc mail multi destinataires avec PJ via Thunderbird

Fermé
turtly3600 Messages postés 1 Date d'inscription lundi 10 mars 2014 Statut Membre Dernière intervention 10 mars 2014 - 10 mars 2014 à 14:23
OOoForum Messages postés 3865 Date d'inscription jeudi 20 mars 2008 Statut Membre Dernière intervention 3 novembre 2023 - 15 mars 2014 à 20:05
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 3865 Date d'inscription jeudi 20 mars 2008 Statut Membre Dernière intervention 3 novembre 2023 960
15 mars 2014 à 20:05
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