AppleScriptの支援により、これを達成できます。
AppleScript Editorを開き、新しいドキュメントを作成して、次の盗まれた行を貼り付けます。
tell application "Finder"
try
if exists Finder window 1 then
set thisPath to (the target of the front window) as alias
else
set thisPath to (path to desktop)
end if
on error
return
end try
end tell
set x to my the_perfect_datestring()
if x is not "-ERROR" then
set fullPath to thisPath & x as text
tell application "Finder"
try
--activate
if not (exists fullPath) then
set y to make new folder at thisPath with properties {name:x}
end if
activate
open y
end try
end tell
end if
on the_perfect_datestring()
try
set cd to (the current date)
set the_year to year of (cd) as number
set the_month to month of (cd) as number
set the_day to day of (cd) as number
if the_month < 10 then set the_month to "0" & the_month
if the_day < 10 then set the_day to "0" & the_day
return ((the_year & the_month & the_day) as string)
on error
return "-ERROR"
end try
end the_perfect_datestring
ファイルをAppleScriptアプリケーション(DateFolder.appなど)のどこかに保存します(例:〜/ Applications)。
フォルダーを開き、DateFolder.appをツールバーにドロップします。
開いているフォルダーにフォルダーを作成するには、ツールバーのアプリのアイコンを押すだけです。新しいフォルダが自動的に開きます。open y
新しいフォルダーを開きたくない場合は、スクリプトの22行目を削除します()。Dockにアプリを追加して開くと、最前面のフォルダーまたはデスクトップ(フォルダーが開いていない場合)に新しいフォルダーが作成されます。
Mac OS X 10.7.5でのみテストされています。ライオン!
ハイフンと現在の時刻を追加するには、次の行を追加します(上記のスクリプトの行32-34を置き換えます):
set the_hour to hours of (cd) as number
set the_minute to minutes of (cd) as number
set the_second to seconds of (cd) as number
if the_month < 10 then set the_month to "0" & the_month
if the_day < 10 then set the_day to "0" & the_day
if the_hour < 10 then set the_hour to "0" & the_hour
if the_minute < 10 then set the_minute to "0" & the_minute
if the_second < 10 then set the_second to "0" & the_second
return ((the_year & the_month & the_day & "-" & the_hour & the_minute & the_second) as string)