ابوخليل

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

انظر هنا فالفكرة مشابهة http://www.officena.net/ib/index.php?showtopic=50808&p=314783#entry314783

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

اخونا ابراهيم وفقك الله لكل خير حاول مستقبلا ان يشتمل المثال على اقل عدد من الكائنات والعناصر الضرورية فقط تم التعديل حسب الطلب B2.rar

اخي الكريم : لاحظ انك كنت سببا رئيسيا في عدم استجابة الاعضاء السؤال مخالف لقواعد المشاركة يجب ان تحتوي المشاركة على استقسار واحد فقط xxxxxxx يغلق الموضوع xxxxxxx يمكنك انشاء موضوع جديد يشتمل على سؤال واحد فقط فإذا حصلت على الاجابة انشء موضوعا آخر وهكذا تعدد الاسئلة والعنواين مطلب ، وعلامة صحية .

الروابط التي وضعتها لك في المشاركة رقم 5 تشرح الطريقة وعلى كل حال : افتح التقرير على التصميم ثم انقر بزر الفأرة الأيمن على المربع StNo واختر : تنسيق شرطي ستتضح لك المسألة امام عينيك

حييت اخي وتفضل تم التعديل على مثالك آمل ان يحقق طلبك Mdbschool.rar

الموضوع مخالف xxxx يجب اختيار عنوان مناسب xxxxxxx يغلق

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

تفضل MO2.rar

تفضل مثالك معدلا student2.rar

تم دمج الموضوعين اخي الكريم يمكنك التعقيب على موضوعك بكتابة كلمة تفيد اعادة الطلب كــ للرفع مثلا

انظر في هذه الروابط ففيها ما تبحث عنه http://www.officena.net/ib/index.php?showtopic=41609#entry236097 http://www.officena.net/ib/index.php?showtopic=38006#entry205723 http://www.officena.net/ib/index.php?showtopic=25574#entry121193

اجعل مصدر الصف في مربع التحرير مثل مصدر الصف في حقل الجدول

شرح كيفية عمل استعلام توحيد بين الجداول http://www.officena.net/ib/index.php?showtopic=37077#entry197784 http://www.officena.net/ib/index.php?showtopic=41165#entry232314

في مثالك استخدمت كود الاستاذ يوسف تم اعادة وترتب الكود 1- اعد نسخه ولصقه مرة اخرى 2- غير ما يلزم من اسماء الحقول حسب الذي عندك

المشاركة في تنفيذ فكرة لا يلزم منه كون الفكرة صالحة للتطبيق فهنا مثلا : - هل المبرمج ملزم بتسمية العناصر داخل الفورم وفق تسمية وترتيب معين ؟ وهذه اشكالية ظاهرة - وهل كل النماذج ستشتمل على هذا العدد من الازرار ؟ لنفرض الجواب=لا - ما يدري الاداة بعمل كل عنصر ووظيفته ؟ اقصد كيف يتعامل المستخدم ( المدير ) عند منح الصلاحيات هل عليه ان يجرب ثم يذهب الى النموذج الهدف ليرى النتيجة الرؤية الصحيحة عندي : ( مثلا لو تم عرض عناصر كل نموذج بوظائفها دون الالتزام بتسميات محددة لكان هذا اقرب ) ولكن كيف ؟ شيء آخر احب ان ادرجه هنا وهو الذوق العام للنماذج فأنا كمستخدم يؤلمني ويحز في نفسي ان ارى داخل النموذج عناصر باهتة ، او ان تخرج على رسالة بعدم منحي الصلاحية المفترض ان لايتواجد في النموذج اي عنصر فوق حاجة المستخدم وجهة نظر آمل الا تحد او تثنيك عن عزمك ، فالاستشارة هي مشاركة العقل وفقك الله لكل خير

حول مثالك الى صيغة MDB فلعلك تجد تفاعلا من اخوانك اكثر

جزيت خيرا استاذ يوسف Dim rs As Recordset Dim i As Integer Set rs = Me.Recordset With rs .MoveFirst Do Until .EOF For i = 1 To Nz((Me.txtNoOfPrint), 0) DoCmd.OpenReport "rpt1", acViewNormal, , "id= " & Me.txtId Next i .MoveNext Loop End With Set rs = Nothing

تفضل : تم تنفيذ التصور officenaUP.rar

شكرا جزيلا استاذنا الحبيب يوسف واعتقدت ان السائل يريد طباعة الكل فاعددت له هذا .. مع اخذ نصيحة الاستاذ يوسف بالاعتبار Dim i, z, r As Integer Dim rs As Recordset Set rs = Me.RecordsetClone rs.MoveLast r = rs.RecordCount rs.MoveFirst For z = 1 To r Do Until i = Me.code.Value i = i + 1 DoCmd.OpenReport "report", acNormal, , "[number]=" & Me!number Loop rs.MoveNext Next rs.Close Set rs = Nothing

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

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

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

انظر هنا http://www.officena.net/ib/index.php?showtopic=44685#entry261065