El correo es notoriamente difícil de ejecutar con eficacia, especialmente cuando se trata de mensajes salientes que no se crearon con el script en ejecución.
tell application "Mail"
set _title to name of front window
set mList to messages of drafts mailbox whose subject is _title
if length of mList = 1 then
set _msg to item 1 of mList
if length of (get _msg's to recipients) > 5 then
beep
error "Too many To-Recipients! Do you want to send BCC?"
else
return "Send_Normal"
end if
end if
end tell
Algo como esto se puede usar junto con Keyboard Maestro o una utilidad de macro similar para que la utilidad seleccione el elemento de menú de envío.
Si bien puedes usar System Events para hacer esto, encuentro que a veces demora 3 o más segundos en iniciarse en mi máquina si aún no se está ejecutando, y empiezas a preguntarte por qué tu macro no funciona cuando finalmente se quita.
Otras advertencias de este enfoque son que el mensaje debe haberse guardado al menos una vez para ser detectado.
Entonces, lo que quieres hacer es posible, pero muy astuto.
-ccs