Uso de AppleScript para enviar correos electrónicos desde Mail.app a múltiples direcciones

Question

Uso de AppleScript para enviar correos electrónicos desde Mail.app a múltiples direcciones

#1 de dwm8 (2 votos)
#2 de Hugo Z Hackenbush (-1 votos)

2

Puedo enviar con éxito un correo electrónico con un archivo adjunto a una única dirección de correo electrónico utilizando el siguiente código:

on run argv
    set theSubject to (item 1 of argv)
    set theAttachmentFile to (item 2 of argv)

    tell application "Mail"

        set theAddress to "[email protected]" -- the receiver 
        set theSignatureName to "Sig" -- the signature name 

        set msg to make new outgoing message with properties {subject:theSubject, visible:true}

        tell msg to make new to recipient at end of every to recipient with properties {address:theAddress}
        tell msg to make new attachment with properties {file name:theAttachmentFile as alias}

        set message signature of msg to signature theSignatureName

        send msg
    end tell
end run

Sin embargo, no puedo averiguar cómo cambiar este código para enviar el correo electrónico a [email protected] y al [email protected]. ¿Alguien sabe cómo lo haría? Soy muy nuevo en AppleScript, ¡así que agradecería mucho la ayuda!

applescript email mail.app

pregunta dwm8 13.10.2015 - 17:33

2 respuestas

Lea otras preguntas en las etiquetas applescript email mail.app

¿Puedo restaurar una partición de OS X El Capitan? ¿El ícono de alarma de iOS 9 en el cambio de comportamiento de la barra de estado?

score 2 · Answer 1

Pude ajustar la línea set theAddress y la línea tell msg to make new to recipient para hacer que el siguiente código se ejecute según lo previsto:

on run argv
    set theSubject to (item 1 of argv)
    set theAttachmentFile to (item 2 of argv)

    tell application "Mail"

        set theAddress to {"[email protected]","[email protected]"} 
        set theSignatureName to "Sig" -- the signature name 

        set msg to make new outgoing message with properties {subject:theSubject, visible:true}

        tell msg
            repeat with i from 1 to count theAddress
                make new to recipient at end of every to recipient with properties {address:item i of theAddress}
            end repeat
        end tell
        tell msg to make new attachment with properties {file name:theAttachmentFile as alias}

        set message signature of msg to signature theSignatureName

        send msg
    end tell
end run

score -1 · Answer 2

Sí. Es posible suponiendo 1 dirección de correo electrónico por línea:

set srcFile to ((path to desktop) as text) & "myFile.txt"


set theAddresses to paragraphs of (read file srcFile as «class utf8»)


repeat with theAddress in theAddresses
 # ... insert code to create and send email to each recipient "theAddress" is each email address
end repeat