чтение текстовых файлов из директории??? / FoxPro, Visual FoxPro

ReSQL.ru

Мобильная версия Контакт Правила FAQ Помощь

Гость

Войти | Регистрация | Профиль | Очистить

Новые сообщения | Избранное

Форумы | Пользователи | Статистика | Мод. лог | Поиск

Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр

Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / чтение текстовых файлов из директории???

13 сообщений из 38, страница 2 из 2

все

чтение текстовых файлов из директории???

#38420663

tanglir

Участник

Сообщения: 30 379

Рейтинг: 0 / 0

авторВ этой фразе объявлено только незнание способа обработки нескольких файлов - не более того.В понятие "способ обработки нескольких файлов" может входить в том числе и получение списка этих самых файлов, не так ли?
Rostislav D. KudryashovХотя выглядит это объявление довольно абсурдно. Если знаешь, как обработать один файл, обрабатывай по очереди каждый следующий как предыдущий.Но если ТС всё же знает, как обработать один файл, и задаёт такой вопрос, то о чём это говорит? Имхо как раз о том, что раз уж ТС умеет обрабатывать файлы по одному, значит, ему не хватает именно возможности получить их список :)

...

Рейтинг:

0 / 0

08.10.2013, 17:23

| Ответить | Цитировать | Написать

чтение текстовых файлов из директории???

#38421789

otorva1

Гость

AndreTM otorva1,

Вы в коде о чём говорите?
Причём - не в собственном коде...
В коде я говорю о том, как можно обработать набор файлов по заданной маске имени. Интересно, а почему вы считаете, что этот код - несобственный?

...

Рейтинг:

0 / 0

09.10.2013, 16:22

| Ответить | Цитировать | Написать

чтение текстовых файлов из директории???

#38423222

grommilitary

Гость

Дед ЕвгенийДа вроде все просто. Вот мой вариант, который я использовал
Парни а как результат выполнения этого кода попадает в таблицу? Для меня это ключевой момент.Изначально сразу нашел как из массива или из файла в таблицу засунуть.А в данном случае как отправить в таблицу??

...

Рейтинг:

0 / 0

10.10.2013, 16:24

| Ответить | Цитировать | Написать

чтение текстовых файлов из директории???

#38423465

otorva1

Гость

grommilitaryДед ЕвгенийДа вроде все просто. Вот мой вариант, который я использовал
Парни а как результат выполнения этого кода попадает в таблицу? Для меня это ключевой момент.Изначально сразу нашел как из массива или из файла в таблицу засунуть.А в данном случае как отправить в таблицу??
************************************************

Код: plaintext

1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.

PRIVATE N, I, dflt_dir, fnm

dflt_dir = 'C:\AAA\'

DIMENSION dir_arr[1]
N = adir(dir_arr, dflt_dir + '*.*')
IF N = 0
  RETURN
ENDIF

SELECT 0
CREATE TABLE ftmp (fname C(254))

FOR I = 1 TO N
  fnm = m.dflt_dir + dir_arr[I,1]
  APPEND BLANK
  REPLACE fname WITH m.fnm
ENDFOR

USE IN ftmp

***************************************
Примерно вот так: сначала считываешь информацию о файлах в массив с помощью ф-ции ADIR, затем создаешь таблицу для имен файлов, потом в цикле добавляешь в эту таблицу по одной записи и заносишь в эту запись следующее имя файла из массива ...

...

Рейтинг:

0 / 0

10.10.2013, 18:56

| Ответить | Цитировать | Написать

чтение текстовых файлов из директории???

#38423616

grommilitary

Гость

Спасиб, разбираюсь...

...

Рейтинг:

0 / 0

10.10.2013, 21:12

| Ответить | Цитировать | Написать

чтение текстовых файлов из директории???

#38423628

grommilitary

Гость

[quot otorva1]grommilitaryпропущено...
Примерно вот так: сначала считываешь информацию о файлах в массив с помощью ф-ции ADIR, затем создаешь таблицу для имен файлов, потом в цикле добавляешь в эту таблицу по одной записи и заносишь в эту запись следующее имя файла из массива ...
В результате выполнения представленного кода имена файлов попадают в таблицу, это я уже давно сделал... а как в Вашем случае в таблицу занести не только имена этих файлов, но и их содержимое??

...

Рейтинг:

0 / 0

10.10.2013, 21:23

| Ответить | Цитировать | Написать

чтение текстовых файлов из директории???

#38423885

tanglir

Участник

Сообщения: 30 379

Рейтинг: 0 / 0

grommilitary,

1)добавляете в таблицу поле типа memo(binary);
2)в том же цикле, в котором забиваете в таблицу имена файлов, забиваете в это поле и их содержимое - либо через filetostr, если файлы небольшие, либо через fopen/fread и т.д, если большие.

...

Рейтинг:

0 / 0

11.10.2013, 05:25

| Ответить | Цитировать | Написать

чтение текстовых файлов из директории???

#38424059

otorva1

Гость

[quot grommilitary]otorva1пропущено...

В результате выполнения представленного кода имена файлов попадают в таблицу, это я уже давно сделал... а как в Вашем случае в таблицу занести не только имена этих файлов, но и их содержимое??

Вот модификация кода, которая добавляет таблицу имена файлов и их содержимое (в мемо-поле):

