ابو عبدلله قام بنشر مارس 15, 2019 قام بنشر مارس 15, 2019 السلام عليكم ورحمة الله وبركاته وبعد التحية للجميع هل نستطيع عمل هذا الاستعلام و تظهر النتائج في النموذج الفرعي ؟؟ ولكم جزيل الشكر والتقدير والدعاء للجميع stu.rarFetching info...
essam rabea قام بنشر مارس 15, 2019 قام بنشر مارس 15, 2019 عسى يكون المطلوب stu.accdbFetching info... 2
ابو عبدلله قام بنشر مارس 16, 2019 الكاتب قام بنشر مارس 16, 2019 في 15/3/2019 at 20:08, essam rabea said: عسى يكون المطلوب Expand بارك الله بك اخي الكريم ولكن المطلوب عرض اسماء الطلاب الذين لهم نفس النموذج الفرعي لاسم الطالب الذي كتب بمربع البحث انظرو الصورة stu2.rarFetching info...
midomashakel قام بنشر مارس 29, 2019 قام بنشر مارس 29, 2019 السلام عليكم ورحمة الله وبركاته جمعه مباركة للجميع اتمنى يكون هذا هو المطلوب FilterResult.accdbFetching info... 1
ابو عبدلله قام بنشر مارس 29, 2019 الكاتب قام بنشر مارس 29, 2019 في 29/3/2019 at 07:51, midomashakel said: السلام عليكم ورحمة الله وبركاته جمعه مباركة للجميع اتمنى يكون هذا هو المطلوب Expand وعليكم السلام و رحمة الله وبركاته وبارك الله بكم ولكن لا اريد البحث عن الطالب نفسه بل الطلاب اللذين لديهم الكورسات نفسها والدرجة نفسها للطالب الذي كتب في مربع النص ارجوكم المساعدة ؟؟؟؟؟ مع جزيل الشكر للجميع 1
midomashakel قام بنشر مارس 29, 2019 قام بنشر مارس 29, 2019 هل هذا ما تريد الاخ الكريم الحل بالمرفقات FilterResultFinal.accdbFetching info... 1
ابو عبدلله قام بنشر مارس 30, 2019 الكاتب قام بنشر مارس 30, 2019 في 29/3/2019 at 14:50, midomashakel said: هل هذا ما تريد الاخ الكريم Expand السلام عليكم وبعد الشك الجزيل اريد عند كتابة اسم الطالب فقط يظهر اسماء الطلاب فقط اللذين لديهم نفس الكورسات والنتيجة للطالب الذي كتب في مربع نص البحث هل من حل جزاكم الله عنا كل خير
ابو عبدلله قام بنشر مارس 30, 2019 الكاتب قام بنشر مارس 30, 2019 (معدل) في 16/3/2019 at 08:54, ابو عبدلله said: بارك الله بك اخي الكريم ولكن المطلوب عرض اسماء الطلاب الذين لهم نفس النموذج الفرعي لاسم الطالب الذي كتب بمربع البحث انظرو الصورة stu2.rar 178.9 \u0643\u064a\u0644\u0648 \u0628\u0627\u064a\u062a · 11 downloads Expand في 30/3/2019 at 12:37, midomashakel said: ممكن ترفق صورة توضيحية للمطلوب Expand اي عند كتابة اسم الطالب عبدالله في مربع البحث يظهر اسم عبدالله و اسم علي لانهما لهما نفس الكورسات ونفس الدرجات وهكذا اي اريد ان يظهر اسماء الطلاب فقط التي لهم نفس كورسات و نتائج "نموذج فرعي" لاسم الطالب الذي كتب في مربع البحث هل نستيطع عمل هذا الاستعلام ؟؟ تم تعديل مارس 30, 2019 بواسطه ابو عبدلله
midomashakel قام بنشر مارس 30, 2019 قام بنشر مارس 30, 2019 (معدل) المفروض التطابق هيكون في احتمالين فقط اسم الكورس والدرجات كيف يكون تطابق عن طريق الاسم كمان ؟؟؟؟؟ هل يعقل ان يكون شخص اخد نفس الكورس اكثر من مرة وبنفس النتيجة على فكرة المرفق بيعمل كدا بيجيب اسماء الطلاب المشتركين لنفس الكورس وايضا لنفس الدرجات والصورة خير دليل على ذلك FilterResultFinal - Copy.accdbFetching info... ملحوظة اخيرة حاول تضيف اسماء طلاب اخرين بنفس الاسماء المتشابهة ونفس الكورس والمواد هيديك النتيجة المرجوة تم تعديل مارس 30, 2019 بواسطه midomashakel 1
ابو عبدلله قام بنشر مارس 30, 2019 الكاتب قام بنشر مارس 30, 2019 في 30/3/2019 at 13:26, midomashakel said: حاول تضيف اسماء طلاب اخرين بنفس الاسماء المتشابهة ونفس الكورس والمواد هيديك النتيجة المرجوة Expand وهو المطلوب ولكن باستخدام اسم الطالب فقط في مربع البحث دون تحديد الكورس والنتيجة
midomashakel قام بنشر أبريل 3, 2019 قام بنشر أبريل 3, 2019 يا رب يكون هو ده التعديل المطلوب FilterResultFinal -4.accdbFetching info... 1
ابو ياسين المشولي قام بنشر أبريل 4, 2019 قام بنشر أبريل 4, 2019 في 3/4/2019 at 15:41, ابو عبدلله said: للرفع Expand اتمنى يكون حسب طلبك شوف المرفق Dim varFilter As Variant varFilter = Null If Not IsNull(Me.search) Then varFilter = (varFilter + " AND ") & "[اسم الطالب] LIKE '*" & [Forms]![search].[Form]![sub_stu]![اسم الطالب] & "*'" End If With Me.sub_stu.Form If Not IsNull(varFilter) Then .DataEntry = False .Filter = varFilter .FilterOn = True Else .FilterOn = False End If .Requery End With varFilter = Null If Not IsNull(Me.search) Then varFilter = (varFilter + " AND ") & "[النتيجة] LIKE '*" & [Forms]![search].[Form]![sub_stu]![النتيجة] & "*'" End If With Me.sub_stu.Form If Not IsNull(varFilter) Then .DataEntry = False .Filter = varFilter .FilterOn = True Else .FilterOn = False End If .Requery End With stu.accdbFetching info... 1
ابو عبدلله قام بنشر أبريل 5, 2019 الكاتب قام بنشر أبريل 5, 2019 في 3/4/2019 at 17:33, midomashakel said: يا رب يكون هو ده التعديل المطلوب Expand في 4/4/2019 at 01:31, ابو ياسين المشولي said: شوف المرفق Expand السلام عليكم واعتذر على الاطالة وكل الشكر أخوتي وكل الدعاء لكم ولما تقدمونه .. الرجاء النظر للمرفق فيه اوضحة الفكرة وآمل وأدعو بأن يكون هناك حل لهذه المشكلة مع جزيل الشكر و التقدير لجهودكم بارك الله بكم جميعا stu.rarFetching info...
ابو عبدلله قام بنشر أبريل 6, 2019 الكاتب قام بنشر أبريل 6, 2019 في 4/4/2019 at 01:31, ابو ياسين المشولي said: اتمنى يكون حسب طلبك Expand للرفع
jjafferr قام بنشر أبريل 14, 2019 قام بنشر أبريل 14, 2019 السلام عليكم 🙂 اخوي ابو عبدالله 🙂 تفضل المرفق ، ان شاء الله يكون هو المطلوب 🙂 لما افضى شوي ، ان شاء الله اشرح طريقة العمل 🙂 بس لوسمحت تخبرنا اذا هذا هو طلبك ، وان النتيجة صحيحة 🙂 جعفر 1033.stu.accdb.zipFetching info... 1
ابو عبدلله قام بنشر أبريل 15, 2019 الكاتب قام بنشر أبريل 15, 2019 (معدل) في 14/4/2019 at 07:37, jjafferr said: السلام عليكم 🙂 Expand وعليكم السلام استاذنا واخي الكريم جعفر بارك الله على هذا المجهود الرائع في 14/4/2019 at 07:37, jjafferr said: بس لوسمحت تخبرنا اذا هذا هو طلبك ، وان النتيجة صحيحة 🙂 Expand نعم هذا هو المطلوب ولكن بتجميع الاسماء اي بالنموذج الفرعي يظهر الاسم مرة واحدة فقط و من دون التفاصيل فقط الاسم لمرة واحدة مع مراعاة الصفة yes , no ايضا ان تكون مطابقة ولكل كل الشكر و التقدير والدعاء تم تعديل أبريل 15, 2019 بواسطه ابو عبدلله
jjafferr قام بنشر أبريل 15, 2019 قام بنشر أبريل 15, 2019 تفضل 🙂 بما انك تريد المقارنه تكون عن طريق الحقول التالية مجتمعه: [رقم المادة] و [النتيجة] و [الصفة] ، لا مو كفاية هذه الحقول ، وانما اردت هذه الحقول من جميع السجلات تكون متطابقه ، لهذا السبب ، العلاقة العادية بين الحقول في الاستعلام لم تؤدي الغرض ، ولهذا اضطررنا اللجوء للكود في الوحدة النمطية ، واذا تلاحظ ، بيانات الاستعلام qry_All هي نفسها بيانات الجدول tab_result ، ولكن الاختلاف هو في طريقة فرز الحقول ، واحدة بعد الاخرى في الاستعلام ، وذلك لتنظيم المقارنه 🙂 الوحدة النمطية المسؤوله عن العمل هي: Public Function All_Grades(ID) 'ID = رقم الطالب Dim rst As DAO.Recordset Dim RC As Integer Dim i As Integer Dim Result As String Set rst = CurrentDb.OpenRecordset("Select * From qry_All Where [رقم الطالب]=" & ID) rst.MoveLast: rst.MoveFirst: RC = rst.RecordCount For i = 1 To RC Result = Result & "_" & rst![رقم المادة] & "-" & rst![النتيجة] & "-" & rst![الصفة] rst.MoveNext Next i All_Grades = Mid(Result, 2) rst.Close: Set rst = Nothing End Function جعفر 1033.stu.accdb.zipFetching info... 1
ابو عبدلله قام بنشر أبريل 16, 2019 الكاتب قام بنشر أبريل 16, 2019 بارك الله بكم جميعاً وبأمثالكم essam rabea midomashakel ابو ياسين المشولي jjafferr ولك مني جزيل الشكر و الدعاء استاذنا جعفر عمل رائع جاري التطبيق
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.