اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

Log File <<<>>>تعقب التعديلات على السجلات


Bluemind

الردود الموصى بها

اخواني الكرام

كنت قد اجبت على موضوع لاحد الاعضاء في منتدى اخر بالامس وهو كيف نقوم بتعقب التعديلات على السجلات من حيث القيمه الاساسية و الجديده و تاريخ و وقت التعديل على السجل و اسم الحقل و رقم السجل و اسم المستخدم الذي قام بالتعديل.ونظرا لوجود كثير من الاستفسارات عن عمل جدول لتعقب التعديلات،

اضع لكم هذا المثال لاثراء هذا الصرح العظيم ، منتدنا ، منتدى اوفيسنا

بالتوفيق

Log File.zip

رابط هذا التعليق
شارك

شكرا اخي على الاجابة

طيب الان فقط اقوم بنقل الوحدات النمطية الى برنامجي لكي افعل هذه العملية ام احتاج الى خطوات اخرى ؟؟

تحياتي

عليك استيراد الوحدات النمطية وكذلك يوجد جدول مخفي اسمه tblAudit

ثمة بعد ذلك قم بانشاء زر على النموذج وسمه اغلاق cmdClose وضع الكود التالي مع تغير اسم الحقل حسب الموجود لديك في النموذج


Dim x As Integer


    If Not IsNull(Me!ID) Then

	    x = WriteAudit(Me, Me!ID)

    End If

    DoCmd.close

اسم الحقل هو ID قم بتغييره في الكود اعلاه الى اسم الحقل الموجودلديك مع مراعاه اخفاء زر الاغلاق من خصائص شاشه النموذج(زر X)

رابط هذا التعليق
شارك

اخي انا الحقل لدي اسمه التسلسل

قمت باستيراد الوحدات النمطية

ووضعت الكود بالشكل التالي على زر الاغلاق


Dim x As Integer


    If Not IsNull(Me!التسلسل) Then

		    x = WriteAudit(Me, Me!التسلسل)

    End If

    DoCmd.Close

ولكن عند الضغط على زر الاغلاق تظهر الرسالة التالية

24-12-2011%2015-46-27.gif

وشكرا

رابط هذا التعليق
شارك

والله يا اخي الموضوع جدا مهم

التعديل الذي ارفقته حضرتك تمام اشتغل معي 100% في المثال المرفق

لكن عند نقله لبرنامجي لاتزال نفس المشكلة كما في الصورة

654.gif

اخوي

اذا نفس رساله الخطاء ، يعني ان اسم الحقل الموجود في الكود لا يوجد في النموذج

تاكد من وجود الحقل تسلسل او اسم الحقل الموجود لديك في الكود في النموذج

اي قم باضافته في النموذج

اوارفق برنامجك لتعديل علية

رابط هذا التعليق
شارك

والله يا اخي الموضوع جدا مهم التعديل الذي ارفقته حضرتك تمام اشتغل معي 100% في المثال المرفق لكن عند نقله لبرنامجي لاتزال نفس المشكلة كما في الصورة 654.gif
اخوي اذا نفس رساله الخطاء ، يعني ان اسم الحقل الموجود في الكود لا يوجد في النموذج تاكد من وجود الحقل تسلسل او اسم الحقل الموجود لديك في الكود في النموذج اي قم باضافته في النموذج اوارفق برنامجك لتعديل علية

اخي قمت باضافة الحقل التسلسل وكما تلاحظ في الصورة هو موجود ومؤشر بالسهم

تحياتي لك

رابط هذا التعليق
شارك

مثال رائع مشكور يا غالي

هذا ما كنت أبحث عنه لإحداث جدول للهيستوري

إلا أن النتائج التي توصلت لها في تلك التجربة لم تكن بتلك المثالية التي كنت أتوخاها

رغم التوصل الى المطلوب إلا أنه كان لها تأثير جانبي على استقرار النماذج

عموما جاري تجربة ما تفضلت به أخي وقبل ذلك أود القول

هل يكفي وضع جدول واحد لمجموعة نماذج مرتبطة بجداول مختلفة أم من المفترض وضع جدول تخزن فيه التعديلات لكل نموذج على حدة أي لكل جدول جدول خاص بتخزين التعديلات ؟

إن كان وضع جدول واحد يكفي يجب مراعاة تحديد الجدول الذي وقع فيه التعديل ومن تم الحقل اضافة الى تاريخ انشاء القيمة الأصلية وتاريخ التعديل عليها وشكرا

رابط هذا التعليق
شارك

  • 2 weeks later...
  • 1 year later...

هل يكفي وضع جدول واحد لمجموعة نماذج مرتبطة بجداول مختلفة أم من المفترض وضع جدول تخزن فيه التعديلات لكل نموذج على حدة أي لكل جدول جدول خاص بتخزين التعديلات ؟

 

إن كان وضع جدول واحد يكفي يجب مراعاة تحديد الجدول الذي وقع فيه التعديل ومن تم الحقل اضافة الى تاريخ انشاء القيمة الأصلية وتاريخ التعديل عليها وشكرا

 

 

 

هنا تكملة للموضوع

http://www.officena.net/ib/index.php?showtopic=45823#entry271553

رابط هذا التعليق
شارك

  • 4 years later...

هل يمكن ان اجعل حفظ التعديلات في جدول اخر ويكون الجور خارجي وليس محلي 

بحيث استطيع ان اتعقب التعديلات التي يقوم بها كافة المسنخدمين المتصلين قاعدة البيانات (D.B)

رابط هذا التعليق
شارك

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information