Код: plaintext

1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.

 [code=vbnet]
*******************************************************************************
PRIVATE N, I, dflt_dir, fnm

dflt_dir = 'C:\AAA\'

DIMENSION dir_arr[1]
N = adir(dir_arr, dflt_dir + '*.*')
IF N = 0
  RETURN
ENDIF

SELECT 0
CREATE TABLE ftmp (fname C(254), fcontent M)

FOR I = 1 TO N
  fnm = m.dflt_dir + dir_arr[I,1]
  APPEND BLANK
  REPLACE fname WITH m.fnm
  APPEND MEMO fcontent FROM (m.fnm) OVERWRITE
ENDFOR

USE IN ftmp
********************************************************************

Здесь не проверяется, что размер файла не превосходит максимального размера мемо-поля ...

...

Рейтинг:

0 / 0

11.10.2013, 10:25

| Ответить | Цитировать | Написать

чтение текстовых файлов из директории???

#38424092

grommilitary

Гость

Спасибо получилось!а есть ли вариант не использовать мемо поле,а построчно заносить содержимое этих файлов в таблицу?Или проще потом из мемополей содержимое уже раскидывать как мне нужно??Файлы большие просто (от 512 кб)

...

Рейтинг:

0 / 0

11.10.2013, 10:55

| Ответить | Цитировать | Написать

чтение текстовых файлов из директории???

#38424144

otorva1

Гость

grommilitaryСпасибо получилось!а есть ли вариант не использовать мемо поле,а построчно заносить содержимое этих файлов в таблицу?Или проще потом из мемополей содержимое уже раскидывать как мне нужно??Файлы большие просто (от 512 кб)
Это уж как для вас удобней - можно и так, и этак. Только структура таблицы для хранения таких файлов должна быть несколько иной, чтобы в ней можно было отразить, какому файлу принадлежат строки и в каком порядке они следуют ...

...

Рейтинг:

0 / 0

11.10.2013, 11:31

| Ответить | Цитировать | Написать

чтение текстовых файлов из директории???

#38424396

grommilitary

Гость

спасибо! подскажите еще плиз пару моментов.не получается организовать дописывание содержимого файлов в созданную таблицу (по криэйт как понятно создается новая таблица),а хотелось бы дописывать (именно дописывать) в уже имеющуюся.как проще это сделать??

...

Рейтинг:

0 / 0

11.10.2013, 13:27

| Ответить | Цитировать | Написать

чтение текстовых файлов из директории???

#38424427

Станислав С...кий

Гость

grommilitary,
Я, конечно, дико извиняюсь, но читали ли Вы хоть что-то для начинающих? Как открыть таблицу, добавить записи...
Я так думаю, что нет. Потому что в противном случае вопросов бы не было...
А ответ на Ваш вопрос таков:

Код: sql

1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.

*Если нет файла, то надо его создать
if !FILE('ftmp.dbf')
CREATE TABLE ftmp (fname C(254), fcontent M)
endif 

* если таблица уже открыта, то используем ее
if used('ftmp')
  SELECT ftmp
else
* Иначе открываем ее для работы
  use ftmp in 0
endif

* Вносим необходимые изменения
FOR I = 1 TO N
  fnm = m.dflt_dir + dir_arr[I,1]
  APPEND BLANK
  REPLACE fname WITH m.fnm
  APPEND MEMO fcontent FROM (m.fnm) OVERWRITE
ENDFOR

* Убираем за собой
USE IN ftmp

...

Рейтинг:

0 / 0

11.10.2013, 13:45

| Ответить | Цитировать | Написать

чтение текстовых файлов из директории???

#38424446

grommilitary

Гость

Спасибо большое!попутно изучаю матчасть в гугле ибо знающих под рукой нет и не будет...

...

Рейтинг:

0 / 0

11.10.2013, 13:54

| Ответить | Цитировать | Написать

13 сообщений из 38, страница 2 из 2

все

Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / чтение текстовых файлов из директории???

Цитировать

Написать

Автор*:

Ввести пароль для входа

Тема*:

Сообщение

Данное сообщение тематическое

Сообщение содержит картинки или видео 18+

Автор:

ВНИМАНИЕ! На данном подфоруме действуют строгие правила. Удостоверьтесь, что ваше сообщение соответствует им!

Форум или тема закрыты для гостей. Необходима авторизация!

Загрузить последнюю сохраненную версию

Вложение:

Вставить как галерею

Максимальный размер вложений: 4,0 МБ, аудио/видео: 8,0 МБ. Картинки большего размера ужимаются, если возможно.

Введите код, изображенный на картинке. Если код нечитаемый, кликните картинку, чтобы загрузить другой вариант.

Отправляя сообщение, я выражаю свое согласие с правилами форума и принимаю пользовательское соглашение.

Читали тему (0):

Читали форум (0):

Пользователи онлайн (0):

start [/forum/topic.php?fid=41&msg=38423885&tid=1582882]:	0ms
get settings:	9ms
get forum list:	13ms
check forum access:	3ms
check topic access:	4ms
track hit:	33ms
get topic data:	8ms
get forum data:	2ms
get page messages:	44ms
get tp. blocked users:	1ms
others:	13ms

total:	130ms