Barna

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

تقصد فرز للسجلات ذات تواريخ السنة الحالية تفضل ........................ New Microsoft Access Database (2).rar

تفضل :::::::: New Microsoft Access Database (2).rar

نعم انظر ......

جرب هذا ......................

هل الاوفيس لديك 64Bit

مشاركة مع استاذي @kanory تفضل ....... BOOK (2).accdb

من اسمك ... لان علي اخ وجبيب ... تحياتي له

اولا ::: هل لك اخ اسمه علي انا لم احمل ملفك لكن اعتقد تحتاج هذا ...

اقرأ هذه الدروس لعلك تستفيد منها

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

اجعل مصدر الصورة هكذا ... جرب =[CURRENTPROJECT].[PATH] & "\photos\" & [STUDENT_ID] & ".jpg"

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

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

هدية حلوة .... شكرا لك ... وكل عام انتم بخير

اليس هذا هو مثالك في اول مشاركة بالموضوع ؟؟؟؟ اليس هذه شروحك للمطلوب في البرنامج ؟؟؟؟؟؟؟؟؟

طيب جرب كدة ..... طبعا يتم انشاء المجلدات بجوار البرنامج ... 1.mdb

هذه هي الطريقة ..

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

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

ترى كلنا نحب الصعايدة والنعم فيهم .... اسمح لي استخدم مثالك بطريقة اخرى للفائدة واثراء الموضوع باستخدم هذا الكود .... Dim db As DAO.Database Dim qdf As DAO.QueryDef Dim strSQL1 As String, strSQL2 As String Set db = CurrentDb db.QueryDefs.Delete "qr1" If com1 = "التقرير الاول" Then strSQL1 = "SELECT tblA.ID, tblA.fld FROM tblA;" Set qdf = db.CreateQueryDef("qr1", strSQL1) ElseIf com1 = "التقرير الثاني" Then strSQL2 = "SELECT tblB.ID, tblB.fld FROM tblB;" Set qdf = db.CreateQueryDef("qr1", strSQL2) End If DoCmd.OpenReport "rptFlayReport", acViewPreview وهذا المثال ..... Chang Record Sources Report.mdb

الصورة هذه ليس فيها ما يدل على المادة ... اين اسم المادة في الصورة ؟؟؟ وبعدين تبغا التصميم مثل الصورة ... من اين احضر لك التصميم هذا لانها صورة ... وانا لست مصمم فوتوشوب للاسف 😁😁😁😁

هل هذ الصورة المطلوبة .....

وعليكم السلام ورحمة الله وبركاته ... اعمل مربع نص وسمه مثلا Text7 ثم في حدث عند عداد الوقت للنموذج ضع هذا الكود ... I = I + 1 Me.Text7 = I & "%" If I = 100 Then Me.TimerInterval = 0 ثم اصنع زر وضع في حدثه .... Me.TimerInterval = 100 جرب واعلمنا بالنتيجة ؟؟؟؟

دائما رائع أخي الكريم @مبرمج سابق .... ماشاء الله تبارك الله ...