|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
SQL запрос между 2 датами
Приветствую всех, у меня сложная ситуация.
Задача: Сделать запрос с выполнением работ за какой-то определённый период времени (то есть по 2 дата...между 2 датами найти выполненые работы)...вот тока как сюда и условие про работы вписать даже не представляю.... Но данный запрос выдает ошибку и не работает http://s017.radikal.ru/i425/1112/f4/99ad02838ba4.png Код:
Data_Module_0.ADOQuery_Priem.Close; Data_Module_0.ADOQuery_Priem.SQL.Clear; Data_Module_0.ADOQuery_Priem.SQL.Add('SELECT * FROM Priem WHERE DatePay Between and '''+DateToStr(trunc(DateTimePicker1.Date))+''' and '''+DateToStr(trunc(DateTimePicker2.Date))+''''); Data_Module_0.ADOQuery_Priem.ExecSQL; Data_Module_0.ADOQuery_Priem.Open; Помоги пожалуйста решить данную проблему. Заранее спасибо |
#2
|
||||
|
||||
следи за синтаксисом
Некоторые программисты настолько ленивы, что сразу пишут рабочий код. Если вас наказали ни за что - радуйтесь: вы ни в чем не виноваты. |
#3
|
|||
|
|||
Осталась тока одна проблема. Как добавить условие для поиска ещё по какому-нибудь полю в таблице.
С датами по диапазону получилось вот так и работает: Код:
//Функция DateToSQLStr function DateToSQLStr(Date : TDate) : String ; var d, m, y : word ; begin DecodeDate(Date, y, m, d) ; Result := IntToStr(d)+'/'+IntToStr(m)+'/'+IntToStr(y) ; end ; //Запрос на показ диапазона между 2 датами Data_Module_0.ADOQuery_Priem.Close; Data_Module_0.ADOQuery_Priem.SQL.Clear; Data_Module_0.ADOQuery_Priem.SQL.Text := 'SELECT * FROM Priem WHERE Priem.Data_Priem between #' + DateToSQLStr(DateTimePicker1.Date) + '# and #' + DateToSQLStr(DateTimePicker2.Date) +'#'; Data_Module_0.ADOQuery_Priem.ExecSQL; Data_Module_0.ADOQuery_Priem.Open; Мне нужно добавить вот это условие, но как я не понимаю... Код:
with Data_Module_0 do Begin ADOQuery_Spr_Uslygi.Close; ADOQuery_Spr_Uslygi.SQL.Clear; ADOQuery_Spr_Uslygi.SQL.Add('Select * from Uslugas where Usluga like'''+'%'+Edit_Search.text+'%'+''''); ADOQuery_Spr_Uslygi.Open; end; Последний раз редактировалось Never74, 18.12.2011 в 08:37. |
#4
|
|||
|
|||
Код:
select * from Table1, Table2 where (условие 1) and (условие 2) order by <признак сортировки> |