kanory

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

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

تفضل حسب طلبك .... kan_231.accdb

اصنع زر في نموذج وضع هذا الكود فيه :::::: DoCmd.OpenReport "مستحق_فيزا1", acViewPreview Pause 1 DoCmd.Close DoCmd.OpenReport "Kanory", acViewPreview

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

طيب ... انظر المرفق .... لكي يعمل معك بشكل صحيح اتبع الاتي : اذا اردت طباعة الاحصائية فقط (التقرير المسمى بـ Kanory ) : اولا يجب تشغيل التقرير المسمى بـ مستحق_فيزا1 ثانيا فتح التقرير Kanory _________________________________________________________________________________________________________ أما في حالة طباعة التقرير مستحق_فيزا1 سوف يعمل الكود مباشرة وبذلك تستطيع طباعة التقرير Kanory ________________________________________________________________________________________________________ والافضل اعطاء امر طباعة التقرير مستحق_فيزا1 ثم امر طباعة التقرير Kanory 1928961479_Kanory_.accdb سوف تكون النتيجة كالتالي :::::::::::::::::::

حياك الله ....

تفضل ..... kan_22 (1).accdb

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

لو دققت النظر في الصورة التالية يتضح لك :::::: ان ادخالك للاجازات هناك تداخل بين التاريخين الشهر 5 موزعة كالتالي : في السجل رقم 1 هناك 31 يوم في شهر 5 في السجل رقم 2 هناك يومان في شهر 5 المفرروض الموظف لديه اجازة 1/5 الى 30/5 كيف ياخذ اجازة مرة اخرى بتاريخ 1/5 الى 2/5 في السجل الثاني دقق النظر ..... حاول تصميم برنامجك على اساس لو حصل تعارض بين اجازتين من حيث التواريخ يرفض ذلك ....

طيب ... طبق الخطوات حسب الصور :::::: البحث_kan.accdb

انظر الاستعلام هل هذا ما تريد .....

تفضل :::: - عملت لك زر للحفظ وفتح فاتورة جديدة - ايضا عند الخروج من النموذج أو الاغلاق يتم عرض رسالة تأكيد بحفظ الفاتورة أو عدمه ..... وعند اختيار الغاء يعيد الكميات الموجودة في الفاتورة الى المخزن مرة اخرى ارجو ان يكون هو طلبك ......... تجربة_76523.accdb

واياك ....

حياك الله اخي الفاضل .... تفضل .... kan_22.accdb

تفضل ... قم باختيار الصف ثم حضر الطلاب ثم احفظ لاعتماد غياب للصف ثم كرر العملية لجميع الصفوف .... kan_22.accdb

تفضل ... NEW (4).accdb

لا تريد العرض .....؟؟؟؟؟ ام تريد عرضها في النموذج .......؟؟؟؟؟ ام تريد رسالة .....؟؟؟؟

انظر هذه الحلول .......

اذا كان فهمي للموضوع صحيح انظر الاستعلام ..... بيانات.mdb

اشكرك أخي الفاضل ..... هذا ما تعلمناه منك

-------->>>>>> تفضل ::::::: تجربة_7652.accdb

حياك الله .... الحمد لله رب العالمين

مشاركة مع استاذي الغالي @kha9009lid استخدم هذا الكود Dim db As DAO.Database Dim rs As DAO.Recordset Dim str As String str = "SELECT Table1.ID, Table1.barcode, Table1.police, Table1.FindBarcod, Table1.countBarcod FROM Table1 WHERE (((Table1.police) Is Null));" Set db = CurrentDb Set rs = db.OpenRecordset(str) Dim i As Integer For i = 1 To Me.Text0 rs.Edit rs!police = Me.Text2 rs.Update rs.MoveNext Next i rs.Close Set rs = Nothing تفضل .... New Microsoft Access Database.mdb

حياك الله اخي الكريم ..... بالتوفيق