ابوخليل

ملاحظات فنية : 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

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

العلاقات اوجدت حتى لا يتم ادخال بيانات في الجدول الفرعي ليس لها بالجدول الرأس ارتباط او علاقة اوصفة .. سمها ما شئت انا استخدم مربع التحرير عوضا عن العلاقة .. لذا نادرا احتاج للعلاقات بين الجداول العلاقات عندي في الاستعلامات فقط .. تثبيت العلاقات في الجداول دائما تعيق صناعة الاستعلامات __________________ المهم كي تتعلم بصورة صحيحة لا تخرج من الجداول حتى يعطيك الخبراء هنا الإشارة الى الخطوة التالية ____________ المشروع المدرسي .. ان كان لادخال الدرجات واستخراج النتائج فكما تفضلت المستهدف هو الطالب وان ارد ضمن المشروع عمل الجدول المدرسي فسيصبح مشروعين داخل مشروع واحد ونستهدف هنا المعلم اذكر عملت درس تعليمي مدرسي هنا .. سابحث لك عنه . هذا هو الرابط

مشروع العيادة : اكتروني بلا ورق الأدوات على الأرض : نقاط فرعية او حواسيب متوفرة عند كل من : ( الاستقبال / الفحص السريع/ غرف عيادة (طبيب) / مختبر / اشعة / صيدلية الرسم التصوري : رأس الهرم أو رأس المشروع = المريض لذا يجب ان يكون معرف المريض في جميع الجداول الرئيسية مسار البرنامج او الخطوات : تتم آليا 1- الاستقبال : تسجيل المريض وتحويله الى الفحص السريع 2- يظهر عن الطبيب الذي تم اختياره 3- بعد الفحص يتم اكمال الخطوات التي يراها الطبيب 4- يظهر عند المختبر او الاشعة ويتم ادخل النتائج 5- يطلع عليها الطبيب ويصرف الدواء 6 - تظهر عند الصيدلي _________ بناء على هذا التصور .. يتم تقدير الجداول بالطبع يوجد الكثير من الجداول الفرعية التي تخدم المسار ----------------- نصيحة ... برنامج العيادات كبير ومتشعب جدا ,, ومادمت تريد التعلم فابحث عن مشروع سهل ويسير

سأعرض لك هذا التصور من خلال مشروعك العيادة