как отобразить в dbgrid результат выполнения commandText двух adodataset? - БД в Delphi

Гузель · 13.08.2008, 15:13

Помогите, будьте добры!Долго мучаюсь уже.

Stilet · 13.08.2008, 15:46

Ну запрос приложи (третий) который будет получать данные из этих двух adodataset...
А вообще что там за запросы, и почему их нельзя обьединить в один?

Гузель · 13.08.2008, 16:17

С помощью adodataset осуществляется запрос к книге excel

const
ConStr =
'Provider=Microsoft.Jet.OLEDB.4.0;' +
'Data Source=%s;' +
'Extended Properties="Excel 8.0;HDR=Yes;";';
var
Conn: TADOConnection;
...
потом
Conn.ConnectionString := Format(ConStr,[ExpandFileName('DbDemos.xls')]);
Conn.Open;

ADODataSet1.CommandText :=
'select * from [Лист1$]'#10 +
'where [HireDate] >= #01/01/1994#';
ADODataSet1.Open;
Насколько я поняла одним датасетом можно обратится только к одной книге, а мне необходимо из нескольких книг показать поля в одной таблице.

13.08.2008, 15:46	#2
Stilet Белик Виталий :) Старожил Регистрация: 23.07.2007 Сообщений: 57,097	Ну запрос приложи (третий) который будет получать данные из этих двух adodataset... А вообще что там за запросы, и почему их нельзя обьединить в один? I'm learning to live...

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
2 проблемы: вставка в ADODataset и с ADOQuery	Шани	БД в Delphi	18	23.07.2008 20:38
ADOCommand1.CommandText	Черничный	БД в Delphi	3	03.07.2008 12:11
ошибка CommandText does not return a result set	furstenberg	БД в Delphi	2	04.02.2008 17:38
отобразить query в 3-х dbgrid	Nuts	БД в Delphi	0	03.09.2007 18:19
idudpserver+mssql+adodataset	vodila	БД в Delphi	1	11.08.2007 09:56

13.08.2008, 15:13	#1
Гузель Новичок Джуниор Регистрация: 13.08.2008 Сообщений: 2	как отобразить в dbgrid результат выполнения commandText двух adodataset? Помогите, будьте добры!Долго мучаюсь уже.

13.08.2008, 16:17	#3
Гузель Новичок Джуниор Регистрация: 13.08.2008 Сообщений: 2	С помощью adodataset осуществляется запрос к книге excel const ConStr = 'Provider=Microsoft.Jet.OLEDB.4.0;' + 'Data Source=%s;' + 'Extended Properties="Excel 8.0;HDR=Yes;";'; var Conn: TADOConnection; ... потом Conn.ConnectionString := Format(ConStr,[ExpandFileName('DbDemos.xls')]); Conn.Open; ADODataSet1.CommandText := 'select * from [Лист1$]'#10 + 'where [HireDate] >= #01/01/1994#'; ADODataSet1.Open; Насколько я поняла одним датасетом можно обратится только к одной книге, а мне необходимо из нескольких книг показать поля в одной таблице.