>>63
AppleScript なら

on open theItemList
tell application "Finder"
set theFile to choose file name
if theFile is false then return
set theLog to POSIX path of theFile
repeat with theItem in theItemList
set theCommand to "find "
set theCommand to theCommand & (POSIX path of theItem)
set theCommand to theCommand & " -name \"*\" >> "
set theCommand to theCommand & theLog
do shell script theCommand
end repeat
end tell
end open

こんな感じ。