طاهر اوفيسنا

نعم ولكن اعمل حساب يكون سنه 18 سنة كاملة اي يوم استخراج الوثيقة لايعتبر قاصرا واقل حتى بيوم يعتبر قاصر

عند اختيار الزوج والزوجة والابن اكبر من 17 سنة لايظهر في Title_Main"تصريح أبوي لقاصر" ويظهر هذا الاخير عند تخصيص الابناء الاقل او يساوي من 17 سنة في Co3 والتقرير الخاص بهم مثلا face10 والمرفق به التقرير الجديد Database20.rar نعم وهو كذلك اعرفها ليست كافية ولكن لم انسخها كاملة قلت الاستاذ يعرف هذا جيدا ... اعذرني

استاذ فما شيء غائب عن فكرك يلزمه توضيح عندما يتقدم المواطن لمصالحي من اجل طلب تصريح اول ما اطلب منه بطاقة الهوية لكي ادون رقمها وتاريخ ومكان صدورها لان التصريحات تكون مقننة بوثيقة التعريف لكلى الاطراف (الزوج ام الزوجة ام الابن اكبر من 17 سنة) انا دالة حساب العمر فهي بسيطةcr CR = DLookup("anneNes"),"Tbl_Enf","NF=" & me.NF)

استاذي العزيز مزال التعديل لم يكتمل للحل الصحيح 1- من جهة نوع الوثيقة انت اخترت لكل جدول تسمية وثيقة خاصة الزوج c1.c2.c3 الزوحة c1_m.c2_m.c3_m الابن c1_e.c2_e.c3_e ولكن التقرير نجد فيه معلومات وثيقة الزوج مع العلم ان رقم الوثيقة وتاريخ ومكان صدورها تملا في الفورم A2 لتظهر في التقرير 2-طلبت منك فلترة الابناء الاقل اويساوي 17 سنة فطلبت مني ادراج العمر في الجدول مافائدة ادرج العمر وعندنا دالة استخراج العمر من سنة الميلاد 3- بالنسبة للابناء اقل اويساوي 17 سنة لديهم تقريرا مخالف وهو تصريح ابوي لقاصر والمرفق يوضح تعديل من طرفي على وثيقة التعريف Database19.rar

شكرا استاذ على التعديل المختصر الجيد ولكن يحتاج على عدة تعديلات احرى وشروط استاذ كان في تعديلك المهم التجميع والفتح ضمن تقرير واحد وكانت فكرة جيدة النقائص : 1- اين تكتب رقم البطاقة وتاريخ صدور ومكان الصدور للزوج والزوجة حسب ماقلت تؤخذ مباشرة من جدول الزوج 2- بالنسبة للأبناء الاقل من 17 سنة فهم مستثنين ولهم تقريرا خاصا 3- عند فتح التقرير نجد Me.Rep1 = Forms!A2!Title1 Me.Rep2 = Forms!A2!Title2 نجد لخبطة في التنفيذ والمشار اليها بالاحمر حيث 02 يكون مكان 01 بالاعلى و02 يكون بشرط كما في Rept2 If Me.Title1 = "تصريح بالبطالة" Then Rept2 = " أصـرح بشرفـي بأنني عاطلة عــن العمـل لا أمارس أي نشاط مأجور في القطاع العام أو الخاص" ElseIf Me.Title1 = "تصريح بالشرف" Then Rept2 = "أصـرح بشرفـي بأنني لأمارس اي نشاط مهني او تجاري" End If حاول تصحيح هذا استاذ

استاذ ابو خليل عملت استعلام موحد للإستدعاء ضمن تقرير واحد ويتكون من الزوج والزوجة والابن لان اغلبية المعلومات تقريبا موحدة مثلا الرقم - الاسم - اللقب - تاريخ الميلاد- مكان الميلاد - اسم الاب - اسم ولقب الام ولكن وجدت صعوبة في المعايير SELECT Tbl_ZAWJ.IDP, Tbl_ZAWJ.Nom1, Tbl_ZAWJ.Prenom1, Tbl_ZAWJ.Date_Naiss1, Tbl_ZAWJ.Lieu_Naiss1, Tbl_ZAWJ.[إسم الأب], Tbl_ZAWJ.[إسم ولقب الأم] FROM Tbl_ZAWJ WHERE (((Tbl_ZAWJ.IDP)=[Forms]![A2]![IDP])) UNION all SELECT Tbl_ZAWJA.IDM, Tbl_ZAWJA.Nom2, Tbl_ZAWJA.Prenom2, Tbl_ZAWJA.Date_Naiss2, Tbl_ZAWJA.Lieu_Naiss2, Tbl_ZAWJA.[إسم الأب], Tbl_ZAWJA.[إسم ولقب الأم] FROM Tbl_ZAWJA WHERE (((Tbl_ZAWJA.IDM)=[Forms]![A2]![IDM])) UNION ALL SELECT Tbl_Enf.NF, Tbl_Enf.Nom_Enf, Tbl_ZAWJ.Prenom1, Tbl_Enf.Date_Naiss3, Tbl_Enf.Lieu_Naiss3, Tbl_ZAWJ.[إسم الأب], Tbl_ZAWJA.[إسم ولقب الأم] FROM (Tbl_ZAWJ INNER JOIN Tbl_ZAWJA ON Tbl_ZAWJ.IDP = Tbl_ZAWJA.IDP) INNER JOIN Tbl_Enf ON Tbl_ZAWJA.IDM = Tbl_Enf.IDM WHERE (((Tbl_Enf.NF)=[Forms]![A2]![NF]));

