Страница: 1 |
Страница: 1 |
Вопрос: Файлы папки
Добавлено: 21.02.09 19:32
Автор вопроса: $@ny@PG | ICQ: 468469477
Дан адрес папки и 2 TextBox как в первый TextBox вывести список папок а во второй список файлов?
Ответы
Всего ответов: 13
Номер ответа: 1
Автор ответа:
Aston
ICQ: 214-179-991
Вопросов: 42
Ответов: 272
Профиль | | #1
Добавлено: 21.02.09 21:04
Слегка не понятен вопрос. Указан адрес папки и тебе надо вывести список папок входящих в эту папку и список файлов входящих в эту папку?
Номер ответа: 2
Автор ответа:
Боцман
ICQ: 295725312
Вопросов: 53
Ответов: 830
Web-сайт:
Профиль | | #2
Добавлено: 21.02.09 21:18
Возможно тебе нужен метод рекурсии. Он где-то в примерах был, ищи по слову рекурсия.
Номер ответа: 3
Автор ответа:
Ra$cal
ICQ: 8068014
Вопросов: 18
Ответов: 817
Web-сайт:
Профиль | | #3
Добавлено: 21.02.09 22:07
рекурсии не надо. только проверка пути на директорию и все. тут ни слова про вложенные папки.
Номер ответа: 4
Автор ответа:
fAndOrIn
Вопросов: 5
Ответов: 344
Профиль | | #4
Добавлено: 21.02.09 23:06
Dim FN
FN = Dir(P & "\*.*", vbDirectory)
While FN <> ""
If (GetAttr(P & "\" & FN) And vbDirectory) = vbDirectory Then TextBox1 = TextBox1 + vbLf + FN
FN = Dir
Wend
FN = Dir(P & "\*.*", vbNormal)
While FN <> ""
TextBox2 = TextBox2 + vbLf + FN
FN = Dir
Wend
End Sub
С наступающим всех!!!
Номер ответа: 5
Автор ответа:
Sharp
Лидер форума
ICQ: 216865379
Вопросов: 106
Ответов: 9979
Web-сайт:
Профиль | | #5
Добавлено: 22.02.09 03:31
И зачем столько писать...
Номер ответа: 6
Автор ответа:
fAndOrIn
Вопросов: 5
Ответов: 344
Профиль | | #6
Добавлено: 22.02.09 07:48
Я убью тебя, лодочник..! Ну да, да! Конечно же здесь только один ГЕНИЙ, и это явно не фандорин...
Номер ответа: 7
Автор ответа:
Sharp
Лидер форума
ICQ: 216865379
Вопросов: 106
Ответов: 9979
Web-сайт:
Профиль | | #7
Добавлено: 22.02.09 18:14
Его зовут Дункан Маклауд!
Номер ответа: 8
Автор ответа:
Winand
Вопросов: 87
Ответов: 2795
Web-сайт:
Профиль | | #8
Добавлено: 23.02.09 00:02
на каком диалекте бейсика пишем?)
Номер ответа: 9
Автор ответа:
Sharp
Лидер форума
ICQ: 216865379
Вопросов: 106
Ответов: 9979
Web-сайт:
Профиль | | #9
Добавлено: 23.02.09 00:44
На "джаве"!
Номер ответа: 10
Автор ответа:
Winand
Вопросов: 87
Ответов: 2795
Web-сайт:
Профиль | | #10
Добавлено: 23.02.09 01:03
"джава" - это тот самый диалект бейсика, который неправильный СИ. Не люблю.
Номер ответа: 11
Автор ответа:
Artyom
Разработчик
Вопросов: 130
Ответов: 6602
Профиль | | #11
Добавлено: 23.02.09 01:57
Нифига не понимаю...
То ли Sharp - виртуал EROS'а
То ли EROS - виртуал Sharp'а
Но точно одно из двух
Номер ответа: 12
Автор ответа:
Sharp
Лидер форума
ICQ: 216865379
Вопросов: 106
Ответов: 9979
Web-сайт:
Профиль | | #12
Добавлено: 23.02.09 06:45
Черт, нас раскусили!
Номер ответа: 13
Автор ответа:
$@ny@PG
ICQ: 468469477
Вопросов: 71
Ответов: 196
Профиль | | #13
Добавлено: 23.02.09 19:50
Спасибо отлично работает!