Поиск по диапазону дат

@Татьянка22 · Регистрация: 23.04.2014

Author24 — интернет-сервис помощи студентам

Программа выдает ошибку синтаксиса(пропущен оператор). Я уже все перепробовала...помогите,пожалуйста.

Delphi

procedure TForm1.N5Click(Sender: TObject);
begin
if Form4.ShowModal=mrOK then
begin
N3.Enabled:=false;
with DataModule2.ADODataSet1 do
begin
Active:=false;
CommandType:= cmdText;
CommandText:='Select * from maindata where DateS>=+DateToStr(Form4.MonthCalendar1.Date)+ and DateS<=+DateToStr(Form4.MonthCalendar2.Date)';
 Active:=true;
 
end
end;
end;

@Streletz · 29.04.2014, 11:50

Если запрос формируется программно, то его составляющие, значения которых берутся из переменных, компонентов и т.д. необходимо выносить за пределы текстовых констант.

Delphi

1	CommandText:='Select * from maindata where DateS>='+DateToStr(Form4.MonthCalendar1.Date)+' and DateS<='+DateToStr(Form4.MonthCalendar2.Date);

Как-то так. Писал прямо на форуме, поэтому без проверки.

@Татьянка22 · 29.04.2014, 11:53 **[ТС]**

Streletz, спасибо,я попробовала.но теперь пишет,что число содержит синтаксическую ошибку в выражении

@Streletz · 29.04.2014, 11:58

Сообщение от Татьянка22

спасибо,я попробовала.но теперь пишет,что число содержит синтаксическую ошибку в выражении

Для начала, с какой СУБД работаете?
Текст запроса из отладчика в студию!

@Татьянка22 · 29.04.2014, 12:03 **[ТС]**

Streletz, с Аксессом.
Мне стыдно,но к сожалению я не умею пользоваться отладчиком...
Если у вас есть время,чтобы посмотреть программу,могу скинуть

@TAZAQ · 29.04.2014, 12:08

Татьянка22, дату через параметры отправляйте, если подобная ошибка будет, то дату в формате гггг.мм.дд отправте

@Streletz · 29.04.2014, 12:27

я не умею пользоваться отладчиком...

1 из самых простых, из числа возможных, способов вывода запроса без отладчика:

Delphi

1	ShowMessage (DataModule2.ADODataSet1.CommandText);

Если нет желания работать с параметрами, хотя, в случае Access, параметрические запросы наиболее оптимальный вариант, то нужный формат даты для подстановки непосредственно в текст запроса #MM/DD/YYYY# (этот же формат иногда помогает если возникают ошибки с параметрическими запросами) или смотрите в сторону DateSerial.

@Татьянка22 · 29.04.2014, 12:33 **[ТС]**

В общем, помогло,когда я дописала:
ShortDateFormat := '#dd/mm/yyyy#';
DateSeparator := '/';
Но мне не нравится,что и символ "#" тоже выводиться

@Streletz · 29.04.2014, 12:42

Сообщение от Татьянка22

Но мне не нравится,что и символ "#" тоже выводиться

Где выводится?
Если Вы выводите запрос на экран, то, как я уже писал выше, для Access это вполне естественно.
Если нет, то ошибку (скрин(ы))в студию!

@Татьянка22 · 29.04.2014, 12:49 **[ТС]**

Сообщение от Streletz

Где выводится?

да,я вывожу запрос на экран. Наверное, и в правду это нормально. Я просто только начала разбираться в Delphi

@Streletz · 29.04.2014, 12:56

Сообщение от Татьянка22

Наверное, и в правду это нормально.

Дело в том, что это действительно нормально.

Запрос выводится именно так как его "воспринимает" Access.

Сообщение от Татьянка22

Я просто только начала разбираться в Delphi

Ничего страшного. Все мы когда-то тоже были новичками

. Если есть желание, то со временем освоитесь...

@Татьянка22 · 29.04.2014, 12:59 **[ТС]**

Streletz, спасибо

@Streletz · 29.04.2014, 13:05

Пожалуйста!

@Татьянка22 1 / 0 / 0 Регистрация: 23.04.2014 Сообщений: 30
	29.04.2014, 12:49 [ТС]	10
	Сообщение от Streletz Где выводится? да,я вывожу запрос на экран. Наверное, и в правду это нормально. Я просто только начала разбираться в Delphi 0

@Татьянка22 1 / 0 / 0 Регистрация: 23.04.2014 Сообщений: 30
	29.04.2014, 11:53 [ТС]	3
	Streletz, спасибо,я попробовала.но теперь пишет,что число содержит синтаксическую ошибку в выражении 0

@Streletz 349 / 262 / 65 Регистрация: 07.04.2014 Сообщений: 1,603
	29.04.2014, 11:58	4
	Сообщение от Татьянка22 спасибо,я попробовала.но теперь пишет,что число содержит синтаксическую ошибку в выражении Для начала, с какой СУБД работаете? Текст запроса из отладчика в студию! 0

@Татьянка22 1 / 0 / 0 Регистрация: 23.04.2014 Сообщений: 30
	29.04.2014, 12:03 [ТС]	5
	Streletz, с Аксессом. Мне стыдно,но к сожалению я не умею пользоваться отладчиком... Если у вас есть время,чтобы посмотреть программу,могу скинуть 0

@TAZAQ 103 / 102 / 51 Регистрация: 28.01.2014 Сообщений: 310
	29.04.2014, 12:08	6
	Татьянка22, дату через параметры отправляйте, если подобная ошибка будет, то дату в формате гггг.мм.дд отправте 0

@Татьянка22 1 / 0 / 0 Регистрация: 23.04.2014 Сообщений: 30
	29.04.2014, 12:33 [ТС]	8
	В общем, помогло,когда я дописала: ShortDateFormat := '#dd/mm/yyyy#'; DateSeparator := '/'; Но мне не нравится,что и символ "#" тоже выводиться 0

@Streletz 349 / 262 / 65 Регистрация: 07.04.2014 Сообщений: 1,603
	29.04.2014, 12:42	9
	Сообщение от Татьянка22 Но мне не нравится,что и символ "#" тоже выводиться Где выводится? Если Вы выводите запрос на экран, то, как я уже писал выше, для Access это вполне естественно. Если нет, то ошибку (скрин(ы))в студию! 0

@Streletz 349 / 262 / 65 Регистрация: 07.04.2014 Сообщений: 1,603
	29.04.2014, 12:56	11
	Сообщение от Татьянка22 Наверное, и в правду это нормально. Дело в том, что это действительно нормально. Запрос выводится именно так как его "воспринимает" Access. Сообщение от Татьянка22 Я просто только начала разбираться в Delphi Ничего страшного. Все мы когда-то тоже были новичками. Если есть желание, то со временем освоитесь... 1

@Татьянка22 1 / 0 / 0 Регистрация: 23.04.2014 Сообщений: 30
	29.04.2014, 12:59 [ТС]	12
	Streletz, спасибо 0

@Streletz 349 / 262 / 65 Регистрация: 07.04.2014 Сообщений: 1,603
	29.04.2014, 13:05	13
	Пожалуйста! 0