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

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

ADOQuery [D5]


Vikuksa ©   (2002-08-20 15:43:00) 

txt := "SELECT DatePart("mm",[Входящие]![Дата_поступления]) AS months, Count([Входящие]![Дата_поступления]) AS Количество "+
"FROM Входящие WHERE (([Входящие]![Входящий_кому] ="10") AND (Входящие.Год=Year(Date())) AND "+
"((DatePart("mm",[Входящие]![Дата_поступления])>=DatePart("mm","""+data1+"""))and (DatePart("mm",[Входящие]![Дата_поступления])<=DatePart("mm","""+data2+""")) ))"+
"GROUP BY DatePart("mm",[Входящие]![Дата_поступления])ORDER BY DatePart("mm",[Входящие]![Дата_поступления]);";
ADOQuery.SQL.text := txt;

после ADOQuery.Open;
выдается: Invalid procedure call
ЧТО ЕТО???


SaS13   (2002-08-20 16:19:00) [1]

попробуй так:
txt := "SELECT DatePart(""mm"",[Дата_поступления]) AS months, Count([Дата_поступления]) AS [Количество] "+
"FROM [Входящие] WHERE [Входящий_кому] =""10"" AND [Год]=Year(Date()) AND "+
"DatePart(""mm"",[Дата_поступления]) >= DatePart(""mm"","""+data1+""") and DatePart("mm",[Дата_поступления]) <= DatePart("mm","""+data2+""") ))"+
"GROUP BY DatePart(""mm"",[Дата_поступления]) ORDER BY DatePart(""mm"",[Дата_поступления])";


Vikuksa   (2002-08-20 16:06:00) [2]

> SaS13 Он на автомате добавляет!


SaS13   (2002-08-20 16:02:00) [3]

Для ACCESS"а дату вводи через символы #:
DatePart("mm",""#"+data1+"#""))


Наверх

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