اذهب الي المحتوي
أوفيسنا

منذر عساج

المشرفين السابقين
  • Posts

    989
  • تاريخ الانضمام

  • تاريخ اخر زياره

كل منشورات العضو منذر عساج

  1. أخي الكريم هل يفي بالغرض أن تبحث بين قيمتين db4.rar
  2. أخي الكريم ما هي نوع العلاقة التي تريدها بين الجدول t والجدول tabal5 إن كانت رأس لأطراف قم بتفريغ جميع البيانات من الجداول أجعل رمز المدرسة في الجدول t مفتاح أساسي أجعل رمز المدرسة في الجدول tabal5 قابل للتكرار (نعم) أو قم بإرفاق مثالك والله الموفق ,,,
  3. بالنسبة للأخ / Her فالمسألة بسيطة جدا 1) قم بأنشاء نموذج ويفضل أن يكون مجدول لمشاهدة كافة النتائج . 2) قم بنسخ مربعات النص وزر بحث وإلغاء البحث من مثالي الأول الى نموذجك 3) قم بنسخ جزء من الكود فقط والخاص بالبحث عبر الاسم ورقم الهاتف 4) طابق الاسماء بين مربعات النص وما هو موجود في الكود . واليك التعديل Axx.rar
  4. أختي الكريمة /نرجس الورد شكراً لك على الشرح الوافي بالنسبة لمثالك كان لديك ثلاثة أخطاء 1) وجود جملة end sub زائدة في الكود 2) تسمية مربع النص الخاص بالبحث بالإسم تختلف عن ما هو موجود في الكود فعلى النموذج (نص8) وفي الكود (name) 3) بالنسبة لأضهار مربع التحرير والسرد (الوظيفة) فارغاً قومي بإزالة مصدر عنصر التحكم لهذا الحقل (job) ومن الأفضل تسمية الحقول ومربعات النص بالإنجليزية لسهولة الإستخدام Ser11.rar
  5. أخي الكريم قم بوضع الكود التالي في حدث عند النقر لزر على النموذج الرئيسي docmd.Requery "subform" subform هو اسم النموذج الفرعي أو الأمر Me.Refresh لتحديث مربعات النص أو الأمر me.requery لإعادة القارائة من الجدول أو الاستعلام
  6. حباً وكرامة أخي الكريم في المثال أعلاه لدينا عدد من الحقول التي نرغب البحث من خلالها ( شاهد حدث عند النقر للزر بحث) 1- الاسم الكود الخاص بالبحث بالأسم هو كود If Not IsNull(Me.txtFilterMainName) Then strWhere = strWhere & "([اسم الموظف] Like ""*" & Me.txtFilterMainName & "*"") AND " End If والترجمة للكود هي أذا كان حقل مربع النص txtFilterMainName على النموذج غي فارغ فإن النتيجة هي فلترة الجدول عبر الحقل (اسم الموظف ) بما يطابق مربع النص على النموذج txtFilterMainName 2-الحالة الإجتماعية كود If Not IsNull(Me.cboFilterIsCorporate) Then strWhere = strWhere & "([رقم الحالة] = " & Me.cboFilterIsCorporate & ") AND " End If cboFilterIsCorporate اسم مربع النص على النموذج (رقم الحالة ) الحقل المكافئ له في الجدول . 3- الوصف الوظيفي كود If Not IsNull(Me.cboFilterIsCorporate1) Then strWhere = strWhere & "([رقم الوصف] = " & Me.cboFilterIsCorporate1 & ") AND " End If cboFilterIsCorporate1 اسم مربع النص على النموذج (رقم الوصف) الحقل المكافئ له في الجدول 4-القسم كود If Not IsNull(Me.cboFilterIsCorporate2) Then strWhere = strWhere & "([رقم القسم] = " & Me.cboFilterIsCorporate2 & ") AND " End If cboFilterIsCorporate2 اسم مربع النص على النموذج (رقم القسم) الحقل المكافئ له في الجدول
  7. بارك الله فيك أخي / ابو فهد ونفع بعلمك وبالتوفيق إن شاء الله
  8. اخي الكريم قبل الدخول في التقرير هل هذا ما تريده في احتساب النسب على النموذج db1.rar
  9. أخي الكريم في إعتقادي أن هذا هو البناء الصحيح لقاعدة بياناتك منعاً للتكرار في البيانات ولسهولة استخراج النتائج أما بالنسبة لمنع التكرار فعلى الروابط التالية ستجد ما تريد : http://www.officena.net/ib/index.php?showtopic=18744 http://www.officena.net/ib/index.php?showtopic=17833
  10. أخي الكريم طالما أن لديك علاقة بين الجدولين فلا داعي لذلك لكن إذا رغبت في معرفت كود التحديث فالإجراء Refresh يقوم بتحديث مربعات النص والقيم المحسوبة والإجراء Requery يقوم بإعادة القارائة من الجدول لجميع الحقول
  11. أخي الكريم شاهد التعديل هلى هذا يناسبك في ما يخص المواد والدرجات النموذج tblStudent1 Copy_of_Daar_Fatwaa.rar
  12. أخي الكريم اطلعت على مثال سابق لك عن نفس الموضوع ولي بعض الملاحظات 1) ينبغي أن يكون لديك جدول خاص بالسباقات (رقم السباق - اسم السباق) 2)جدول خاص بالمراحل (رقم السباق - رقم المرحلة - اسم المرحلة) يرتبط الجدول 1 بالجدول 2 عن طريق رقم السباق بعلاقة رأس لأطراف . 3) جدول خاص بالمتسابقين ( رقم المتسابق - الاسم ...) اتمنا أن تفيدك هذه الملاحظات في ما تود الوصول اليه
  13. أخي الكريم قمت ببعض التعديلات اتمنا ان تناسبك شاهد form1 وعلى الرابط التالي مثال جميل للاخت زهرة http://www.officena.net/ib/index.php?showtopic=20297 Copy_of_Daar_Fatwaa.rar
  14. أخي الكريم اليك التعديل قم بالبحث عبر الصف والفصل والدرجة ( او بأحد هذه الخيارات فقط ) وسيعطيك عدد الطلاب بحسب الشروط بقي أن توضح طريقة احتساب النسبة هلى من إجمالي عدد الفصل أم من القيم الظاهرة فقط db1.rar
  15. أخي الكريم راجع الروابط التالية http://www.officena.net/ib/index.php?showtopic=13146 http://www.officena.net/ib/index.php?showtopic=9910
  16. أخي الكريم راجع الرابط التالي http://www.officena.net/ib/index.php?showtopic=20390
  17. اختي الكريمة انشأي حقل جديد في الجدول (natg_tqrep) غيري اسم حقل (تقريب) في النموذج الى natg في حدث بعد التحديث للحقل eno ضعي الكود natg_tqrep = natg Cint___Fix___Int.rar
  18. أخي الكريم هذا مثال مقتبس من أحد برامج الاخ /علاء نكلاوي قم بالتجربة بالضغط على زر التالي أو السابق وشاهد الرسالة المأخوذة من رقم الخطأ في جدول الاخطاء ErrMessage.rar
  19. اخي ابن حميدو انظر المرفق التالي مثال للأستاذة زهرة علك تجد فيه ما تريد the_students_in_classes_up.rar
  20. أخي الكريم لم أفهم بعد المغزى من (لتسجيل الطلاب في الصفوف) ........ جدول الطلب (tblStudent) يجب أن يرتبط بعلاقة راس لاطراف بجدول الشعب (tblSections)
×
×
  • اضف...

Important Information