عدم ترك اي حقل فارغ وفي حال ترك حقل فارغ لاينتقل الى النموذج الفرعي الا بعد تعبئه هذا الحقل

بانتظار الحل وفقكم ربي

السلام عليكم

قد ينفع الكود التالي في طلبك

مثال:

في حدث on lost focus

if isnull (text5) then
me.text5.setfocus
msgbox " الحقل فارغ "
end if

اضافة الى ذلك في تنسيق الجدول

الحقول كلها في تنسيقها ضع:

Required: yes

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

كما ارجو من الاساتذة تقديم النصح اذا لم يكن الجواب نموذجياً كوني مبتدئ ولا ادعي المعرفة

تقبل تحياااتي

نعم

فى خصائص الحقل

خاصية " مطلوب"

اختر

نعم

بارك الله بكم جميعا اخواني الكرام

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

Private Function zaNoEmptyTextbox()
Dim ctl As Control

For Each ctl In Me.Controls
If TypeName(ctl) = "TextBox" Then
If IsNull(ctl) Or ctl = "" Then
           MsgBox "فارغا " & ctl.name & " اخي الكريم .. لقد تركت حقل  "
           DoCmd.CancelEvent
            ctl.SetFocus
            Exit For
    End If
    End If

Next ctl
End Function

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

وسيكون استدعاء الوظيفة في اي حدث كالتالي

Call zaNoEmptyTextbox

za-fahad.rar

بالتوفيق

sweety78

ابو لميس

زهره

الله يجزاكم خير ويرفع قدركم يااخوان ويزيدكم من قدره

اختي زهره لدي سؤال من بعد اذنك

الرساله التي تظهر تقول ان الحقل hawea.id_general هل بالامكان ان استغني عنها واخليها تظهر لي اسم الحقل على سبيل المثال الرقم العام وهكذا مع البقيه وتكون الرساله ذات شكل مناسب !

وجزاك الله خير

اخي الفاضل : فهد

كل شيء ممكن عمله بالأكسيس

za-fahad-UP.rar

بالتوفيق

ماشاء الله لاقوة الا بالله

بارك الله لك في علمك وعملك

في كل مرة يسح المرأ بأنه قد تقدم وتعلم، ولكن عندما يشاهد ابداعات الآخرين يكتشف انه مازال مبتدئ

نشكر الاستاذة زهرة على حلولها السلسة وتواصلها الدائم

اختي زهره الله يخلي لك شهد وخوانها

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

لاعدمناك اختي

اختي ممكن استفسار الرساله لم تخرج لدي لا اعلم هل المشكله من عندي ام لا

فـــهـــد كتب:

اختي زهره الله يخلي لك شهد وخوانها

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

لاعدمناك اختي

اختي ممكن استفسار الرساله لم تخرج لدي لا اعلم هل المشكله من عندي ام لا

اخي الفاضل : فهد

تأكد بأنك حملت الملف الأخير za-fahad-UP.rar وبأنك قمت بفك الضغط عنه وفتح نفس الملف وليس ملف آخر لأن التعديلات الأخيره هي فقط في الملف الأخير

بالتوفيق

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

هلا اختي نفس المرفق الاخير تم تحميله جزاك الله خير لكن لم يتغير شئ

بانتظارك اختي زهره

سبحان الله والحمدلله والله اكبر

اخي الفاضل : فهد

يبدو ان لديك مشكلة ما في برنامج الأكسيس

ولكن لا تقلق فكل مشكلة لها حل بإذن الله

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

za-fahad-Last.rar

بالتوفيق

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

لكن عدلت على ملفك باني جعلت الحقول مطلوبه جميعا ولكن مازالت الرساله تخرج لدي ولا اعلم هل المشكله عندي ام لا

بانتظار ردك لي اختي ام عهود

فـــهـــد كتب:

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

لكن عدلت على ملفك باني جعلت الحقول مطلوبه جميعا ولكن مازالت الرساله تخرج لدي ولا اعلم هل المشكله عندي ام لا

بانتظار ردك لي اختي ام عهود

بارك الله بك اخي الكريم فهد

نعم هناك عهود الكبيره و شهد الصغيره ( اللهم احفظهما بحفظك يا كريم )

استخدم الملف الأخير za-fahad-Last.rar بدون ان تعدل فيه اي شيء لأنني اعتقد ان برنامج الأكسيس لديك يحتاج الى تحديث

بالتوفيق

الله يفرحك فيهم وانا واخوك

لحد الان المشكله باقيه وهذي هي الصورهـ واتمنى المساعده جزاك الله خير لاني بحاجه لذلك العمل

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

اخي الفاضل فهد

هذه الرسالة الأخيرة لا علاقة لها بما نتحدث عنه او عن موضوعنا الأساسي

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

اما موضوعنا فهو عدم ترك اي حقل فارغ وليس رقم مكرر في الفهرس

بالتوفيق

المشكله وانا واخوك الان ولا رساله تظهر الا هذي الرساله

هلا اختي الان ولا رساله تظهر لي وينتقل من النموذج الرئيسي الى الفرعي بدون اجبار المستخدم على تعبة الحقول

حسنا اخي الكريم : فهد

اترك جهازك جانبا وخذ هذا الملف بالذات واذهب الى اي جهاز آخر سواء جهاز العمل او جهاز في شبكه او في مقهى انترنت وقم بتشغيله على اي اصدار سواء 2000 او 2003 او 2007 او 2010 وانظر الى النتيجة ستجد النتيجة كما شرحتها لك بالصور في المشاركات السابقه

مما يعني ان برنامج الأكسيس لديك في الجهاز اما يحتاج الى تحديث النسخة او حذف نسخة الأوفيس التي لديك وتثبيت نسخة جديده سواء 2003 او 2007 او 2010

بالتوفيق

اولا الله يجزاك خير على سعه صدرك اختي زهره

والان سوف ابحث عن نسخه 2003 وانزله بجهازي

واذا لم يحالفني الحظ سوف انزله على جهازي بالعمل

واعطيك الخبر والمعذره على الاطاله اختي

اهلا اختي زهره يعطيك العافيه ولاهنتي اختي

جربت البرنامج لكن للاسف نفس المشكله

مع العلم اني جربت على عده اجهزه ولكن لم تخرج لدي الرساله

بالنسبه للتعديل الاخير اللي باسم za_fahadlast فانه يتم الانتقال الى الحقول الفرعيه بدون اجبار المستخدم على تعبئه الحقول في النموذج الرئيسي

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

ايضا نسخه office مصرحه من موقع ميكروسوفت ونسخه اصليه

هذا تجربتي وانا واخوك في اكسس 2007

لكن هل استطيع ان اجعل الرساله تظهر على اكسس 2003 هذا مع بعض التعديلات وجزاك الله خير

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

لدي استفسار ماهو tag