ابوخليل

انت فعلا بدأت الاحتراف من الآن اعرض جداولك الرئيسة ( فقط ) وضع فيها بعض البيانات للاستئناس والفهم من اجل الدراسة والمناقشة الجداول الرئيسية فقط .. لأن الفرعية ستأتي تباعا

عليكم السلام مرحا .. مرحا .. ابا حسان .. أخيرا عدت والعود أحمد

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

ملاحظات فنية : 1- tbl_Marks2 ، tbl_Marks2 هذه مسميات الجداول والنماذج بنفس الوقت ..... اسماء الكائنات يجب ان تكون مميزة .. بداية التسمية تكون بالجداول بـــ tbl والنماذج بـــــ frm والاستعلامات بــــ qry والتقارير بــــ rep من اجل اعرفها من تسميتها 2- 2stMarks ، 1stMarks لا تبدأ التسميات برقم في كافة كائنات وعناصر المشروع .. قد نكتب الارقام في نهاية التسميات المتشابهه لأغراض برمجية ملاحظات في التصميم : انت لم تنتهي بعد من تصميم الجداول .. اكرر 80% من المشروع هو ضبط الجداول من الذي اوحى اليك ان تخصص لكل فصل دراسي جدولا للدرجات ؟ مثل المبتدىء والخبير كمثل من ينظر الى ما حوله من فوق صخرة بينما الخبير ينظر اليها من فو ق الجبل يجب ان تتعلم اولا التحليل لبياناتك .. ما الذي سيتم ادخاله وما المخرجات المطلوبة ... ويجب ان تحقق ذلك من خلال جداولك بعدها يأتي التنفيذ بما تملكه او تتعلمه من ادوات - نماذج لإدخال البيانات في ((((( الجداول)))))) - نماذج وتقارير لعرض النتائج الموجودة في (((((((((( الجداول ))))))))) الأكواد والوحدات النمطية والاستعلامات وغيرها هي ادوات مساعدة للتنفيذ

DoCmd.RunCommand acCmdPrint

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

تفضل DoCmd.RunSQL "DELETE A.*, A.IDA, * FROM A WHERE (((A.IDA)=[forms]![A]![IDA]))" DELTEST.accdb

انظر هنا وهنا

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

لم تبين ما الذي تريد حذفه هل جميع السجلات ام سجل محدد ؟ اذا كان سجل محدد فبناء على ماذا يتم الحذف ؟ ما هو المعيار او الشرط؟

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

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

السلام عليكم اخي الكريم الموضوع قديم من عام 2016 ورفعه والطلب هكذا مخالف لقواعد المشاركة يمكنك فتح موضوع جديد بطلبك .. ولا بأس ان تضع فيه رابط لهذا الموضوع او غيره يغلق ،،،

جميل

تعمل استعلام يكون هو مصدر البيانات بدلا من الجدول تضع معيار للسنة = year(Date)

على السريع لفصل الرقم الصحيح Expr1: Left([text1],InStr([text1],".")-1) لفصل الكسر Expr2: "0" & "." & Right([text1],InStr([text1],"."))

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

ايضا انا استعجلت في الرد فهو قد عالج مسألة التكرار بنفس الطريقة التي بينتها .. ولكني لم انتبه لتحديثه

ما شاء الله عليك ولكنك تقفز لخطوات متقدمة ليس من صلب الموضوع لأن مسألة المرفقات برنامج قائم بذاته خاصة اذا كان للطالب او المعلم اكثر من مرفق ، هنا يلزم عمل جدول فرعي خاص بمرفقات الطلاب وآخر بمرفقات المعلمين هذا بالنسبة للمرفقات ولو تركتها لنهاية البرنامج لكان افضل لك ... لأن المهم هو صلب الموضوع المرفقات تجدها في اي مشروع .. ( مدارس/ موظفين / مالي / خدمات عامة ...... الخ علاوة على انه يوجد في المنتدى امثلة ومرفقات كثيرة جدا تعالج مسألة المرفقات بزوايا مختلفة ------------------ بالنسبة لمعرفات الطلاب ان اردت الاعتماد على حقل id كمعرف فيجب ان يبدأ ترقيم الطلاب من 101 اما ان جعلت المعرف هو الرقم الوطني فهنا تنحل مشكلة الترقيم ويمكنك جعل الـــ حقل id ترقيم تلقائي

السلام عليكم توافقت الكتابة مع مشاركة اخي فادي الأخيرة انا ارى ان حل اخونا البرناوي نموذجي .. ولمعالجة التكرار يتم حذف البيانات من الجدول قبل كل امر على النحو التالي Private Sub أمر0_Click() DoCmd.SetWarnings False DoCmd.RunSQL "DELETE TEMP_DATE.*, * FROM TEMP_DATE" DoCmd.SetWarnings True Call InsertYears End Sub 3الأعوام بين تاريخين.accdb

تفضل تم تعديل مثال الاستاذ فادي حسب طلبك Me!Totals = required_meter \ undo_meter & "." & required_meter Mod undo_meter Required2.accdb

ليست كل العلاقات ذات اهمية داخل الجداول المهم ضبط الجداول بصورة صحيحة تفضل تم التعديل بشكل سريع .. ومن ضمنها التسميات يفضل ان لا تبدأ بارقام ايضا الترقيم يفضل ان لا يبدأ بالرقم 1 الا لمن لا يتجاوز عددهم 9 والبداية من 11 لمن لن يتجاوز عددهم 99 او 111 لمن لن يتجاوز عددهم 999 ... وهكذا ... والسبب هو ما سوف تواجه عند الفرز والتصفية والبحث .. School2.rar

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

انا كنت اعمل على الكود لما رأيت كود الاستاذ فادي وقرأته اعتقدت انه يلبي المطلوب وتوقفت عن اكمال الكود الآن وبعد تأكيد ما فهمته من قبل الاستاذ احمد اليكم الحل دالة تأخذ قيمة B وتقارنها بأي حقل داخل السجل : Public xfld As Byte Public Function Allfld(x As String) As String On Error GoTo ErrHandler Dim rs As Object, i As Integer Set rs = CurrentDb.OpenRecordset("SELECT TP2.* FROM TP2 WHERE TP2.GradeNO= " & [Forms]![form1]![A] & "") i = 0 For Each Field In rs.Fields i = i + 1 If x = rs.Fields(i) Then xfld = 1 Exit Function End If Next Set rs = Nothing ErrHandler: If Err.Number = 3256 Then Exit Function End If End Function ويتم مناداتها من النموذج : Private Sub B_AfterUpdate() xfld = 0 Call Allfld(Me.B) If xfld = 0 Then MsgBox "البيانات غير متطابقة" Undo Exit Sub End If End Sub Test-11.rar

مشاريع سهلة قصيرة - مشروع مكتبة عامة او مدرسية - مشروع ادارة منزلية - مشروع حضور وانصراف