عمر ضاحى

اعذرنى 😁 فانا على قدي فى التفكير هو ايه المطلوب برضه 😅 لاني مش فاهم صراحتا ^_^

شوف هذه الفكره التى كنت اتحدث عنها وهذه مجرد طريقة واكمل انت ستجد ان الامور اصبحت اسهل بهذه الطريقة وانظر الى الاستعلام الجدولى والذى سيكون مصدر لنموذج او تقرير كيفما تحب وهتلاقى الامور اسهل للتطوير اطلع عليه واذا كانت هناك نقطة لم تفهمها بلغني المرفق TEST.rar

اعذرني على التأخر فى الرد يعنى القيم ثابته (بغض النظر عن هل الواجب كان صحيح ام خطأ لكن كونه احضر الواجب فياخد الدرجة 10 صحيح ؟ )

أستاذ @عبد اللطيف سلوم هدية مقبوله جعلها الله في ميزان حسناتك . 🌹🌹🌹

طيب خلينا نمشي خطوه خطوه مع بعض بناء على ايه بيتم عرض الدرجة (لأنك ما رديت عليا بخصوص هل هى قيم متغيره ام ثابته) يعنى هنفترض ان المادة الفلانيه درجتها هي 50 فبالتالى القيمه هنا ثابته ولا يمكن ان يكون للعربي كمثال للصف الاول درجه 30 و 50 فى نفس الوقت لهذا الاول نريد ان يكون هناك شروط لتسجيل درجات الطالب نفسها مثل رقم الطالب الذى لا يتغير طول تواجده ارقام الصفوف (يعنى تعمل جدول للصفوف "الصف الاول الثاني ...... وهكذا") ايه تاني ممكن المواد التعليميه ممكن تعطيها كود او رقم خاص بها للتميز مثل لغبه عربيه صف اول يكون له رقم 1 لغه عربيه صف ثاني يكون له رقم 2 وهكذه فبناء الجداول هي اساس اى برنامج اذا كان هذا البناء فيه خلل فان البرنامج سيكون صعب التطوير والتعديل عليه مستقبليا ايضا لابد ان تكون العلاقة بين الجداول وبعض لها علاقة واضحة مثلا علاقة جدول بيانات الطالب بالصفوف ايضا علاقة بيانات الطالب بالمواد المقرره عليه فلما تفكر فى الطريقة التى ستكون العلاقات فيها واضحه هجد كل شئ سهل وسهل التعديل عليه غير لما تعتمد على المعرفات فى العلاقات بين الجداول هيكون سهل تصيد الخطأ وتحييد الخطأ فى الكتابة بالأحرف و المعرفات ارقام والارقام اسهل من الحروف فى التعامل معها لهذا اتركك تفكر فيما قلته لك سابقا وسوف احاول ان اعيد بناء الجداول لتوضيح الفكره التى ذكرتها ايضا برجاء البحث وقراءة جميع المواضيع التى تتحدث عن بناء الجداول والعلاقات فالمنتدي ملئ بالمواضيع العظيمه التى انا شخصيا اتعلمت منها الكثير والترتيب (سائل المولى ان يبارك فى جميع من قام عليها)

😁 اكيد ما البيانات دي البرنامج هيعرفها ازاى لازم يكون فى مصدر سواء هذا المصدر قيم ثابته او من جدول المهم يكون هناك مرجع

اتفضل الحل Omar.rar

ادخل على النماذج الفرعيه وعدل ما تريد تعديله هنا

ارفع ملف

استخدم دالة DateAdd

هل لاحظة الخطأ هنا ؟

النقطه الفاصله هنا انت عاوز اخر تاريخ ايه واين يحصل عليه هل سيتم حفظ التاريخ فى حقل فى جدول ما ؟ غير فى نقطه فى الكود الخاص بك فى حرف F زائد على المسار انظر "F\\10.12.20.125 ربما هذا هو الخطأ

اتفضلى بعد التعديل طباعة باركود-1 (1).rar لان طلبها الاصلى ان تتحكم فى التقارير والعينات ولا تريد طباعة كل العينات للمريض (عافانا الله واياكم) ^_^

اذهبى الى الاستعلام patient_data وضيفي الحقل barcode_print من جدول test_order_tbl ثم اذهبي الى الاستعلام NewQueryDef وايضا ضيفى الحقل barcode_print من الاستعلام patient_data وهتتحل المشكله ملاحظه جانبيه فى الحقول المنضمه barcode_print و drawn التى فى النموذج الفرعي داخل النموذج barcode_frm اعملى حدث بعد التحديث وضيفى السطر التالى Me.Form.Requery علشان يحدث البيانات مرفق ملف طباعة باركود-1 (1).rar

ايه الخطأ ارفعي صورة او الملف افضل بعد التعديل

جربي وشوفى مثلا الغي احد التحليلين الخاص بتحليلSerum وشوفى هل هتعمل جيدا ام لا

احببت لكي الخير بان تتعلمي لكن بما ان الموضوع واخد اتجاه النسخ واللصق فاظن كده هتواجهه مشاكل لا حصر لها مستقبليا لان الاصل ان تعرفي كيف يعمل الكود علشان تقدري تطوريه وتطوعيه للغرض المخصص له الملاحظه فى التعديل البسيط انه مش هيظهر الحاله الفعليه لعملية الاختيار بل هيتجاهل اختياراتك فى النموذج ويظهر لكي التحاليل اتفضلى النتجيه كامله ان شاء الله strSQL = "Select [" & F_Name & "] From [patient_data] Where [tube]= '" & P_Name & "' And [ID] = " & [Forms]![barcode_frm]![ID] & " And [Code] = " & [Forms]![barcode_frm]![code] & " And [barcode_print] = True"

انا عارف وردي هذا حل لمشكلتك لكنه ليس حل كامل علشان تفكري وتكملى انتى هذا

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

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

هل الكود يعمل تمام ؟

استبدلى السطر هذا strSQL = "Select [" & F_Name & "] From [patient_data] Where [tube]= '" & P_Name & "'" بهذا strSQL = "Select [" & F_Name & "] From [patient_data] Where [tube]= '" & P_Name & "' And [ID] = " & [Forms]![barcode_frm]![ID]

مش فاهم يعنى ايه يشتغل على نفس ال ID ؟ غير كده هل الملف الذى ارسلته لك لم يعمل معكي ؟

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

هل هذا ما تريد ؟ PC_info.rar