Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

запрос к двум файлам Excel через ADO [D7, XP]


12 ©   (2010-11-08 15:46:00) 

cnt1: TADOConnection;
   aq1: TADOQuery;

cnt1.connectionString =
Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Program Files\Borland\Delphi7\Projects\Excel_A\
1.xls;
Extended Properties="Excel 8.0"
aq1.connection := cnt1;
aq1.sql.text := 'select [Иванов] from [ЛИСТ3$] a';
aq1.open;
и все хорошо, вот оно все в dbGride видно.

есть
cnt2.connectionString =
Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Program Files\Borland\Delphi7\Projects\Excel_A\
2.xls;
Extended Properties="Excel 8.0"
и тоже самое, все запрашивается

как бы теперь запросить
select a.[Иванов], b.[Иванов]
from [ЛИСТ3$] a, [ЛИСТ1$] b
where a.[Иванов] = b.[Иванов]


Anatoly Podgoretsky   (2010-11-08 16:05:00) [1]

> 12  (08.11.2010 15:46:00)  [0]

Не поможет ли предложение IN в Select
Подробности в справке по JETSQL


Медвежонок Пятачок   (2010-11-08 15:57:00) [2]

проще сделать эту связку в самом ёкселе (одном из) а потом дергать из него.
ибо гетерогенные запросы и адо - вроде не алё


12   (2010-11-08 15:48:00) [3]

да, конечно,
ЛИСТ3$ - из одного файла (1.xls, для определенности)
ЛИСТ1$ - из другого       (2.xls)


Наверх

Титульная страница Поиск, карта сайта Написать письмо