Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / В директории много файлов / 9 сообщений из 9, страница 1 из 1
03.10.2006, 13:58
    #34028689
Кузнецов Игорь
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
В директории много файлов
Добрый день.
Возникла неожиданная трудность. Мне потребовалось получить в таблицу список всех файлов в директории. Пошел стандартным путем - взял команду ADIR. Но облом: она ответила Array dimension invalid. Стал разбираться, в чем дело. Оказалось, что там лежит столько файлов, что не влезают в массив (т.е. более 13 000). Отсюда вопрос: как еще можно получить список файлов. Достаточно только их имена с расширениями.
...
Рейтинг: 0 / 0
03.10.2006, 14:16
    #34028794
Sergey Ch
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
В директории много файлов
А если DIR TO FILE, затем APPEND FROM в курсор ?
...
Рейтинг: 0 / 0
03.10.2006, 14:26
    #34028838
Кузнецов Игорь
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
В директории много файлов
Команды
DIR * TO FILE
DISPLAY FILES LIKE "*" TO FILE
LIST FILES LIKE "*" TO FILE
выводят список файлов сначала на SCREEN. Причем первые две еще просят подтверждения после заполнения SCREEN'a. К тому же структура файла, в который направляется вывод - непостоянна (зависит от ширины SCREEN'a)

----------------------------------------------
Кто в армии служил - тот в цирке не смеется.
...
Рейтинг: 0 / 0
03.10.2006, 14:32
    #34028858
piva
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
В директории много файлов
Filer из поставки фокса
Scripting.FileSystemObject тоже сгодится
...
Рейтинг: 0 / 0
03.10.2006, 14:43
    #34028885
-=AlexiS=-
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
В директории много файлов
! dir /A-D /B > aaa.txt
...
Рейтинг: 0 / 0
03.10.2006, 15:02
    #34028954
Кузнецов Игорь
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
В директории много файлов
-=AlexiS=-! dir /A-D /B > aaa.txt

Тоже вариант, хоть и DOS-сессия ...

Кстати, а с использованием API слишком сложно будет?
...
Рейтинг: 0 / 0
03.10.2006, 15:18
    #34029042
piva
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
В директории много файлов
Ага - жутко сложно без бутылки не поймешь
Код: plaintext
1.
2.
3.
4.
5.
o=CreateObject("Scripting.FileSystemObject")
loDir=o.GetFolder("C:\WinNT\System32")
loFiles=loDir.Files
For each loFile in loFiles
	? loFile.Name
Next
...
Рейтинг: 0 / 0
03.10.2006, 15:25
    #34029069
ВладимирМ
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
В директории много файлов
Подробнее об использовании Scripting.FileSystemObject в FoxPro смотри здесь

http://kodu.neti.ee/~juri4/vfpplus/vbs_fso_01_ru.htm
...
Рейтинг: 0 / 0
03.10.2006, 15:54
    #34029186
Кузнецов Игорь
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
В директории много файлов
Класс! Спасибо piva и ВладимирМ!
...
Рейтинг: 0 / 0
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / В директории много файлов / 9 сообщений из 9, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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