Как можно при помощи Recordseta добавлять данные из текстового файла в таблицу?
KV
Дата: 07.06.2004 12:47:19
Как можно при помощи Recordseta добавлять данные из текстового файла в таблицу?
Текстовый файл:
данные1, данные2, данные3
данные1, данные2, данные3
данные1, данные2, данные3
paparome
Дата: 07.06.2004 12:50:22
Не понятно, при чем тут rs?
Чем вам импорт не угодил?
KV
Дата: 07.06.2004 12:54:02
Дело в том, что кроме данных из файла нужно проставлять в таблицу еще Имя папки, и номер файла по расширению(001, 002, 003...)
Hummer
Дата: 07.06.2004 12:58:36
2 KV
Ну и что, сначала импорт данных, потом Update таблицы - или импорт во временную, а потом запросом в основную с дополнительными полями.
В любом случае, быстрее намного, чем по рекордсету ходить в файле с большим кол-вом записей:)
KV
Дата: 07.06.2004 13:00:25
Папка - имя 1, имя2, имя3...
В ней файлы file.001, file.002, file.003...
Нужно добавить в таблицу:
1 1 Данные1 Данные2 Данные3
1 2 Данные1 Данные2 Данные3
1 3 Данные1 Данные2 Данные3
2 1 Данные1 Данные2 Данные3
2 2 Данные1 Данные2 Данные3
2 3 Данные1 Данные2 Данные3
3 1 Данные1 Данные2 Данные3
3 2 Данные1 Данные2 Данные3
3 3 Данные1 Данные2 Данные3
raur
Дата: 07.06.2004 13:15:43
ты через dao или ado хочешь?
marvan
Дата: 07.06.2004 13:17:03
1. Подключить любой текстовый файл, как связанную таблицу.
2. В цикле, перечисляющем текстовые файлы
2.1. Изменить Connection связаной таблицы, на текущее имя файла
2.2. Запрос на добавление из прилинкованной таблицы в результирующую с передачей в качестве парамерта имени файла и вывода его, как значения одного из полей.
2.3. Конец цикла
KV
Дата: 07.06.2004 13:17:37
2 raur
в принципе без разницы, лишь бы работало
raur
Дата: 07.06.2004 13:27:34
на самом деле разница есть,
если через дао то проще:
Dim b As Database
Dim t2 As TableDef
Dim r2 As Recordset
Dim tabl As String
Set b = CurrentDb()
Set t2 = b.TableDefs("...")
Set r2 = t2.OpenRecordset
r2.MoveFirst
While Not r2.EOF
считываешь записи с таблицы
open"...твой файл" for append as #1
write #1, "..."
close #1
wend
KV
Дата: 07.06.2004 13:27:48
2 marvan
Файлы не совсем готовы их нужно еще обрабатывать