Скачать: CL | DM;

Как перенести все данные в один файл?   Найти похожие ветки 

← →
sash2   (2003-11-25 10:03) [0]

Есть файлы dbf лежащие в некоторой папке и имещие названия, например: bal1001, bal1002, bal1003 и т. д. ( их всего 12 - ть ).
Цифра 10 - это код предприятия, а 01, 02, 03, ..., 12 - это месяцы. ( т. е. bal1001 - это файл с 10 - го предприятия за 01 месяц ).

Подскажите пожалуйста, как перенести все данные с этих 12 - ти файлов в один файл, например, bal10 ( в этом файле должны быть данные за весе 12 - ть месяцев по данному предприятию ). Файл bal10 находится в отдельной папке.

---

← →
Anatoly Podgoretsky ©   (2003-11-25 10:06) [1]

Copy /?

---

← →
chtr ©   (2003-11-25 10:07) [2]

Подробнее структуру таблиц исходных и чего получить надо

---

← →
Anatoly Podgoretsky ©   (2003-11-25 10:09) [3]

chtr © (25.11.03 10:07) [2]
Структура нужна когда работа будет идти с таблицами, а не с файлами.

---

← →
Babay ©   (2003-11-25 10:11) [4]

Ну открываем по очереди файлы bal1001, bal1002, bal1003 ... пробегаем по всем записям и запихиваем их в bal10.
Решение, что называется в лоб...

---

← →
sash2   (2003-11-25 10:16) [5]

А через компоненты Query можно это сделать?
Например, что нить типа

Insert into bal10 select * from bal1001
Insert into bal10 select * from bal1002
Insert into bal10 select * from bal1003
Insert into bal10 select * from bal1004
...

Если можно, то подскажите как.

---

← →
chtr ©   (2003-11-25 10:19) [6]

Это разово надо сделать, или в программе?

---

← →
sash2   (2003-11-25 10:24) [7]

Это необходимо сделать разово.
Но это нужно делать раз в месяц, именно поэтому и хочу сделать программно.

---

← →
chtr ©   (2003-11-25 10:34) [8]

Я бы в акцессе написал запрос.

---

← →
sash2   (2003-11-25 13:09) [9]

А как это сделать в Delphi?

---

← →
Reindeer Moss Eater ©   (2003-11-25 13:15) [10]

Table1.BatchMove(Query1,batAppend)
Table1.BatchMove(Query2,batAppend)
Table1.BatchMove(Table3,batAppend)

---

← →
sash2   (2003-11-25 13:19) [11]

И как это работает?

---

← →
Reindeer Moss Eater ©   (2003-11-25 13:19) [12]

Бесшумно

---

← →
Reindeer Moss Eater ©   (2003-11-25 13:20) [13]

В Таблице 1 оказываются все записи из наборов Query1,Query2,Table3

---

← →
DenK_vrtz ©   (2003-11-25 13:24) [14]

Reindeer Moss Eater © (25.11.03 13:19) [12], это просто СУПЕР!!! :) Ответ дня, однозначно! :)

---

← →
sash2   (2003-11-25 14:50) [15]

Сапасибо Всем!!!

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.012 c