入手先を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

このブログの人気の投稿

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

PowerShellのGetDetailsOf メソッドでプロパティの詳細情報のID番号と項目名を列挙します

PowerShellで複数ファイルのプロパティを取得する方法(準備編)

簡単 YouTube動画をダウンロード、音声のみ保存する方法 2019

DOMノードオブジェクトを文字列に変換する

AppleScript 改行 コード 置換

PowerShellでJPG画像のリサイズとウォーターマーク画像との合成を同時に行う

Blender: 辺の長さを数値で指定するアドオン