ابوخليل

تفضل من : هنـــــــــــــا او من : هنــــــــــــا

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

اخي معذرة لا يمكنني فتح المرفق للتعديل بسبب الاصدار تفضل هذا مطلوبك الصقه في حدث النقر على زر داخل نموذجك مع الاخذ بالاعتبار تغيير اسم التقرير بالاسم الذي في برنامجك DoCmd.OpenReport "RepName", acViewPreview, "", "", acNormal DoCmd.PrintOut acPages, 1, 1, acHigh, 1, True If MsgBox("اقلب الورقة ان كنت تريد الطباعة في الخلف", vbOKOnly, "") = vbOK Then DoCmd.PrintOut acPages, 2, 2, acHigh, 1, True Else DoCmd.PrintOut acPages, 2, 2, acHigh, 1, True End If DoCmd.Close acReport, "RepName"

اخوتي الكرام شكرا لكم .. تم فصل الموضوع بعنوان مناسب

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

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

تفضل 11.rar

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

جزاك الله خير برنامج متكامل صغير الحجم متناسق الالوان

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

وعليكم السلام ورحمة الله وبركاته مرحبا استاذنا الكريم ابا انس وجدت لك مثالا بهذا الخصوص للاستاذة زهرة تفضل : zaRandNewNumber.rar

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

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

هي موجودة في اول مشاركة لك وقدفصلت لك عمل الدالة هناك

اين ؟ المرفق يحتوي على جدول فقط !

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

يا خوي ياعلي المسألة ليست كما تعمله على الورق لا بد من بداية احتساب ونهاية فلو افترضنا ان البداية لكل العسكر تبدأ مع بداية السنة فنحن سنعمل على احتساب حقه من الاجازة حتى نهاية السنة وحقه من الاجازة غير مثبت في الجداول ولكنه يظهر في الاستعلام بعد مضي ستة اشهر مثلا يكون حصيلة الضابط 30يوما وبعد 9 اشهر يكون حصيلته 45 بغض النظر عن الاجازة التي تمتع بها وعندما نريد الاستعلام عن رصيده نطرح استحقاقه العام خلال السنة نطرحة من المدة التي استمتع بها ثم في نهاية السنة يمكن عمل ترحيل للارصدة قبل الشروع في السنة الجديدة ارجو ان تكون الفكرة واضحة لك

تكملة الموضوع هنا

س- متى يبدأ احتساب الاجازة الميدانية ؟ هل هو من بداية السنة المالية ؟ ام ان الاحتساب يختلف من شخص الى اخر ؟ وضح ذلك

تقصد امكانية التغيير من قبل المستخدم ؟ اولا يجب عمل جدول لتسجيل النص المطلوب ثم نجعل التسمية تأخذ قيمة الحقل من الجدول انظر التعديل على المرفق Prog12.rar

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

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

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

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

اخي علي : ذكرت ان لديك مشكلة عند تشغيل المثال وسألتك في مشاركتي الاخيرة ولم تجبني ؟ ارى ان الافضل لك ولي ان تفتح لسؤالك الاخير مشاركة جديدة وفقك الله ،،،