Вниз
Скачать: CL | DM;

ADO: из ФОКСА в ДБАЗЕ   Найти похожие ветки 

← →
Алексей   (2004-08-23 12:52) [0]

Имеется запрос из таблиц FOX`a вида (компонент qSour):
select a.pole1,a.pole2,b.pole3 from table1 a,table2 b
where a.pole1=b.pole

Также имеется таблица dBase вида (компонент tDest:
create table_dbase(
id_pole numeric(6,0),
opisanie character(20),
kol_vo numeric (6,0))

Сейчас просто перебираю строки запроса и запихиваю из в таблицу:

while not qSour.Eof do begin
  tDest.Insert;
  tDestid_pole.AsInteger=qSourpole1.AsInteger;
  ...
  tDest.Post;
  qSour.Next;
end;


Вопрос: а нельзя ли эту операцию сделать как нибудь одним махом, а не по одной записи?

P.S.
Вопросик в догонку:
В фоксе прекрасно работает запрос вида:
select .... from .... where .... into table temp_table
в дельфях приходится делать по одной записи, хотя и таблицы-источники и временная таблица - фоксовые.
Запрос insert .... values (select ....) также не проходит.


← →
Некто   (2004-08-24 11:45) [1]

Нашел где-то:
INSERT INTO CardsArchives
  (Code, Move, Date)
   SELECT C_Code, C_Move, C_Date
   FROM Cards
   WHERE C_Date BETWEEN 1.1.98 AND 31.12.98

В таблицу CardArchives добавляется группа записей из таблицы Cards для записей сделанных в течение 1998 года.


← →
Алексей   (2004-08-24 17:49) [2]

Спасибо. С запросом на вставку разобрался. Поздним ночером, после пары пива :-)
Вот бы сделать такое же, но CardsArchives создан в dBase
а Cards в FOX`e



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

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



Память: 0.45 MB
Время: 0.021 c
1-1094016613
Wood
2004-09-01 09:30
2004.09.19
Перемотка страницы


14-1094067102
Sanek_metaller
2004-09-01 23:31
2004.09.19
Где в реестре найти список сервисов?


1-1094462023
tria
2004-09-06 13:13
2004.09.19
Class TListBox not found - в чем смысл этой ошибки?


1-1094559948
Iconka
2004-09-07 16:25
2004.09.19
MDI приложение


14-1093779014
olookin
2004-08-29 15:30
2004.09.19
Завтра стартует Кубок Мира по хоккею...




   Наверх