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

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

Возникла проблема [D7]


KIT ©   (2006-11-19 13:39:00) 

Возникла проблема с построением запроса. Есть запрос: Select * from test where(data >= x1 and data < x2).
Где х1=DateTimePicker1
     х2=DateTimePicker2
Как построить запрос???


MsGuns   (2006-11-19 23:42:00) [1]

Используйте параметры и забудьте про "формат" даты, который может отличаться на разных компах.


KIT   (2006-11-19 22:20:00) [2]

А если запрос
SELECT * FROM test where (data >= x1 00:00:00 and data < x2 23:00:00) INTO OUTFILE 'c:\\1.txt'  FIELDS TERMINATED BY '\t'  LINES TERMINATED BY '\r\n'

А формат даты 2005-01-31


MsGuns   (2006-11-19 17:02:00) [3]

Пардон, для BDE:

 SQL.Text := 'SELECT * FROM "test" WHERE "data" BETWEEN :p1 AND :p2';


MsGuns   (2006-11-19 17:01:00) [4]

Если ADO:

with ADODataSet1 do
 try
  CommandText := 'SELECT * FROM [test] WHERE [data] BETWEEN :p1 AND :p2';
  Parameters.ParamByName('p1').Value := DateTimePicker1.Date;
  Parameters.ParamByName('p2').Value := DateTimePicker2.Date;
  Open;
 except
 end;


Если BDE:

with Query1 do
 try
  SQL.Text := 'SELECT * FROM [test] WHERE [data] BETWEEN :p1 AND :p2';
  ParamByName('p1').AsDate := DateTimePicker1.Date;
  ParamByName('p2').AsDate := DateTimePicker2.Date;
  Open;
 except
 end;


Алхимик   (2006-11-19 15:08:00) [5]

> Есть запрос: Select * from test where(data >= x1 and data
> < x2).

примерно так
SQLStr := 'select  * from test where (data >= '+date1str+' and data < '+date2str+')'
где date1str := DateToStr(DateTimePicker1.Date)
и date2str := DateToStr(DateTimePicker2.Date)


Наверх

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