Foksh

جرب هذا الحل أخي @Abdelaziz Osman رسالة تاكيد قبل الاستمرار.accdb

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

ارسلت لك الحل الوحيد الذي زودتك به في رسالة .. والحل الأول هو انك تتذكر كلمة المرور 😅

هذا يعتمد على امتداد الملف اذا كان Accde أو Mde فلاااااا أنصحك بانتظار الحلول أبداً. أما غير ذلك فأنت لم تطبق الشرح بحذافيره 😁

تم الرد 👍

ارفق الملف للمحاولة

أخي الكريم ، اعتذر على الوصف اللي توهك مقصدي انه على سبيل المثال حقل الفصل ( class_id ) مصدر بياناته في الجدول هو : SELECT Taclass.[class_id], Taclass.class FROM Taclass ORDER BY Taclass.[class_id]; وباقي الحقول اللي هي مفاتيح أساسية وضحتها ولا نيلتها

أول حاجة البيانات الأساسية الشخصية للطالب تكون في جدوله الرئيسي فقط ، والبيانات الفرعية تنفصل مستقلة الاستعلامات يفضل تكون قيم مأخوذة من النماذج عند الإدخال للبيانات وليس في الجدول نفسه . اهتم أكتر بالتسميات علشان تكون أكتر وضوح وأسهل قراءة كمثال وانت حر في النهاية جدول الصفوف = Tbl_Class جدول النوع = Tbl_Sex ....... الخ في باقي الجداول كده أسهل صدقني .. وانا مش قصدي التنظير بقدر ما قصدي تعرف الأخطاء فين ( من وجهة نظري طبعاً وقابل للإختلاف ) وتصلح للأفضل علشان ترتاح في النماذج والاستعلامات .... وخلافه

شكلي ايه .. صديقي ، انا شفت الملف بتاعك ، وبالطريقة اللي انت اعتمدتها للجدول الرئيسي اعتقد حتواجه مشاكل كتيرة . يعني مثلاً :- انت عامل استعلامات لحقول كتيرة داخل الجدول الرئيسي للطلاب . جدول الطلاب انت ضفت عليه حقول يمكن ملهاش لازمه فيه ويفترض تكون في جداول مستقلة مربوطة برقم الطالب في جدولك الرئيسي المفتاح الأساسي هو رقم التلميذ ولا الرقم التلقائي ولا رقم ايه بالضبط !!!! حتى ان المسميات تخليك تتوه لما تلاقي جدول انا حاولت بصراحة أعدل لكني مبارح فعلاً كنت مش مستوعب حاجة بعد ما روحت

أحسنت ،، فكرة جميلة جداً أيضاً لدعمك في فكرة أخرى لتعديل جميع السجلات باستبدال 0 في رقم الهاتف في الجدول بمفتاح الدولة Dim db As dao.Database Dim rs As dao.Recordset Dim strSQL As String strSQL = "SELECT * FROM Table1 WHERE Left(PhoneNumber, 1) = '0'" Set db = CurrentDb Set rs = db.OpenRecordset(strSQL) Do Until rs.EOF rs.Edit rs!phoneNumber = "962" & Mid(rs!phoneNumber, 2) rs.Update rs.MoveNext Loop rs.Close Set rs = Nothing Set db = Nothing

تعتمد على حقل مدمج بين قيمة مفتاح الدولة وقيمة الحقل اللي فيه الرقم بدون 0 عشان يتحقق معك شرط الرقم مع مفتاح الدولة بدون 00 كما أخبرتك .. هناك حل آخر وهو التعديل على جميع الارقام لديك من خلال كود بحيث يضيف لكل السجلات بدل 0 اللي في الرقم يصبح مفتاح الدولة فقط . طبعاً هذا لو الارقام محلية داخل بلدك الكريم ,,

انا ، نزلت الملف ، خليني بس أطلع من الشغل ، واشوف الملف وارد عليك لأني لاحظت حاجة كمان انك عامل قيمة الصف في الجدول الرئيسي بتتاخذ من خلال استعلام !!! ودي حتعمل مستقبلاً مشاكل معك وتقيدك كتييييييييييييييييييييييير

