Получите «От» или адрес отправителя от почты Apple

Question

Я новичок в написании сценариев и пытаюсь написать простой скрипт для почты. Мне нужно указать адрес отправителя, или мы можем сказать от адреса. Но я ничего не получаю от этого. Мой сценарий выглядит следующим образом.

tell application "Mail" 
    try 
     set theSelectedMessage to selection 
     set msgCount to count of theSelectedMessage 
     if (msgCount = 1) then 
      set theMsg to item 1 of theSelectedMessage 
      #also tried this 
      #set theSender to extract name from sender of theMsg 
      set theSender to (sender of theMsg) 
      display dialog "name:" & theSender 
     end if 
    end try 
end tell 

Диалог приближается, но нет деталей отправителя.

Answer 1

Ohhhh
Я забыл включить мою учетную запись почты причину, что я перед проблемой.
Mail> Предпочтения> Учетные записи> Информация об учетной записи> Разрешить эту учетную запись

Answer 2

В основном extract name from это правильный путь

tell application "Mail" 
    set selectedMessages to selection 
    if selectedMessages = {} then return 

    repeat with aMessage in selectedMessages 
     set senderName to extract name from sender of aMessage 
     set senderAddress to extract address from sender of aMessage 
     display dialog " name: " & senderName & return & "address: " & senderAddress 
    end repeat 
end tell