منع الادخال اكثر من مرة

[ahmedspcc]

ايه الاخوة الكرم السلام عليكم ورحمة الله وبركاته

وكل عام وانتم بخير وصحة ورمضان كريم

لدي نموذج في خقل تاريخ هذا الحقل يتم ادخل التاريخ الحالي في عند النقر بالمواس مراتين ، ما اريد هو كود يفحص الحقل اذ كان الحقل به قيمه فانه لا يعمل يعطي رسالة بانه لا يمكن ان يتم تعديل الحقل ، واذا كان الحقل فارغ فانه يقوم بتنزيل التاريخ الحالي

مع خالص شكر وتقدير للجميع ولكم اطيب التحية والاحترام.

اخوكم

فراحان منطنط المسروري

[مصلح الحريصي]

هلا بالسيد فرحان أخبارك من زمان لم أشاهد لك مشارك مرحبا بك

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

[ahmedspcc]

اشكرك اخي العزيز / مصلح الحرصي

وكل عام وانت بخير واشكرك من كل قلبي على هذا الترحيب اللطيف ويعلم الله اني احب هذا المنتدى واحب كل القائمين عليه وجميع الاخوة الاعزاز وسلام خاص جداً لا اخي المهندس / محمد طاهر ، ولكن اخي العزيز مصلح ما هو الكود الذي اضعه لحل مشكلتي علماً انني قد بحث ولم اجد مثال الذي اوريد ولا يعني هذا انه لا يوجد في المنتدى ولكن يعني اني لستو بارع في امور كثيرة منها البحث بشكل جيد وعلى كل حال اشكر اخي والشكر موصول للجميع .

اخوك

فرحان منطنط المسوري

[ahmedspcc]

up

[أمجد جمالي]

السلام عليكم

تفضل ضع هذا الكود عند النقر المزدوج للماوس في حقل التاريخ

If IsNull(Me.TxtDate) Then
   Me.TxtDate = DateTime.Day
 Else
   MsgBox "Can't edit record no update permission for " & CurrentUser & "", vbCritical, "Record Flaged"
End If

فقط عدل TxtDate بأسم الخانة في برنامجك بإمكانك ايضاً حماية البيانات من التعديل في النموذج عن طريق هذا الكود

Me.AllowEdits = False

تحياتي