Sub subFol()
Dim fso As Object, fo As Object, ff As Object
Set fso = CreateObject("Scripting.FileSystemObject")
Set ff = fso.GetFolder("C:\temp")
For Each fo In ff.SubFolders
Debug.Print fo.path
Next
End Sub
Отображение существующих папок
Visual Basic 6.0
Здрасте!
Вопрос: Как можно узнать имена всех существующих папок в заданной папке?
Не нашёл в поиске... Может плохо искал.
Спасибо!
Здрасте!
Вопрос: Как можно узнать имена всех существующих папок в заданной папке?
Не нашёл в поиске... Может плохо искал.
Спасибо!
Плохо искал :)
Не могу найти. Вот такой вот я.... пытался. Честно!!
Ну, не страшно. Тема-то все равно давнишняя
Мда. Ну спасибо за помощь...
Спасибо большое, добрый человек!)
Цитата: AxXxB
Плохо искал :)
Что ж ты, ссылку не увидел? Это ж ссылка была!
Упс. Пардон. Перегрелся видимо...