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

ابوخليل

أوفيسنا
  • Posts

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

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

  • Days Won

    255

Community Answers

  1. ابوخليل's post in ID استعلام حذف بواسط الـــ was marked as the answer   
    تفضل 
    طريقة احترافية وبأقل عدد من الكائنات
     
    Database4.rar
  2. ابوخليل's post in تنظيم وفتح ملفات الوورد was marked as the answer   
    وهذه بطريقة أخرى
     
    مشروع ملفات الوورد3.rar
  3. ابوخليل's post in فتح تقرير بداخله تقرير فرعي (و مصدر التقرير الفرعي عبارة استعلام جدولي) was marked as the answer   
    انت بالخيار
    اما ان تجعل التقرير الفرعي في مقطع التفاصيل .. وتجعل ارتفاعة ضيق جدا الى الحد الأدنى  بحيث يلامس الحد السفلي الحقول
    المثال:  j4
    واما
    تبقيه على حاله وتعمل معه عكس ذلك
    فتقوم بتوسيع ارتفاع التقرير الفرعي .. حسب ما ترغب من عرضه
    يمكن ان تجعل ارتفاعه يأخذ ثلثي الصفحة
    base_j4.rar
    وهذه حسب تصميمك 
    base_j5.rar
  4. ابوخليل's post in مشكلة في التقرير ان الصف يتكرر مرتين was marked as the answer   
    وهذا تعديل بسيط
    من اجل حصر التقرير على الصف السادس فقط  
    لأن التقرير للمنقولين الى الإعدادي
    وايضا حجب نتيجة الترم الأول
    Data130.rar
  5. ابوخليل's post in تعديل على كود بحث was marked as the answer   
    اخي 
    عند تحميل النموذج يتم حجز السجلات المصدر .. وليس كل عملية بحث تتنفذ
    مثل الفلتر ومثل المعايير في الاستعلام
    لذا يجب ان تبحث عن طرق اخرى للبحث وهي كثيرة
    اليك واحدة منها يمكن تمريرها من خلال السجلات
    Dim rst As Recordset Dim strSearchName As String Set rst = Me.RecordsetClone strSearchName = tx1 rst.FindFirst "nomarabe = '" & strSearchName & "'" If rst.NoMatch Then MsgBox "Record not found" Else Me.Bookmark = rst.Bookmark End If rst.Close يمكنك ايضا جعل الكود في حدث بعد التحديث لمربع التحرير .. وتحذف ازرار الفلترة
    BASEL4.rar
  6. ابوخليل's post in تعديل علي نتيجة الدور الثاني was marked as the answer   
    المشكلة خفية جدا .. حاولت حتى وجدتها
    واذا عرف السبب بطل العجب
    سوف اشرحها لك :
    جدول الدرجات يحتوي على عمود لدرجات الدور الثاني  ... طبعا قليل جدا من الطلاب لهم دور ثاني ودرجات في هذا الحقل
    هاه .. بقية الطلاب الناجحين القيمة في هذا الحقل = صفر  .. لأنهم بالاصل ناجحون
    الطالبة انت اعطيتها القيمة صفر ..  فمن هنا اتى الخلل 
    تم ضبط الشرط وتعديله :
    فقط انقل الاستعلام qry_master الى برنامجك .. اي : استبدله بالموجود عندك
     
    Data127.rar
  7. ابوخليل's post in ربط جدول الامتحان بالفصل الدراسي was marked as the answer   
    هذا يعني انه يجب فصل المكملين في الترم الثاني باستعلام يخصهم
    والتقرير مبني على جدول الاسماء مع بقية الجداول
    لذا لزاما تغيير جدول الاسماء باستعلام اسماء المكملين
    يعني تحتاج تعمل تقرير آخر يخص جداول الدور الثاني 
    مع اني ضد فكرة تكرار الادوات .. الا اني عملت لك ضد منهجي على عجل حاجة يمكن تطلع عليها
    الى ان يتسنى لي اتفرغ وارى اذا يمكن الدمج
    جرب على الصف الرابع ... على فكرة : التقرير لا ينظر الى الفصل الدراسي او الفئة .. فقط الصف
    Data127.rar
  8. ابوخليل's post in تصفية نموذج لبيانات العطلات الرسمية حسب السنة was marked as the answer   
    تفضل
     
     
    testhol2.rar
  9. ابوخليل's post in تعديل علي نتيجة الدور الثاني was marked as the answer   
    السبب هو في خصائص مادة الدين
    هي الوحيدة بين المواد التي تدخل في النجاح ولا تدخل في المجموع
    لذا انظر في استعلام    qry_Temp_term3  افتحه على التصميم  وامسح المعيار true  من عمود الخاص بالداخل بالمجموع  ( تم تحديده في الصورة )
     

  10. ابوخليل's post in إخفاء واظهار حقول في حدث عند تنسيق رأس التقرير was marked as the answer   
    تفضل
    Data128.rar
  11. ابوخليل's post in مطلوب اظهار درجات اختبار المادة بدلا من الوان المادة was marked as the answer   
    تفضل 
    تحقيق طلبك باقل ما يمكن من ادوات
    Data121.rar
  12. ابوخليل's post in تنشيط الدور الثاني was marked as the answer   
    Data119.rar
  13. ابوخليل's post in تغيير صورة ( شعار / صورة / غير ذلك ) في النماذج والتقارير was marked as the answer   
    في حدث تحميل او فتح :  النموذج / التقرير  اكتب 
    Me.picture= "مسار الكليشة" على اعتبار الكليشة ستكون خلفية للخطاب
  14. ابوخليل's post in اضافة مادة للمجموع was marked as the answer   
    هذا مثال : قم بنقل الاستعلام الى برنامجك ثم شغله
    بعد التحديث والتأكد قم بحذفه فقد انتهت مهمته
    وعدل يدويا في نموذج التحكم بالدرجات
    Database1.rar
  15. ابوخليل's post in احصاء بنوع الوظيفة was marked as the answer   
    تفضل هذه احدى الحلول
    لاحظ ان الاستعلام الجدولي يجب ان يشتمل على 3 حقول فأكثر
    لذا اضفت حقل للجدول كمعرف للجنة
    احصاء2.rar
  16. ابوخليل's post in عمل رصيد تراكمي لحسابات العملاء was marked as the answer   
    جربي الآن 
    اضفت معيار  معرف العميل في مصدر بيانات التقرير  Bill_info subreport
    databasebalance4.rar
  17. ابوخليل's post in تصغير ارتفاع مربعات النص في تقرير بناء على شرط عدد السجلات was marked as the answer   
    السلام عليكم
    ومشاركة مع اخي @Foksh
    اضف هذا السطر الى جملتك البرمجية
    Me.Datail.Height = Me.Datail.Height * 0.5 لاحظ فيما لو اردت تغيير نسبة ارتفاع الحقل ... نسبة مقطع التفاصيل ستكون مماثلة لنسبة مقاس  ارتفاع الحقل 
    BASE_F.rar
  18. ابوخليل's post in حفظ معلومات بالجدول was marked as the answer   
    وهذا تعديل طفيف عند النقر  على لست الأب .. سيظهر الابناء مع ارقام امهاتهم
    اضفت رقم الأم الى الكود
     
     
    CNA_8.rar
  19. ابوخليل's post in امكانية الارتباط بقاعدة الجداول عند تغيير الامتداد ( اللاحقة) was marked as the answer   
    انا اعتراضي على العنوان : اكسس والتعامل مع ملفات Dll
    مهما غيرت امتدادها فاكسس ينظر الى ما بداخلها ويعرف انها جداول اكسس
    من سنوات عديدة مضت ولا زلت وانا استخدم هذه الطريقة .. ليس من باب الحماية بل من باب منع العبث
    ويمكننا تسميته تمويه وليس حماية
    اي ان المستهدف هو الشخص المتصفح المستعجل الذي يفتح الملفات بحثا عن شيء ما . مثلا يريد فتح واجهات البرنامج فيخطيء ويفتح قاعدة الجداول
     
  20. ابوخليل's post in مساعدة في مربع تحرير was marked as the answer   
    من خصائص مربع التحرير / تنسيق
    اجعل عدد الاعمدة 2 أو ثلاثة بدلا من 1
    333.rar
  21. ابوخليل's post in ضبط درجة ايام الحضور للصفين الأول والثاني was marked as the answer   
    انتهيت الى هذا
    بفضل الله .. ثم بمشاركتكم تولدت الأفكار والحلول
     
    Database29.rar
  22. ابوخليل's post in رسالة خطأ (لا يمكن الذهاب إلى السجل المحدد) was marked as the answer   
    مشاركة مع اخي فادي للفائدة العامة
    مشروع تأجير المركبات :
    1- تكون المركبة هي رأس الهرم في المشروع ، اما العميل فهو فرع
    سبب بسيط بديهي :
    المركبة يتناوب عليها الكثير من العملاء وقد يستأجرها عميل طارىء مرة واحدة فقط
    المركبة هي المصدر المالي للمشروع ويجري عليها العمليات المختلفة : تحصيل اجور/ نفقات صيانة / تأمين / مبالغ للوقود / اجرة سائق ان وجد ..... الخ
     
     
     
  23. ابوخليل's post in تعديل علي ملف الدرجات was marked as the answer   
    طريقتك في ادخال الغياب ضمن جدول الدرجات مقبولة بل جيدة .. وايضا تسهل عليك الرصد 
    نأتي لشرح التعديل حسب طلبك فارجو القراءة بتمعن وحرص :
    اولا :
    1- جدول Tbl_materil اساسي ومهم جدا ضبطه بالصورة الصحيحة
    وانا قمت بضبطه حسب اجابتك اعلاه
    فالمادة اما ان تكون خاصة بالصفوف العليا او خاصة بالدنيا او مشتركه بينهما
    ايضا الدرجة ستبقى كما هي عمود للعليا وآخر للدنيا 
    2- جدول الصف يتم ضبط النوع رقم 1 للدنيا ورقم 2 للعليا
    ثانيا : النماذج
    1- نموذج الرأس : اظهرت لك الحقل المخفي  safType  من اجل تطلع على التغيير عند التغيير في مربع الصف
    2- مربع الصف عند الاختيار  يصبح قيمة safType  تساوي 1 للصفوف الدنيا و 2 للصفوف العليا
    3- حقل safType نستخدمه كمعيار  في استعلام مربع المواد لعرض المواد الخاصة بالدنيا او العليا + رقم 3 لأن رقم 3 يمثل المواد المشتركة بينهما
    الى هنا اعتقد كل شيء واضح تماما .
    نأتي لشرط عدم ادخال قيمة اعلى من الدرجة المقررة
    تم الاعلان عن متغير رقمي عام  varHiDarjh تجده في الوحدة النمطية
    في نموذج الرأس وعند حدث بعد التحديث لمربع المواد  عملنا هذا
    If Me.safType = 1 Then varHiDarjh = Nz(Me.mater.Column(5), 0) Else varHiDarjh = Nz(Me.mater.Column(4), 0) End If المتغير يأخذ الدرجة من مربع المواد .. لأن الدرجات موجودة في الاستعلام مصدر المربع سواء الدنيا او العليا ، فالاولية في العمود الخامس بينما درجة الصفوف العليا في العمود الرابع
    الآن المتغير يحمل القيمة وجاهز لاستخدامه
    نذهب الى النموذج الفرعي والى حقل الدرجة deg لنطلع على الحدث قبل التحديث سنجده كالتالي :
    If deg.Value > varHiDarjh Then Beep MsgBox "القيمة اكبر من المقرر" واعتقد ان هذا واضح ولا يحتاج شرح
     
     
    البحث وتعديل درجات4.rar
  24. ابوخليل's post in ماسبب مشكلة عكس التاريخ عند التحويل was marked as the answer   
    تفضل
     
    تحويل مبلغ2.rar
  25. ابوخليل's post in ممكن تصحيح هذا الكود, عند الانتقال للسجل بشرط ؟ was marked as the answer   
    Private Sub Form_Open(Cancel As Integer) Dim i As Boolean i = Nz(DLookup("Name_ID", "Name_Tbl", "Name_ID=" & crMyfrmId), 0) If i = True Then DoCmd.GoToRecord , , , crMyfrmId Else DoCmd.GoToRecord , , acNewRec End If End Sub crMyfrmId  هو متغير عام يحمل رقم السجل
    Tracking test to المنتدى.rar
×
×
  • اضف...

Important Information