• Registered: 2016-03-10
  • Posts: 291

Re: Журнал учета работы (т.н. логи)

DriveSoft wrote:

Игоревич
Скачал проект снова и я честно говоря запутался, дату удаления пишет в базу, судя по скрипту поле dateofbirth не является датой удаления.

Может я что-то напутал в скрипте, но дату при изменении и создании записи пишет честно (дату создания записи). Делал по вашему скрипту и возможно я что-то напутал. Дату создания записи, при удалении записи. Когда запись была создана.

Игоревич's Website

  • Registered: 2021-03-04
  • Posts: 140

Re: Журнал учета работы (т.н. логи)

Подскажите для MySQL как будет выгляить скрипт для ведения логов что то у меня ругаеться я что то неправильное ввел >?



    procedure Trudoustr_Button5_OnAfterClick (Sender: string);
var
   sCurrentDate: string;
   sID: string;
   sLastName: string;
   sOperation: string;
begin
     sEmpID := IntToStr(Trudoustr.Button5.dbGeneralTableID);
     sCurrentDate := '"' + FormatDateTime('ddmmyyyy hh:nn:ss.000', now) + '"';
     sLastName   := '"'+Trudoustr.edLastName.Text+'"';

     if sLastActionForm = 'NewRecord' then sOperation := '"Новая запись"';
     if sLastActionForm = 'ShowRecord' then sOperation := '"Изменение записи"';

     SQLExecute ('INSERT INTO logs (username, date, operation, id_emp, lastname)' +
     'VALUES ('+ sUserName +',' +sCurrentDate+','+sOperation+','+sEmpID+')');
     Logs.TableGrid1.dbUpdate;
end;


база на mysql и ругаеться на вторую строчку мол что то с датой синтаксис неверный.....:(