Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

SQL запрос [D7, Paradox]

Chechen © (2004-04-28 02:20:00)
Народ помогите !!!
Дана таблица с четырмя столбцами нужно зделать выборку по двум столбцам по одному могу по двум слабо.

Кусок выборки по одному столбцу на 100% табочий

var
mes: string;
begin
mes:=InputBox('Зан.мест за месяц','Введите месяц', '');
if mes <> ''
then
begin
with form1.Query1 do
begin
Close;
SQL.Clear;
SQL.Add('SELECT den, mes, svob, zan');
SQL.Add('FROM ":Aeroport:aer.db"');
SQL.Add('WHERE');
SQL.Add('(mes = "'+ mes + '")');
SQL.Add('ORDER BY den, mes');
Open;
end;
if Query1.RecordCount <> 0 then
DataSource1.DataSet:=Query1
else begin
ShowMessage('В БД нет записей, удовлетворяющих запросу.');
DataSource1.DataSet:=Table1;
end;

как зделать из этого выборку по двум столбцам

var
mes: string;
Den: string;
begin
den:=InputBox('Своб.мест по числу','Введите день', '');
mes:=InputBox('Своб.мест по числу','Введите месяц', '');

а как дальше???
Спасите пожалуйста!!!

RayRom (2004-05-04 15:57:00) [1]
Не за что, рад был помочь!!!

Chechen (2004-05-04 00:38:00) [2]
спасибо тебе RayRom

RayRom (2004-05-01 18:08:00) [3]

> SQL.Add('SELECT den, mes, svob, zan');
> SQL.Add('FROM ":Aeroport:aer.db"');
> SQL.Add('WHERE');
> SQL.Add('(mes = "'+ mes + '")');
> SQL.Add('ORDER BY den, mes');

Ставиш :

SQL.Add('(mes = "'+ mes + '") and (den = "' + den + '")');

Chechen (2004-04-30 20:05:00) [4]
Спасибо конечно за помошь ЮЮ
Но у меня че то не получается

ЮЮ (2004-04-30 02:49:00) [5]
>Помогите пожалуста

А тебе что, разве не ответили? См.[1]

Chechen (2004-04-30 01:17:00) [6]
Помогите пожалуста

Chechen (2004-04-29 00:14:00) [7]
Это типо мое домашнее задание
>>З.Ы. Это какой аэропорт следует обходить стороной ? :-)
Не летайте народ в крым!!!

ЮЮ (2004-04-28 02:44:00) [8]
WHERE (mes = ... ) and (den = ...)

З.Ы. Это какой аэропорт следует обходить стороной ? :-)

Наверх

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