How to send an email with Automator?

[Jetheat]

I managed to create an application in Automator that will send out a new mail message.

But how do I use this where I can highlight any email address on the web, right-click and choose my Automator application, and then have that send my message to that email which I highlighted?

Also, how do I get my application to show in the services menu?

Appreciate the help,

JH

 

[bogdanw]

Don’t make an application with Automator, make a Quick Action/service (Automator – New – Quick Action).
Because not all email adresses on the web are clickable, I suggest you use Workflow receives current – text in Safari or the browser you are using.
Use Quick Action workflows on Mac https://support.apple.com/guide/automator/use-quick-action-workflows-aut73234890a/mac

 

[Jetheat]

Thanks for that.
I have done that now, but how do I select an email address on the net (linked or unlinked), and have that populated in the TO field of my email when I run the script? - See attached image.

Is there a way to call the script from the right-click menu?

JH

 

[bogdanw]

Your selection is wrong. Not "in Mail", choose the app you are getting the email address from or choose "any" for the service to be available in all apps.

 

[Jetheat]

Ok, I changed that to "Any application" and now, if I highlight an email address on the net and right click and choose my quick action, it opens up the Mail Compose window with my text as expected, but the email address which I highlighted is pasted at the bottom of that email message rather than in the TO field.

How do I get the email to paste itself in the TO field?

JH

 

[bogdanw]

Use AppleScript:

on run {input, parameters}
    set theRecipient to input
    tell application "Mail"
        set theMessage to make new outgoing message with properties {visible:true, subject:"My Subject"}
        tell theMessage
            make new to recipient at end of to recipients with properties {address:theRecipient}
        end tell
        activate
    end tell
end run

adapted from https://apple.stackexchange.com/que...ic-email-address-in-automator-from-a-variable

 

[Jetheat]

Use AppleScript:

on run {input, parameters}
    set theRecipient to input
    tell application "Mail"
        set theMessage to make new outgoing message with properties {visible:true, subject:"My Subject"}
        tell theMessage
            make new to recipient at end of to recipients with properties {address:theRecipient}
        end tell
        activate
    end tell
end run

That's great, how do I enter a message in that code, and how do I set my outgoing email address?

JH

 

[bogdanw]

Replace in the code below:
"Subject of the email" with your desired subject
"myEmail@adress.com" with your email adress used for sendind the message
"content of the email" with the text content of the email

on run {input, parameters}
    set theRecipient to input
    set theSubject to "Subject of the email"
    set theSender to "myEmail@adress.com"
    set theContent to "content of the email"
    tell application "Mail"
        set theMessage to make new outgoing message with properties {visible:true, sender:theSender, subject:theSubject, content:theContent}
        tell theMessage
            make new to recipient at end of to recipients with properties {address:theRecipient}
        end tell
        activate
    end tell
end run

 

[Jetheat]

Perfect. Thank you very much.

JH