ابوخليل

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

المعايير نوظفها في الاستعلام للتحكم فيما يتم عرضه اما التقديرات والعمليات الحسابية والنجاح والرسوب فنوظف فيها المعادلات والدوال والوحدات داخل حقول الاستعلام هنا موضوع عملي يتحدث عن هذه الجزئية ستجدون الفائدة في قراءته والاطلاع على الامثلة المصاحبةhttp://www.officena.net/ib/index.php?showtopic=41272&page=1

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

اولا .العنوان غير مناسب وهذا يعرض المشاركة للاغلاق ثانيا : الكلام اعلاه غير مفهوم

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

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

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

ممكن ولكن اجعل سؤالك هذا في موضوع وعنوان جديد

جزاك الله خيرا

في الاستعلام qyr_saderbydate2 استبدل المعيار الموجود بهذا >=[forms]![frm_main]![zh]![txtDateFrom] And <=[forms]![frm_main]![zh]![txtDateTo] يبدو ان سبب المشكلة واضح الآن

ارفق مثالك لنرى امكانية تحقيق طلبك

وعليكم السلام هلا فحصت امان الماكرو ؟

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

من خصائص النموذج / لسان التبويب : بيانات اجعل القيمة : اضافة = لا

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

اخونا الكريم ابراهيم الشال اداة جميلة نافعة جزاك الله خيرا

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

استخدم هذا داخل مربع النص او في الاستعلام اما في محرر الفيجوال فيجب استبدال العلامات الفاصلة =Format(DateAdd("yyyy";5;[date_start]);"yyyymmdd")

هذا ممكن وهو موجود في التوضيح اعلاه وهذا مثال آخر محدث استبدلنا فيه حقول المسارات بمتغيرات نصية ويحفظ النسخة داخل مجلد البرنامج Public Function DBOld() DBOld = CurrentDb.Name ' قاعدة البيانات الحالية 'DBOld = Application.CurrentProject.Path & "\dbData.db"' قاعد اخرى موجودة بالمسار نفسه End Function طبعا ستختار واحدة فقط والاخرى يلزم تعطيلها او حذفها Public Function DBNew() DBNew = Application.CurrentProject.Path & "\" 'الموقع الجديد للنسخة داخل مجلد البرنامج End Function Public Function BKUp() On Error Resume Next Dim OldFile As String, DBwithEXT, DBwithoutEXT, NewFile As String, CopyMyDB OldFile = DBOld DBwithEXT = Dir(OldFile) DBwithoutEXT = Left(DBwithEXT, Len(DBwithEXT) - 4) Application.SetOption "Use Hijri Calendar", False NewFile = DBNew & "\" & Format(Now, "yyyymm") & ".txt" CopyMyDB = "cmd.exe /C copy " & """" & OldFile & """" & " " & """" & NewFile & """" Shell CopyMyDB, 0 Exit Function End Function Private Sub zerExit_Click() BKUp DoCmd.Close End Sub نسخة احتياطية .rar

اللقب : اذا يضاف حقل في الجدول للقب التقديرات : سؤالي عن الضابط ؟ متى يستحق جيد ومتى يستحق جيد جدا ... وهكذا ؟

جزاك الله خيرا

من هنا http://www.officena.net/ib/index.php?showtopic=55142 وهنا نكون وصلنا الى نهاية الدرس وسيتم قفل الموضوع وفي حال الاستفسار حول جزئية معينة من هذا الدرس فتح موضوع جديد والاشارة الى مكان الاستفسار داخل هذا الدرس

استفسار : استوقفتني بعض الملاحظات داخل المرفق ارجوا تفسيرها 1- مربعات الخيار اعلى الشهادة ماذا تعني 2- يوجد مربع اعلى النتيجة النصفية هل هو شعار ام صورة الطالب ؟ 3- اللقب / موجود داخل حقل ولا يوجد فراغ لكتابة شيء ما فماذا يعني 4-يلزم بيان ضابط التقديرات يوجد تقديرات لــ 20 و 50 و 120 و 300

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

اولا يجب ان تعمل على اكسس 2003 لان الاصدارات الاحدث لا تدعم صفحات الوصول الى البيانات ثانيا/ عملك صحيح 100% في ربط الجدول بصفحة محفوظة ولكن المشكلة ان الصفحة تبقى جامدة وتحتاج الى مزامنة ويمكن تخطي هذه المشكلة بان تقوم بربط صفحة الوصول الموجودة في اكسس 2003 بصفحة الموقع ثم تحفظ نسخة يوميا باستخدام تصدير (وهذه الآلية تسمح لك باللصق فوق النسخة السابقة ) ويمكن توظيف كود برمجي يقوم بالمهمة بضغطة زر بدلا من التصدير اليدوي وهذه الصفحة الحاصلة هي التي نربطها بالجدول اعمل الخطوات السابقة واذا لم تصل لنتيجة مرضية ارفق ما توصلت اليه