AppleScript名:オープン中のムービーのファイルにラベルを付ける |
— Created 2017-10-26 by Takaaki Naganoya — 2017 Piyomaru Software –http://piyocast.com/as/archives/4925 tell application "QuickTime Player" set aDocList to every document end tell repeat with i in aDocList tell application "QuickTime Player" tell i set aProp to properties set aFile to (file of aProp) as alias end tell end tell tell application "Finder" set label index of aFile to 5 end tell end repeat |
(Visited 37 times, 1 visits today)