• Registered: 2016-09-28
  • Posts: 112

Topic: Удаление части Лога по условию

Здравствуйте, веду лог работы с базой.

    sCurrentDate := '"' + FormatDateTime('yyyy-MM-DD hh:nn:ss.000', now) + '"';
   
    SQLExecute ('INSERT INTO log_in_out (data, operation, fio)' +'VALUES ('+sCurrentDate+',"ВЫХОД","'+ fioUser +'")');

Структура ЛОГА: data - дата/тайм, и два текстовых поля.

по дате из DateTimePicker1 хочу удалить всче содержимое до указанной даты.

Следующее условие почему-то не работает.

SQLExecute ('DELETE FROM log_in_out WHERE (data < ''' + DateToStr(editAdmin.DateTimePicker1.DateTime) + ''')');

Подскажите в чем причина. Спасибо.

  • Registered: 2014-02-14
  • Posts: 10,294

Re: Удаление части Лога по условию

Приветствую.


Попробуйте так

SQLExecute ('DELETE FROM log_in_out WHERE date(data) <  date(' + editAdmin.DateTimePicker1.sqlDate + ')');
Dmitry.
  • Registered: 2016-09-28
  • Posts: 112

Re: Удаление части Лога по условию

Большое спасибо за помощь и оперативность! Не зря купил эту программу.