Гость
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Импорт большого количества текстовых файлов в базу данных / 14 сообщений из 14, страница 1 из 1
13.09.2019, 09:41
    #39861307
Zafar Z
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Импорт большого количества текстовых файлов в базу данных
Имеется более тысячи текстовых файлов, можно ли реализовать импорт в MS Access или в другую базу данных одним разом все эти файлы?

Файлы состоят из текста:

С:\DB\ 1.txt, 2.txt .... 1500.txt


И в результате должна формироваться база в нижеприведенной структуре :


ID(Integer)

1
2
3
*
1500

Поле 1(text)

данные состоящие из файла 1.txt
данные состоящие из файла 2.txt
данные состоящие из файла 3.txt
данные состоящие из файла *.txt
данные состоящие из файла 1500.txt

Можете также предложить готовые конвертеры для быстрой реализации данной задачи.
...
Рейтинг: 0 / 0
13.09.2019, 10:18
    #39861341
Akina
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Импорт большого количества текстовых файлов в базу данных
Покажите, как выглядят файлы изнутри, и как они должны после выглядеть в таблице (на примере 2-3 файлов).
...
Рейтинг: 0 / 0
13.09.2019, 10:22
    #39861343
Serg197311
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Импорт большого количества текстовых файлов в базу данных
Все файлы в одну папку и
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
Set fso = CreateObject("Scripting.FileSystemObject")
        for i=1 to 1500
            Set txt = fso.OpenTextFile("путь к папке\" & i & ".txt", 1)
            'цикл по строкам txt 
                 Do While Not txt.AtEndOfStream
                     mytext = Trim(txt.ReadLine)
                    ' записываем значение стринга mytext куда нам надо
                  Loop
       next i
...
Рейтинг: 0 / 0
13.09.2019, 10:37
    #39861357
ПЕНСИОНЕРКА
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Импорт большого количества текстовых файлов в базу данных
Serg197311Все файлы в одну папку
обычно действую по схеме
- файлы находятся в своих подкаталогах
- делаю сначала один файл тхт с дополнительным полем имяПорции
- импортирую в рабочую таблицу со структурой , где все поля -текстовые
- контроль на сдвиг(при нескольких полях) и /или допустимость значений
- иногда мелкая правка
- только после этого запись в основную таблицу

-----уж очень текстовики иногда бывают некорректными-----
таким же порядком делаю импорт из множества ексель - файлов
...
Рейтинг: 0 / 0
13.09.2019, 10:44
    #39861364
Serg197311
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Импорт большого количества текстовых файлов в базу данных
ПЕНСИОНЕРКАSerg197311Все файлы в одну папку
обычно действую по схеме
.........
А так и лучше еще
А вообще Akina правильно спросил - кто ж его знает что в тех файлах понаписано.... посмотреть надо сначала....
...
Рейтинг: 0 / 0
13.09.2019, 12:01
    #39861417
Zafar Z
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Импорт большого количества текстовых файлов в базу данных
Akina,
Даже если внутри этих файлов (html файлы) множество конечных строк (или переходных строк) мне надо импортировать один файл в одну запись в одной колонке !
...
Рейтинг: 0 / 0
13.09.2019, 12:02
    #39861422
Zafar Z
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Импорт большого количества текстовых файлов в базу данных
Serg197311,
Это макрос в MS Ассess? , или подскажите в каком языке его использовать?
...
Рейтинг: 0 / 0
13.09.2019, 12:08
    #39861425
Serg197311
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Импорт большого количества текстовых файлов в базу данных
Это кусок кода на VBA(Access,Excell etc.), построчно читающий текстовые файлы с именами от 1.txt до 1500.txt, помещенные в одну папку. Сам по себе работать не будет, его надо прикрутить к нужному месту.
...
Рейтинг: 0 / 0
13.09.2019, 12:09
    #39861426
Akina
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Импорт большого количества текстовых файлов в базу данных
Zafar Z , не понял... Вы хотите ВЕСЬ ФАЙЛ (все 25 килобайт) положить в поле таблицы, что ли? Ну тогда Serg197311 показа всё, что надо. В цикле: Open, ReadAll, Close, INSERT INTO текущего значения счётчика в ID и прочитанного текста в поле MEMO.
...
Рейтинг: 0 / 0
13.09.2019, 12:12
    #39861430
Serg197311
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Импорт большого количества текстовых файлов в базу данных
Ух!!!! почитал файлик! И шо, прям так - в одну ячейку весь текст загнать и все?
...
Рейтинг: 0 / 0
13.09.2019, 12:26
    #39861438
ROI
ROI
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Импорт большого количества текстовых файлов в базу данных
Zafar Z,

А сохранять-то HTML или текст из него?
...
Рейтинг: 0 / 0
13.09.2019, 12:28
    #39861440
ROI
ROI
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Импорт большого количества текстовых файлов в базу данных
Zafar ZДаже если внутри этих файлов (html файлы)
Это как понять?
...
Рейтинг: 0 / 0
13.09.2019, 12:54
    #39861459
ПЕНСИОНЕРКА
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Импорт большого количества текстовых файлов в базу данных
Zafar ZAkina,
Даже если внутри этих файлов (html файлы) множество конечных строк (или переходных строк) мне надо импортировать один файл в одну запись в одной колонке !

https://www.sql.ru/forum/actualfile.aspx?id=21970216] Приложенный файл (view_sanadhoview2882.html - 25Kb)
строк в файле много, но НТМ позволяет работать с одной строкой, сам разбивая файл на подстроки
авторПРАВИТЕЛЬСТВО РЕСПУБЛИКИ ТАДЖИКИСТАН

РЕШЕНИЯ

Об утверждении Государственной программы развития бюджета Республики Таджикистан на 2009-2018 годы

В соответствии со статьей 7 Закона Республики Таджикистан «О государственных прогнозах, концепциях, стратегиях и программах социально-экономического развития Республики Таджикистан» Правительство Республики Таджикистан постановляет:

...
...
председатель

Правительство Республики Таджикистан Эмомали Рахмон
поэтому читаем файл, объединяем подстроки через пробел и записываем результат обработки текущего файла в мемо-поле

Set fso = CreateObject("Scripting.FileSystemObject")
for i=1 to 1500
Set txt = fso.OpenTextFile("путь к папке\" & i & ".txt", 1)
stroka=""
'цикл по строкам txt
Do While Not txt.AtEndOfStream
mytext = Trim(txt.ReadLine)
stroka=stroka & mytext & " "
' записываем значение стринга mytext куда нам надо
Loop
'' а здесь записываем в таблицу

next i
...
Рейтинг: 0 / 0
13.09.2019, 12:57
    #39861463
ПЕНСИОНЕРКА
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Импорт большого количества текстовых файлов в базу данных
Zafar Z,

хотя мемо - поле позволяет иметь внутри себя и служебные символы с кодами 7,10,11,13
...
Рейтинг: 0 / 0
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Импорт большого количества текстовых файлов в базу данных / 14 сообщений из 14, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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