ali_abbasi22145
شنبه 31 اردیبهشت 1390, 17:40 عصر
سلام
من دستور زیر را در AfterInsert جدول نوشتم اما
procedure TMainForm.ADOTable1AfterInsert(DataSet: TDataSet);
begin
MainForm.LogDBTable.Insert;
MainForm.LogDBTable.FieldByName('user_name').AsStr ing := User_Name;
MainForm.LogDBTable.FieldByName('date').AsDateTime := Now;
MainForm.LogDBTable.FieldByName('action').AsString := 'insert';
MainForm.LogDBTable.FieldByName('employee_number') .AsString :=
MainForm.ADOTable1.FieldByName('employee_number'). AsString;
اما نام کاربر User_Name وتاریخ درج را همان روز یا NOW ,عمل درج Insert را ثبت می کن.
اما شمار کارمندی یا employee_numer را ذخیره نمی کند ! اشکال از چی می تواند باشد یا کد را چگونه تغییر دهم که شماره کارمندی که درج شده چه بوده است؟
من دستور زیر را در AfterInsert جدول نوشتم اما
procedure TMainForm.ADOTable1AfterInsert(DataSet: TDataSet);
begin
MainForm.LogDBTable.Insert;
MainForm.LogDBTable.FieldByName('user_name').AsStr ing := User_Name;
MainForm.LogDBTable.FieldByName('date').AsDateTime := Now;
MainForm.LogDBTable.FieldByName('action').AsString := 'insert';
MainForm.LogDBTable.FieldByName('employee_number') .AsString :=
MainForm.ADOTable1.FieldByName('employee_number'). AsString;
اما نام کاربر User_Name وتاریخ درج را همان روز یا NOW ,عمل درج Insert را ثبت می کن.
اما شمار کارمندی یا employee_numer را ذخیره نمی کند ! اشکال از چی می تواند باشد یا کد را چگونه تغییر دهم که شماره کارمندی که درج شده چه بوده است؟