프로그램 내에서 AppleScript를 어떻게 사용할 수 있습니까?


5

이 질문 Mail의 연락처에있는 그룹 / 폴더에 모든 이메일 수신자를 추가하는 방법이 있습니까? 내게 도움이 될만한 대답이있는 것 같지만 메일에서 스크립트를 사용하는 방법을 실제로 알지 못합니다.

또는 Automator도 사용할 수있는 것처럼 보이지만 Automator에도 익숙하지 않습니다. 저는 도구를 확장하고 일반적인 문제를 해결하기 위해 링크를 찾고 있습니다. 그룹 구성원의 유지 관리가 현재의 과제입니다.

프로그램 내에서 AppleScript를 실행하려면 어떻게해야합니까?


AppleScript 편집기에서 스크립트를 붙여 넣어 스크립트를 실행할 수 있습니다. 그리고 그것에 의해 지름길을 지정하십시오. Automator 서비스를 만들거나 FastScripts 또는 다른 타사 응용 프로그램을 사용하여 .
Lri

답변:


7

Apple Mail과 같은 프로그램에서이 (또는) 스크립트를 사용하려면 Automator에서 서비스를 만들 수 있습니다.

시작 자동화 프로그램.

그것이라고 말할 때 문서 유형 선택 , 고르다 서비스 클릭 고르다

Choose a type for your document

상단 대화 상자에서 서비스 받음 입력 없음 ...에서 Mail.app (또는 프로그램 이름 또는 모든 응용 프로그램 그것이 당신이 원하는 것이면).

하나의 작업을 삽입합니다. 유용 그룹, 두 번 클릭 AppleScript 실행 .

Run AppleScript

다음 텍스트를 선택하십시오.

(* Your script goes here *)

실행할 스크립트에 붙여 넣으십시오. 귀하의 경우 붙여 넣으려는 스크립트는 다음과 같습니다.

  tell application "Mail"
    set theSelection to selection
    set theMessage to item 1 of theSelection
    set theSubject to subject of theMessage
    tell application "Address Book"
        set theGroup to make new group with properties {name:theSubject}
    end tell
    set theRecipients to to recipients of item 1 of theMessage
    repeat with a from 1 to count theRecipients
        set theRecipient to item a of theRecipients
        tell application "Address Book"
            set theName to name of theRecipient
            tell application "Mail" to set theAddress to address of theRecipient
            set thePerson to make new person with properties {first name:name of theRecipient}
            make new email at end of emails of thePerson with properties {value:theAddress}
            add thePerson to theGroup
        end tell
    end repeat
    set theRecipients to cc recipients of item 1 of theMessage
    repeat with a from 1 to count theRecipients
        set theRecipient to item a of theRecipients
        tell application "Address Book"
            set theName to name of theRecipient
            tell application "Mail" to set theAddress to address of theRecipient
            set thePerson to make new person with properties {first name:name of theRecipient}
            make new email at end of emails of thePerson with properties {value:theAddress}
            add thePerson to theGroup
        end tell
    end repeat
    tell application "Address Book" to save
  end tell

일단 그렇게하면, 파일 메뉴를 클릭하십시오. 구하다 .

"받는 사람을 그룹에 추가"와 같이 기억할 이름을 서비스에 제공하십시오.

그런 다음 Mail에있을 때 메시지를 선택하고 우편 메뉴 바에서 서비스 메뉴를 선택하고 서비스를 선택하십시오. 그룹에받는 사람 추가 .

당사 사이트를 사용함과 동시에 당사의 쿠키 정책개인정보 보호정책을 읽고 이해하였음을 인정하는 것으로 간주합니다.
Licensed under cc by-sa 3.0 with attribution required.