السلام عليكم ورحمة الله وبركاته
إخواني الأعزاء ... في البرنامج المرفق الأسماء الموجودة في القائمة المنسدلة في النمذوج Basicinfo محولة من الاستعلامNotRecieved
وارغب في أنه عند فتح النموذج وعند عدم وجود أية أسماءفي القائمة المنسدلة يظهر لي رسالة "لا تتوفر حاليا أية اسماء"
وتقبلوا تحياتي،،،
جرّب برنامجك في المرفقات بعد التعديل
ومامن يد إلا يد الله فوقها *** وما من ظالم إلا سيبلى بأظلم
تفضل أخي الكريم | موسوعة الحميدي الذهبية | بأجزائها الثلاثة مع هدية الموسوعة .
بارك الله بك أخي محمد وليد
قد يكون صاحب السؤال يرغب اته اذا قام بوضع علامة صح على اختيار الإسم في الجدول
فسيكون في الإستعلام عدم توفر اسماء
ولهذا نجد ان العدد يكون صفر في الإستعلام ( اي لا يوجد اسماء )
ولذا سوف نستخدم دالة Dcount في هذه الحالة
Private Sub Form_Open(Cancel As Integer)
If DCount("*", "NotRecieved", "name") = 0 Then
MsgBox "لا تتوفر حاليا أية اسماء"
End If
End Sub
جرب بوضع علامة صح في الجدول مقابل اسم موسى ثم افتح الإستعلام ( لن تجد اي اسم )
الآن افتح النموذج وستظهر لك مباشرة الرساله قبل فتح النموذج انه " لا تتوفر حاليا اية اسماء "
وجرب ازالة علامة الصح من الجدول على اي اسم / اسماء وقم بقتح النموذج فلن تظهر الرساله لآن الاستعلام يوجد به عدد من الأسماء
هذا مثالك اخي الكريم بعد التعديل بناء على طلبك
بالتوفيق
السلام عليكم ورحمة الله وبركاته
والله ما أعرف كيف أشكركم يا وجوه الخير .... ألف تحية أخي محمد وليد
وألف تحية لسيدة العطاء الأخت / زهرة
بوركتم جميعا والموضع ميه في الميه
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…
