ثبت لاگ عملیات کلی سیستم. [بایگانی]

حمیدرضاصادقیان

سه شنبه 11 تیر 1387, 09:33 صبح

سلام دوستان.من یک روتین نوشتم که تمام خطاهایی که در برنامه هست رو با تاریخ و ساعت در یک فایل ذخیره میکنه.میخواستم ببینم چطور میتونم این روتینو طوری تغییر بدم که نام فرمی که خطا در اون رخ داده و کاری که طرف انجام داده و اون خطا ایجاد شده رو در اون فایل ثبت کنم.همچنین میخواستم یک روتین دیگه بنویسم که هرکاری کاربر کرد و به هر فرمی که وارد شد و هر تغییر یا کاری کرد در یک فایل دیگه بنویسه.
باتشکر

kamrannazari

چهارشنبه 12 اسفند 1388, 01:31 صبح

هر فرمي از برنامه كه در حال حاضر فعال باشه در آرايه فرم ها عدد صفر رو مي گيره.

If mainForm.MDIChildCount>0 Then
SaveLog(#9#9+'LastForm:'+(MainForm.MDIChildren[0] as TForm).Name);

خوب مي بايست يك Exception براي كل پروژه اضافه كني و بتوني كليه خطاها رو با اون هندل كني

براي لوگ كردن كليه فرمان ها هم مي توني قبل از اجراي هر فرمان sql اون رو در يك متغير ذخيره كني و زماني كه خطا رخ داد آخرين sql رو هم در فايل ذخيره كني البته بايد پس از هر با اجراي موفق فرمان sql مقدار اون متغيير رو خالي كني تا اگر خطا مربوط به sql نبود لوگ نشه.

البته روش ديگه اي هم هست كه مي توني با استافده از trigger ها لوگ ها رو ذخيره كني