kaser906

بهذه الطريقة لن تصل ولن نصل معك لنتيجة ضع مثال ::بالتوفيق::

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

وعليكم السلام ورحمة الله وبركاتة ضع مرفق ووضح أكثر ::بالتوفيق::

وعليكم السلام ورحمة الله وبركاتة جرب ضع الآمر التالي كأخر حدث عند فتح النموذج Me.Requery Me.أسم النموذج الفرعي .SetFocus ::بالتوفيق::

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

وعليكم السلام ورحمة الله وبركاتة حسب ما أراه أمامي في الصورة لايوجد تكرار ضع مرفق ووضح اكثر ما هو التكرار الذي تقصده ::بالتوفيق::

مرحبا استاذ @kha9009lid صباح الخير سنمنع المستخدم من الانتقال الى سجل جديد او سابق أو لاحق وسنلزمه بالوقوف عند السجل الذي يتم التعديل عليه الى ان يقوم باتخاذ إجراء عليه اما الحفظ أو الغاء التعديل نعم سنقبل بها ونقوم بالتحايل والالتفاف عليه كما ذكرت بمشاركة السابقة هذه الطريقة لن تحل المشكلة ولكن يمكن تظمينها في ما سنقوم به وهو ليس وارد الان وبما ان صاحب الموضوع لم يرد إذا كان يريد هذه الطريقة أم لا فلعلي اعمل مثال وأفرد له موضوع جديد ::بالتوفيق للجميع ::

ماذا عن تغيير الطريقة ؟ سيكون النموذجين محميين من التعديل عند الضغط على زر تعديل يتم فك الحماية واتاحة الحقول للتعديل يتم تعديل الحقول يكون هناك زر حفظ وزر تراجع عند النقر على زر حفظ يتم حفظ التعديلات عند الضغط على زر تراجع يتم اعادة النموذجين الى القيم السابقة بإنتظار الافادة ::بالتوفيق::

الاقتراح ان تستخدم دالة نقل التركيز SetFocus لنقل التركيز الى الحقل الذي تريده بعد تحديث الحقل الذي تقف عليه مثال If Me.Forms![اسم الفورم الرئيسي]![ اسم الحقل بالفورم الرئيسي] = "مشتريات" Then Me.اسم الحقل المراد نقل التركيز إليه .SetFocus End If الإقتراح الثاني كرر الحقل في النموذج الفرعي مرتين وتقوم بإخفائها وضع شرط اذا كان حقل النوع = مشتريات اظهر الحقول الأولى وإلا أظهر الحقول الثانية في النموذج الفرعي ::بالتوفيق::

شكرا لك يرجى التأشير بتمت الإجابة ::بالتوفيق::

وعليكم السلام ورحمة الله وبركاته بما أنك لاتريد تغير مواقع الحقول عن طريق السحب والافلات ممكن نعرف الغاية من الطلب ؟ ::بالتوفيق::

قم بتغير الأمر اغلاق قاعدة البيانات DoCmd.Quit بهذا الأمر DoCmd.Close وحتى كود الاستاذ خالد سيعمل معك بدون الاضافة التي وضعتها انا بالمشاركة السابقة ::بالتوفيق::

استاذ @kha9009lid استخدم في بداية الكود On Error Resume Next وهذه الكود بدل رسالة التنبيه أو معها If Me.Dirty Then Me.Dirty = False ويمكنك استخدامهما ايضا معا عند النقر على زر خروج بدون كود في حدث عند الخطأ

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

تفضل بثلاث خيارات وليس خيارين أم القرى ميلادي هجري ::بالتوفيق:: Kaser906تحويل التاريخ11.rar

تجد في الرابط التالي مثال للاستاذ ابو هادي فيه ما لذ وطاب وهو غني بالامثله والاكواد أنقر هذا الرابط

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

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

انتبه من هذه الطريقة فسوف تدخلك في متاهات مستقبلا فمربع النص قبل تاريخ 30 بينما في التاريخ الهجري لا يوجد هذا التاريخ فعند تحديث التاريخ الميلادي سيحدث التاريخ الهجري مباشرة الى 1/3 ::بالتوفيق::

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

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

وعليكم السلام هذه ليست مشكلة الملف الذي تحاول التعديل عليه تم حمايته ضد التعديل ::بالتوفيق::

ليس لديك مشغل لملفات ال PDF نزل تطبيق وقم بتثبيته وبعد ذلك سيعمل معاك

الكود صحيح والمرفق صحيح تأكد انك تستخدم الاجراء بصورة صحيه او اعطنا صورة من رسالة الخطأ

قم بالتأشير على هذا الموضوع بتمت الاجابة افتح موضوع جديد لهذا الطلب واستجد الجميع يساعد قدر استطاعته ::بالتوفيق::