Домашняя страница Undo Do Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Справочники

МЕНЮ САЙТА
  • 1
  • 2
  • 3

КАТЕГОРИИ РАЗДЕЛА

ОПРОСЫ
Какой версией Excel Вы пользуетесь?
Всего ответов: 35789
Главная » Справочники » Функции VBA » Функции работы с файлами

Dir

Dir

Функция Dir

Dir [(PathName[, Attributes])]
Dir$ [(PathName[, Attributes])]

Функция Dir служит для проверки существования каталога или файла, отвечающих заданному образцу. Функция поддерживает использование подстановочных знаков для нескольких символов(*) и одиночного символа(?) для указания нескольких файлов. Функция возвращает первое имя файла, имя которого соответствует аргументу PathName. Для получения остальных файлов, имена которых соответствуют PathName, следует повторно вызвать функцию Dir без аргументов. Последовательные вызовы функции без аргументов возможны до тех пор, пока имеются файлы или папки, соответствующие образцу первого вызова(с аргументами)
Примечание: Рекурсивные вызовы функции Dir запрещены

Возвращаемое значение

Функция возвращает данные типа String, структурно представляющего имя файла или папки, которые удовлетворяют указанному шаблону имени файла, набору атрибутов файла или метке тома на диске. Если аргумент PathName не найден, то функция Dir возвращает пустую строку(" ")
Примечание: Если после возврата функцией пустой строки, снова вызвать функцию без аргументов, то возникает ошибка времени исполнения Invalid procedure call or argument

Параметры
PathName
Необязательный аргумент. Строковое выражение, указывающее имя файла. Также может содержать имя каталога или папки и диска. При использовании имен файлов или папок, содержащих пробелы следует использовать дополнительные кавычки - Dir(""C:\Русский Проект\app.exe"") или Dir(Chr(34) & "C:\Русский Проект\app.exe" & Chr(34))
Примечание: Хотя PathName указан, как необязательный аргумент, он обязателен при первом вызове функции, а также в случаях, если задан аргумент Attributes
Attributes
Необязательный аргумент, содержащий константу или числовое выражение, описывающее атрибуты файла. Если этот аргумент опущен, возвращаются все файлы, имена которых удовлетворяют содержимому аргумента PathName. Допустимые значения Attributes
vbNormal=0
Обычное состояние файла.Используется по умолчанию
vbReadOnly=1
Атрибут только для чтения
vbHidden=2
Скрытый атрибут
vbSystem=4
Системный атрибут
vbVolume=8
Метка тома
vbDirectory=16
Каталог или папка
Примечание: Можно также указывать комбинации атрибутов путем их суммирования
Например, vbHidden+vbDirectory выводит скрытые папки
Пример
Dim retval
 ' При наличии выводит WIN.INI
retval=Dir("c:\windows\win.ini") 
Print retval
' Возвращает имя файла с расширением txt
' При наличии нескольких файлов возвращается
' первый найденный файл
retval = Dir("c:\windows\*.txt")
Print retval
Категория
Функции работы с файлами

Счетчики: 14938 | Добавил: Serge_007
Всего комментариев: 0
Добавлять комментарии могут только зарегистрированные пользователи.
[ Регистрация | Вход ]
Яндекс цитирования
© 2010-2016 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!