VPF::помогите с SQL -запросом - Форум программистов

Veniamin

Дата 15.5.2008, 23:09 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 44
Регистрация: 3.3.2005

Репутация: нет
Всего: нет

база в Access, приложение на Delphi соединено через ADO. Хочу сделать запрос на вывод всех записей из главной таблицы в которых кабинеты следующие 211, 213. Пишу следующее:

Код


DM.QRep1.Active:=false;
      DM.QRep1.SQL.Clear;
      DM.QRep1.SQL.Add('SELECT * FROM [главная таблица]');
      DM.QRep1.SQL.Add('WHERE кабинет IN (211,213)');
      DM.QRep1.Active:=true;
      FindResultForm.ShowModal;

При выполнении запроса выводится следующее: Несоответствие типов данных в выражении условия отбора. В чём причина?

А если писать так:

Код


DM.QRep1.SQL.Add('WHERE кабинет IN ('211','213')');

то выводится след.ошибка : Missing operator or semicolon

В главной таблице все поля имеют тип текстовый, кроме номера, он имеет тип - счётчик.

Проверил в Query Analyzer-е SQL-Server 2000 подобный запрос

Код


SELECT * FROM Main WHERE product IN ('хлеб', 'пиво');

- всё работает, выводит все поля с заданным условием, а с Access что не так?

Это сообщение отредактировал(а) Veniamin - 15.5.2008, 23:27

Deniz

Дата 16.5.2008, 06:26 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1251
Регистрация: 16.10.2004
Где: Новый Уренгой

Репутация: 8
Всего: 44

Dimich, DimW, а почему не попробовать вместо:

Код

select ... where ...
  and (tblostatok.idoperator, tbldate.fldate) in
(
select tblostatok.idoperator, max (tbldate.fldate) fldate
from tbldate, tblostatok
where tbldate.dateid = tblostatok.dateid
  and tbldate.fldate <= :p_date
group by tblostatok.idoperator
)

Код

select ... where ...
  and tbldate.fldate in
(
select max (tbldate.fldate) fldate
from tbldate, tblostatok  ost2
where tbldate.dateid = tblostatok.dateid
  and tbldate.fldate <= :p_date
  and ost2.idoperator = tblostatok.idoperator
)

Добавлено через 1 минуту и 46 секунд
Veniamin, создай новое сообщение.

--------------------

"Для того чтобы сделать шаг вперед, достаточно пинка сзади" (с)

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Базы данных и репортинг \| Следующая тема »