powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Как в FileSearch перебрать и директории тоже...
8 сообщений из 8, страница 1 из 1
Как в FileSearch перебрать и директории тоже...
    #32705528
Fixin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Оно мне выдает список всех файлов, даже в подпапках, очень хорошо, но мне хочется еще и список всех поддиректорий поиметь...
Помогите, плиз...
...
Рейтинг: 0 / 0
Как в FileSearch перебрать и директории тоже...
    #32706234
v-metallic
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Думаю, что можно так:

Dim fName as String

fName=Dir("C:\WINDOWS\", vbDirectory)
If (GetAttr("C:\WINDOWS\" & fName) And vbDirectory) = vbDirectory Then
' Это каталог
End If

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
Dim fName as String

fName=Dir("C:\WINDOWS\", vbDirectory)
If (GetAttr("C:\WINDOWS\" & fName) And vbDirectory) = vbDirectory  Then
 ' Это каталог 
End If


Насчет завершающего слеша в указании пути не уверен: я это не проверял
...
Рейтинг: 0 / 0
Как в FileSearch перебрать и директории тоже...
    #32707802
Fixin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Понимаете, он мне не выдает в поиске имена директорий - только имена файлов... Вот в чем беда!
...
Рейтинг: 0 / 0
Как в FileSearch перебрать и директории тоже...
    #32707845
Фотография Лифчик
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Можно посмотреть в хелпе про этот объект
Application.FileSearch.SearchFolders
...
Рейтинг: 0 / 0
Как в FileSearch перебрать и директории тоже...
    #32707855
YBW
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
YBW
Гость
берите полный путь (Path) и отрезайте лишнее если нужна директория
...
Рейтинг: 0 / 0
Как в FileSearch перебрать и директории тоже...
    #32709384
Fixin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ЛифчикМожно посмотреть в хелпе про этот объект
Application.FileSearch.SearchFolders

В этом свойстве указывается, в каких папках искать, это не то, мне нужен сам список папок....
...
Рейтинг: 0 / 0
Как в FileSearch перебрать и директории тоже...
    #32709386
Fixin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
YBWберите полный путь (Path) и отрезайте лишнее если нужна директория

Дык это понятно, хочется по человечески...
К тому же она тьму файлов выдает при рекурсивном поиске, одна и та же директория будет фигурировать сто раз...
...
Рейтинг: 0 / 0
Как в FileSearch перебрать и директории тоже...
    #32709448
Фотография Лифчик
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Fixin YBWберите полный путь (Path) и отрезайте лишнее если нужна директория

Дык это понятно, хочется по человечески...
К тому же она тьму файлов выдает при рекурсивном поиске, одна и та же директория будет фигурировать сто раз...Дык запомнить ее один раз, и все дела. Похоже, негде в виндах про список директорий справиться :(
...
Рейтинг: 0 / 0
8 сообщений из 8, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Как в FileSearch перебрать и директории тоже...
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]