Applescript: вернуть список подкаталогов с полным путем

Question

У меня есть книга Excel с кодом VBA, которая должна возвращать список всех подкаталогов в указанном каталоге.Он отлично работает, используя Dir (или FileSystemObject) на моем ПК с Windows.

К сожалению, человек, для которого я пишу код, использует Mac, и ни одно из решений не сработало (очевидно, FileSystemObject будет недоступен в Mac OS, и вместо этого команда Dir возвращает только «.» Или системные файлы.каталогов).

Я хотел бы попробовать другой подход с использованием функции VBA MacScript, которая может запускать Applescript.Я понятия не имею, как кодировать в Applescript, и прошу помощи в написании сценария, который будет принимать каталог (например, «/ Test Dir») и возвращать список всех подкаталогов с их полными путями (например, «/ Test Dir»/ Sub1, / Test Dir / Sub2 ").

Любая помощь будет принята с благодарностью.

Answer 1

Очень эффективный способ - использовать команду оболочки find.Это намного быстрее, чем любой собственный способ AppelScript, такой как , скажите , что Finder выполняет работу

set folderList to paragraphs of (do shell script "/usr/bin/find '/Test Dir' -type d")

Одиночные кавычки вокруг пути требуются, еслипуть содержит пробелы.