Показать сообщение отдельно
  #7  
Старый 13.06.2013, 17:48
chudovperyax chudovperyax вне форума
Прохожий
 
Регистрация: 11.06.2013
Сообщения: 9
Версия Delphi: Delphi 2009
Репутация: 10
По умолчанию

Спасибо за помощь! С комбобоксом все прекрасно работало, а вот на дату ругается( Подскажите в чем проблема, пожалуйста, все попробовала.
Вот мой код:
Код:
ADOQuery1.Active:=False;
ADOQuery1.Close;
ADOquery1.sql.Text:= 'SELECT SUM(Perem_zatr.Plan) AS plan, SUM(Perem_zatr.Fact) AS fact FROM ((Perem_zatr INNER JOIN Period_vremeni ON Perem_zatr.ID_vremya=Period_vremeni.ID_vremya)'+
'INNER JOIN Norma_resursa ON Perem_zatr.ID_norma_res=Norma_resursa.ID_norma_res )'+
'INNER JOIN Vid_produkcii ON Norma_resursa.ID_nomenklatura=Vid_produkcii.ID_nom enklatura '+
'WHERE Vid_produkcii.Nomenklatura="' + ComboBox1.text + '"'+
'And (Period_vremeni.Period_vremeni_nach Between #'+ Datetostr(DateTimePicker1.date)+'# And #'+ Datetostr(DateTimePicker2.date)+'#)'+
'And And Period_vremeni.Period_vremeni_kon<=#'+ Datetostr(DateTimePicker3.date) +' #';
ADOQuery1.Open;
ADOQuery1.Active:=True;
end;
Говорит про синтаксическую ошибку, но я не совсем понимаю в чем дело
Ответить с цитированием