こんなのはどうですか? set File_List to {} set Target_Folder to choose folder set Seconds_since_creation to 86400 tell application "Finder" set File_List to entire contents of Target_Folder repeat with i from 1 to count of File_List if ((current date) - (creation date of item i of File_List)) > Seconds_since_creation then delete item i of File_List end if end repeat end tell 実行するとフォルダ選択のダイアログが出て、そのフォルダの中にある作