Répondre à la discussion

Si vraiment tu ne trouves pas, alors inclus les balises HTML pour les saut de ligne.

Le même script avec balise HTML devient:


[CODE]

-- envoi mail avec outlook et ajoute les pièces jointes

set listePJ to choose file with prompt "Sélectionner les fichiers à envoyer" multiple selections allowed yes


set nb to count item of listePJ

tell application "Finder"

    set listenomPJ to "liste des pièces jointes :" & " <br>"

    repeat with i from 1 to nb

        set nom to name of (item i of listePJ)

        set listenomPJ to listenomPJ & nom & " <br>"

    end repeat

end tell


--ligne exemple pour ajout texte

set listenomPJ to listenomPJ & " <br>" & "Veuillez trouver le résultat du travail en PJ sus nommées" & " <br>" & "Cordialement."


tell application "Microsoft Outlook"

    activate

    set newMessage to make new outgoing message with properties {subject:"Sujet", content:listenomPJ}

    tell newMessage

        set toaddresslist to {"adresse_destinataire@free.fr"}

        repeat with i from 1 to count toaddresslist

            make new to recipient at end of to recipients with properties {email address:{address:item i of toaddresslist}}

        end repeat

       

        repeat with i from 1 to nb

            make new attachment at end of attachments with properties {file:item i of listePJ}

        end repeat

    end tell

    send newMessage

end tell

[/CODE]