Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 23.11.2009, 07:50   #1
Oleg Romanchuk
Ghost
Форумчанин
 
Аватар для Oleg Romanchuk
 
Регистрация: 16.08.2007
Сообщений: 143
По умолчанию SQL запрос

Всем привет, помогите разобраться в SQL запросе. Нужно что бы была выборка в конкертной организиции по датам, сечас почему то эта часть кода не работает Organization.key1=1


Код:
DataModuleBase.OtchetQuyery.Active:=false;
DataModuleBase.OtchetQuyery.SQL.Clear;
DataModuleBase.OtchetQuyery.SQL.Add('SELECT * FROM Dannie, Organization ');
DataModuleBase.OtchetQuyery.SQL.Add('Where Organization.key1=1 AND((Date>=:D1)AND(Date<=:D2))');
DataModuleBase.OtchetQuyery.Parameters.ParamByName('D1').Value:='01.01.2009';
DataModuleBase.OtchetQuyery.Parameters.ParamByName('D2').Value:='01.03.2009';

DataModuleBase.OtchetQuyery.Active:=true;

Последний раз редактировалось Oleg Romanchuk; 23.11.2009 в 07:59.
Oleg Romanchuk вне форума Ответить с цитированием
Старый 23.11.2009, 08:59   #2
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Во-первых: Без Бд трудно что-то сказать
Во-вторых: Where (Organization.key1=1) - так надежнее
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 23.11.2009, 09:42   #3
Oleg Romanchuk
Ghost
Форумчанин
 
Аватар для Oleg Romanchuk
 
Регистрация: 16.08.2007
Сообщений: 143
По умолчанию

Цитата:
Сообщение от Stilet Посмотреть сообщение
Во-первых: Без Бд трудно что-то сказать
Во-вторых: Where (Organization.key1=1) - так надежнее
БД в Accses'e

Уже сам разобрался! Вот код если кому то интерестно:

Код:
st1:=DataBeginEdit.Text;
st2:=DataEndEdit.Text;

DataModuleBase.OtchetQuyery.Active:=false;
DataModuleBase.OtchetQuyery.SQL.Clear;
DataModuleBase.OtchetQuyery.SQL.Add('SELECT * FROM Dannie, Organization, Pribori ');
DataModuleBase.OtchetQuyery.SQL.Add('Where Organization.NameOrg LIKE :STR1 AND((Date>=:D1)AND(Date<=:D2)) AND Organization.key1=Pribori.LinkKey AND Organization.key1=Dannie.LinkKey2 ');

DataModuleBase.OtchetQuyery.Parameters.ParamByName('STR1').Value:=Str;
DataModuleBase.OtchetQuyery.Parameters.ParamByName('D1').Value:=st1;
DataModuleBase.OtchetQuyery.Parameters.ParamByName('D2').Value:=st2;

DataModuleBase.OtchetQuyery.Active:=true;
Oleg Romanchuk вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Создание новых таблиц в MS SQL SERVERE через SQL запрос в Delphi S_Yevgeniy Помощь студентам 1 27.10.2009 06:26
Sql запрос KrPr SQL, базы данных 4 14.10.2009 11:19
SQL запрос + SQL запрос BeSeech Microsoft Office Access 10 14.02.2009 17:04
SQL запрос SERG1980 БД в Delphi 6 19.10.2007 23:03
SQL запрос на основе другого SQL запрса... Timoxa БД в Delphi 1 07.01.2007 18:15