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

このブログの人気の投稿

旧エッジの閲覧履歴を検索 MS Edge

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

AppleScript 改行 コード 置換

百済寺 三重塔 2 パノラマ

ヤバい!JAPANNEXT WQHD対応 27型ワイド液晶ディスプレイ「JN-IPS2716WQHD」を注文してみた!!!

https://gemini.google.com/search?q=%5B%5BOralHistory%5D%5D

VMWare Playerでホストとゲスト間でクリップボードが共有できない時の対処法