ولكن استاذ لازم ظهور ارملة فلان في التصريحات

اين محاولاتك استاذ خليفة

فهمت وسأجرب الفكرة

تسجل في جدول الابناء ولكن تستثنى بكود اليس كذلك

هنا لم يتم الفهم ممكن مثال للتوضيح

تتغير استاذ عند الزوجة او الابن اكبر من 17 سنة

تقصد جدولا واحدا وتكون فيه كل البيانات ام كيف استاذ

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

شكرا استاذ فعلا مقترح حل لانه تم التمكن منها عند ردود الاستاذ خليفة والان في الاستغناء عن التقارير وحعلها في تقرير واحد اي الاستغناء عن التقرير face4t و face4y وفتحها في FACE4 بواسطة توحيد استعلام مثلا شكرا على الاهتمام استاذ وياريت توظيب الفكرة

تسلم استاذي ولكن ياريت طريقة لمعرفة عمل دالة Args

استاذ وجدت لخبطة عند تطبيق دالة Args في تعيين القيم في التقرير Face10 يعني القيم واحدة في مكان واحدة فكيف يكون الحل وفق هذه الدالة

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

كفيت ووفيت استاذ ربي يحفظك ويجعلها في ميزان حسناتك والان بعد إذنك استاذ هل لي ان استغني عن 3 تقارير واجعلهم تقريرا واحدا فقط وهو face4 اذا فتحت من جهة الزوج نجد معلومات الزوج الاستعلام Zawj او الزوجة نجد معلومات الزوجة الاستعلام Zawja او الابن اكبر من 17 نجد معلومات الابن الاستعلام Enf اما الابناء اقل او يساوي 17 سنة القاصر فلهم تقرير منفصلا face10

If Me.Reporte_Title = "تصريح بالبطالة" Then Rept2 = " أصـرح بشرفـي بأنني عاطل عــن العمـل لا أمارس أي نشاط مأجور في القطاع العام أو الخاص" ElseIf Me.Reporte_Title = "تصريح بالشرف" Then Rept2 = "أصـرح بشرفـي بأنني لأمارس اي نشاط مهني او تجاري" Rept1 = Me.Reporte_Title

شكرا استاذ على الاطلاع تجدهما في مربعين غير منتظمين في التقريرين face4وFace4t ومصدرها في كود في الفورم A2 اي عند اختيار طباعة احد التصريحات سارى غدا بحول الله وسأوافيك بالرد

استاذ حاول التعديل على النسخة هذه وخاصة المطلب 01 9acer3.rar

ان شاء الله استاذي مع مرعاة UpdateComboBox لاتكون هنا Private Sub F1_AfterUpdate() ' UpdateComboBox End Sub Private Sub Y1_AfterUpdate() ' UpdateComboBox End Sub Private Sub T1_AfterUpdate() ' UpdateComboBox End Sub تكون عند Private Sub SearchListZy_Click() UpdateComboBox Private Sub SearchListZT_Click() UpdateComboBox Private Sub SearchListZ_Click() UpdateComboBox

شكرا استاذ على الاهتمامو زمد يد العزن ياريت فيديو توضيحي لعمل البرنامج لانه صراحة ولا تقرير تفتح *- صحيح قمت بالاختفاء كما طلب عند الابناء من 18 فما فوق ولكن فتح التقاير لم تتم 1- مشكلتها في دالة العمر لان الزوجين لاتشملهما دالة Cr1 2- في نظري ليس له علاقة بالاستعلام عند التقرير بل تكون عبر دالة IF عند اختيار Reporte_Title في الفورم A2 تظهر في التقرير في مربع نص غير منظم REP1 وكذلك REP2 تظهربأسفل التقرير عند الشرط وفق لما يلي : If Me.Reporte_Title = "تصريح بالبطالة" Then Rept2 = " أصـرح بشرفـي بأنني عاطلة عــن العمـل لا أمارس أي نشاط مأجور في القطاع العام أو الخاص" ElseIf Me.Reporte_Title = "تصريح بالشرف" Then Rept2 = "أصـرح بشرفـي بأنني لأمارس اي نشاط مهني او تجاري" End If وفي حدث التقرير Private Sub Report_Load() Me.Rep1.Value = Rept1 Me.Rep2.Value = Rept2 End Sub

شكرا أستاذي الكريم التعديل في محله اعرف ان التقرير Face10 يلزمه اصلاح ترتيب وهذا سهل 01- ولكن استاذ مامشكلة عدم ظهور معلومات Rep1 و Rep2 في التقرير Face4T 02- يوجد مشكلة عند فتح التقرير عند الزوج والزوجة مع العلم ان العمر مقيد للأبناء فقط يعني دالة حساب العمر تكون عند T1 = -1 3- هل يمكن اختفاء "تصريح أبوي لقاصر" عند احتيار الزوجين واظهاره عند الابناء الي اقل او يساوي من 17 سنة و شكرا استاذي