وعليكم السلام ورحمة الله وبركات أخي @qathi ،، استكمالاً لطلبك في موضوع سابق ، تفضل هذا التعديل على الزر المسؤول عن السحب من السكانر ,, Private Sub scan1_Click() [picfile] = Null On Error Resume Next Dim filelocation As String ' متغير موقع الملف filelocation = Application.CurrentProject.Path & "\" & "Image" & "\Items\" & Me.mID & "T." & ".jpg" 'filelocation = Application.CurrentProject.Path & "\" & "Image" & "\" & "Items" & "\" & Me.mID & "T." & ".jpg" If scanner.DeviceInfos.Count = 0 Then MsgBox "لا يوجد ماسح ضوئي متصل", vbExclamation Exit Sub End If Dim scandiag As New WIA.CommonDialog Dim image As WIA.ImageFile Set image = scandiag.ShowAcquireImage image.SaveFile filelocation Me.picfile = filelocation Me.Refresh End Sub الإضافة كانت فقط في الجملة الشرطية في الكود .. وهذا الملف المرفق بعد التعديل .. Scan01.accdb

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

تفضل :- WB.accdb

أخي الغالي ، لا أمانع المتابعة معك أبداً ، ولكن افتح موضوع جديد حتى لا نخالف قوانين المنتدى لأن هذا الموضوع قد تم اغلاقه باختيار صاحبه أفضل إجابة . وأيضاً لأن الطلب مختلف عن الموضوع الأصلي

جدول الفصول انتهينا منه بإضافة حقل المادة الرئيسي في جدول الفصول . الآن في جدول المواد لو ضفنا حقل المعلم ، وضفنا في جدول الفصول رقم الاستاذ الرئيسي ، جرب بادخال بيانات ونتابع

للتوضيح أكثر اذا تكرمت .. هل كل فصل له معلم واحد ؟؟ وهل كل فصل له مواد محددة ؟

نعم صحيح ، انا بالنسبة لي هذا أفضل نمط ممكن تكون فيه العلاقات أحسنت أخي @2saad

تفضل أخي @agha4m طلبك ، رغم أن صاحب الموضوع @SAROOK لم يتابع بإغلاقه الموضوع (للأسف) عند حصوله على إجابته باختيار إجابة الأستاذ @محمد احمد لطفى أفضل إجابة . تنسيق شرطي.accdb

يفترض ذلك .. إن لم تجرب لن تعرف الإجابة لسؤالك ثم أن اختيار أفضل إجابة يكون عند إيجادك الحل

أخي الكريم @قهرني الأوفيس ، وعليكم السلام ورحمة الله وبركاته .. لا تعجب في عدم الاستجابة لموضوعك لعدة أسباب .. أولها أن النموذج الرئيسي والفرعي لهما نفس المصدر للبيانات وهو الاستعلام Query1 ثم انك تريد اضافة بيانات في حقول استعلام !! ثانياً الطلب غير واضح في الصورة ، انظر !! أيضاً العنوان لا يدل على مضمون الموضوع ..... الخ .

أخي محمد ، دعني أرحب بك في عالمنا المتواضع ، أهلاً وسهلاً بك .. هناك عدة قواعد وأساسيات لنجاح الإستجابة لمواضيعك ( مستقبلاً ) أذكر لك منها للتذكير فقط لا غير الإهتمام بالعنوان بما يصف المطلوب في الموضوع . الإهتمام بالشرح الوافي للمشكلة وذكر المطلوب تفصيلاً واضحاً . لإرفاق ملف مصغر للمشكلة حتى يتم تطبيق الحلول عليه ؛ وفي نفس الوقت تكون الأمور واضحة للأساتذة والمعلمين والموهوبين الذين يحاولون المساعدة . وبشكل عام ، اقرأ هنا بعض القواعد لتساعدة في إيجاد الحل

حاول بلورة هذه الفكرة حسب رغبتك ,, WB.accdb