Eu tenho usuários enviando e-mails pelo Outlook, que formata o texto como Rich text. Eu estou tentando criar um script onde um endereço de e-mail "pega-tudo" intercepta o e-mail, converte-o em texto simples e envia-o para o usuário. Eu tenho o Re-Direct trabalhando com alguma pesquisa, no entanto, o corpo da mensagem ainda é Rich Text. Existe uma maneira que eu possa modificar o script abaixo para conseguir isso:
diz ao aplicativo "Mail"
set AppleScript's text item delimiters to ""
set theRedirectRecipient to "[email protected]"
set theRedirectSender to "Case manager"
set theMessages to the selection
repeat with thisMessage in theMessages
tell application "Mail"
set theRedirectedEmail to redirect thisMessage
tell theRedirectedEmail
if subject of thisMessage is "" then
set subject of theRedirectedEmail to "Subject Was Empty"
end if
make new to recipient at beginning of to recipients with properties {address:theRedirectRecipient}
delete bcc recipients
delete cc recipients
end tell
set the sender of theRedirectedEmail to theRedirectSender
#delay 1
send theRedirectedEmail
end tell
end repeat
end tell
Tags email plaintext applescript