入手先をSpotlightコメントへ

Quick Edit Pencil

ダウンロード先をSpotlightコメントに入力してくれるApple Script « tybx

on adding folder items tothisFolderafter receivingsomeItems

if (count items of someItems) ≠ 1 then return

set itemAlias to (item 1 of someItems) as alias

do shell script "mdls " & (quoted form of (POSIX path of itemAlias))

set urls to the result

set oldDelimiters to AppleScript's text item delimiters

set AppleScript's text item delimiters to {"kMDItemWhereFroms"}

try

set urls to (text item 2 of urls)

set AppleScript's text item delimiters to {quote}

 

if (count urls's text items) ≤ 3 then

set urls to (text item 2 of urls)

else

set urls to (text item 4 of urls)

end if

 

set myFile to itemAlias as string

tell application "Finder"

set the comment of file myFile to urls

end tell

on error

set AppleScript's text item delimiters to oldDelimiters

return -- urls don't exist

end try

end adding folder items to

このブログの人気の投稿

googleのキャシュは廃止されたんだ

カルチャーラジオ 日曜カルチャー「人間を考える 思いを伝えることば」

書字方向 横書方向変換スクリプト 左書きから右書きへ(コピペ用途)

ブックマークレット DOM ソース変更

memo: ショートカットファイルを直接削除する

googleスプレッドシートで名前範囲内のデータが更新された時にタイムスタンプを更新