Автоматическая очистка и перемещение файлов с рабочего стола при помощи AppleScript

Откройте редактор Script Editor

/Программы/Утилиты/Script Editor

Вставьте следующий код:

tell application "Finder"
move items of (path to desktop folder) to folder (path to documents folder)
end tell

Если нажмете Выполнить [Run], то увидите, что все элементы с рабочего стола перемещаются в папку Documents. Сохраните скрипт как cleardesktop и измените Формат файла [File Format] на Приложение [Application].

Но как сделать так, чтобы он срабатывал каждый раз, когда меняется пользователь… Для этого перейдите в настройки:

Выберите учетную запись из списка слева, а затем перейдите на вкладку Объекты входа [Login Items]. Теперь вы можете либо нажать на кнопку (+) и добавить сценарий или просто перетащить скрипт из окна Finder в список.

Теперь, когда вы включаете компьютер, весь беспорядок от предыдущего пользователя будет автоматически перемещаются в папку Documents.

Вариант скрипта, приведенный выше, довольно прост. Вот несколько изменений и вариаций его использования:

Создание подпапок в Documents с датой

set foldername to ("Desktop " & short date string of (current date))
set docsfolder to (path to documents folder) as string
tell application "Finder"
if not (exists folder (docsfolder & foldername)) then
make new folder at docsfolder with properties {name:foldername}
end if
move items of (path to desktop folder) to folder (docsfolder & foldername)
end tell

Сортировка документов рабочего стола попапкам Movies, Pictures, Applications and Documents на основе расширения файлов

tell application "Finder"
set desktopFolder to (path to desktop folder)
set musicFolder to (path to music folder)
set appsFolder to (path to applications folder)
set picsFolder to (path to pictures folder)
set moviesFolder to (path to movies folder)
set docsfolder to (path to documents folder)
set musicExt to {".mp3", ".aac"}
set appsExt to {".dmg", ".sit", ".app"}
set picsExt to {".jpg", ".gif", ".tif", ".png", ".psd"}
set moviesExt to {".avi", ".mpg", ".mov", ".m4v"}
set docsExt to {".pdf", ".txt", ".doc", ".xls", ".key", ".pages"}
set allFiles to files of desktopFolder
repeat with theFile in allFiles
copy name of theFile as string to FileName
repeat with ext in musicExt
if FileName ends with ext then
move theFile to musicFolder
end if
end repeat
repeat with ext in appsExt
if FileName ends with ext then
move theFile to appsFolder
end if
end repeat
repeat with ext in picsExt
if FileName ends with ext then
move theFile to picsFolder
end if
end repeat
repeat with ext in docsExt
if FileName ends with ext then
move theFile to docsfolder
end if
end repeat
repeat with ext in moviesExt
if FileName ends with ext then
move theFile to moviesFolder
end if
end repeat
end repeat
end tell