« FontinfoPlist2HTML 少し修正 | トップページ | [bash]exiftoolインストール 少し修正 »

[selectFile:inFileViewerRootedAtPath:]ファイルを選択した状態でFinderで開く


【スクリプトエディタで開く】|

#!/usr/bin/env osascript
----+----1----+----2----+-----3----+----4----+----5----+----6----+----7
#
#
# com.cocolog-nifty.quicktimer.icefloe
----+----1----+----2----+-----3----+----4----+----5----+----6----+----7
use AppleScript version "2.8"
use framework "Foundation"
use framework "AppKit"
use scripting additions
property refMe : a reference to current application

###選択するパス
set strFilePath to "~/Library/Fonts" as text
set ocidFilePathStr to refMe's NSString's stringWithString:(strFilePath)
set ocidFilePath to ocidFilePathStr's stringByStandardizingPath()
set ocidFilePathURL to (refMe's NSURL's alloc()'s initFileURLWithPath:(ocidFilePath) isDirectory:false)
###表示上のルートパス
set strDirPath to "~/Library" as text
set ocidDirPathStr to refMe's NSString's stringWithString:(strDirPath)
set ocidDirPath to ocidFilePathStr's stringByStandardizingPath()
log className() of ocidDirPath as text
###実行
set appSharedWorkspace to refMe's NSWorkspace's sharedWorkspace()
set boolDone to appSharedWorkspace's selectFile:(ocidFilePath) inFileViewerRootedAtPath:(ocidDirPath)
###結果
log boolDone
if boolDone is false then
  set aliasFilePath to (ocidFilePathURL's absoluteURL()) as alias
  tell application "Finder"
    open folder aliasCameraRawDirPathURL
  end tell
return "エラーしました"
end if

|

« FontinfoPlist2HTML 少し修正 | トップページ | [bash]exiftoolインストール 少し修正 »

AppleScript NSWorkspace」カテゴリの記事