Папки исполнителей, которые обычно содержат только фото обложек альбома, в список не попадают. Переменная first отслеживает, были ли в данной папке файлы, попавшие в список. Если first имеет значение Тrue, значит, файлов, попавших в список, в папке не было. Он выводит имя папки, после чего выводит строку, состоящую из символов тире, имеющую такую же длину, что и имя папки. Благодаря этому возникает эффект подчеркивания. Функция replicate копирует символ тире (-) нужное количество раз. После вывода списка файлов папки, если в список попали какие-нибудь файлы (то есть переменная first получила значение False), для визуального отделения каждой папки выводится пустая строка. Подпрограмма listdir использует в качестве своего аргумента путевое имя в строковой форме. В предыдущем учебном сценарии, который занимался углублением в папки, мы использовали сам объект Folder, что было проще. Но в данном сценарии нам захотелось вывести только часть путевого имени После папки Мои документы, поэтому отслеживалась только часть строки, а для создания фактического полного пути, когда это было нужно методу GetFolder, использовался метод BuildPath Самой запутанной частью данного сценария является поиск музыкальной папки. Предполагается, что объект WScrip предоставляет независимый от типа применяемой операционной системы метод получения пути к специальным папкам, но ему неизвестно, как найти папку Моя музыка (Music). Хуже того, в ХР папка Моя музыка (My Music) является подпапкой внутри папки Мои документы (My Documents), а в Vista эта папка называется Моя музыка (Music) и не является подпапкой внутри папки Мои документы (Documents), а входит в состав папки профиля пользователя, которая находится рядом с папкой Мои документы (Documents). Оператор fso. BuildPath(shl. SpecialFolders("MyDocuments"), "My Music") работает в ХР, но не работает в Vista. Поэтому сценарий сначала пробует работать с именем и местом, которые используются в Vista, и если папка не будет найдена, пробует найти ее там, где она бывает в ХР. Сценарий выводит список примерно такого вида:
