اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

أحمد العيسى

03 عضو مميز
  • Posts

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

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

السمعه بالموقع

42 Excellent

عن العضو أحمد العيسى

البيانات الشخصية

  • Gender (Ar)
    ذكر
  • Job Title
    مدرس أول رياضيات ثانوى

وسائل التواصل

  • Website URL
    http://
  • ICQ
    0

اخر الزوار

1976 زياره للملف الشخصي
  1. السلام عليكم فى قاعدة البيانات المرفقة يوجد كود فى نموذج البيانات يعتمد على خانة النوع إذا كانت ذكر فيتم ملئ مربعى التحرير والسرد :الديانة (مسلم،مسيحى. والافتراضى مسلم) ، الحالة(متزوج،أعزب،مطلف،أرمل. والافتراضى متزوج) وإذا كان أنثى فيتم ملئ نفس المربعين السابقين بما يتناسب والتأنيث عند إضافة أى سجل جديد يوجد مشكلة فى تأنيث قائمة السرد ولا توجد فى المذكر قمت بتغيير السطر السادس إلى كلمة واحدة Else فنتج عن ذلك أخطاء أخرى بالجملة وكانت من نصيب السجلات القديمة If Me.gender.Value = "ذكر" Then Me.الديانه.RowSource = "مسلم;مسيحي" If IsNull(Me.الديانه) Then Me.الديانه.Value = "مسلم" Me.الحالة_الاجتماعية.RowSource = "متزوج;أعزب;مطلق;أرمل" If IsNull(Me.الحالة_الاجتماعية) Then Me.الحالة_الاجتماعية.Value = "متزوج" ElseIf Me.gender.Value = "أنثى" Then Me.الديانه.RowSource = "مسلمة;مسيحية" If IsNull(Me.الديانه) Then Me.الديانه.Value = "مسلمة" Me.الحالة_الاجتماعية.RowSource = "متزوجة;آنسة;مطلقة;أرملة" If IsNull(Me.الحالة_الاجتماعية) Then Me.الحالة_الاجتماعية.Value = "متزوجة" End If وإليكم بعض الأرقام القومية على سبيل التجربة لمن يريد إختبار ما سبق : 26507111201809 أنثى 28603110400251 ذكر 27301052700568 أنثى 27908100400212 ذكر 28101200400409 أنثى بيانات المدرسين.mdb
  2. شكراً جزيلاً لك استفدت من كود حضرتك بوضعه فى حدث بعد التحديث لحقل الرقم القومى Private Sub National_Nr_AfterUpdate() Me.birth.Value = Date_Sex_Province([National_Nr], 1) Me.gender.Value = Date_Sex_Province([National_Nr], 2) Me.Mohaftha.Value = Date_Sex_Province([National_Nr], 3) If Me.gender.Value = "ذكر" Then Me.الديانه.RowSource = "مسلم;مسيحي" Me.الديانه.Value = "مسلم" Me.الحالة_الاجتماعية.RowSource = "متزوج;أعزب;مطلق;أرمل" Me.الحالة_الاجتماعية.Value = "متزوج" Else Me.الديانه.RowSource = "مسلمة;مسيحية" Me.الديانه.Value = "مسلمة" Me.الحالة_الاجتماعية.RowSource = "متزوجة;آنسة;مطلقة;أرملة" Me.الحالة_الاجتماعية.Value = "متزوجة" End If End Sub وبعد التجربة ، كانت النتيجة كما أردت تماماً بيانات المدرسين.rar
  3. السلام عليكم بالنموذج التالى حقل النوع يظهر به كلمة : ذكر أو أنثى تلقائياً وذلك بعد كتابة حقل الرقم القومى والخروج منه المطلوب أن يكون محتوى الـ Comboboxs لكل من الديانة والحالة يتناسب مع هذه الكلمة تذكيراً وتأنيثاً مثلاً إذا كان النوع ذكر فإن محتوى الـ Combobox للديانة : مسلم ، مسيحى والإفتراضى فى الحقل مسلم إذا كان النوع أنثى فإن محتوى الـ Combobox للديانة : مسلمة ، مسيحية والافتراضى فى الحقل مسلمة كذلك : إذا كان النوع ذكر فإن محتوى الـ Combobox للحالة : متزوج ، أعزب ، مطلق ، أرمل والإفتراضى متزوج إذا كان النوع أنثى فإن محتوى الـ Combobox للحالة : متزوجة ، آنسة ، مطلقة ، أرملة والإفتراضى متزوجة مرفق ملف بقاعدة بيانات تم تغيير بياناتها للسرية وذلك لإجراء ما يلزم عليها شكراً مقدماً بيانات المدرسين.mdb
  4. كان لى رغبة فى معرفة بديل تنسيق yyyy/mm/dd لاستخدامها فى الحقول الـ Unbound (غير منضم ) وقد رأيتها هنا : Else birthDate = Format(CDate(birthDate), YearMonthDayFormat) ' تحويل المدخل إلى تاريخ currentDate = Format(Date, YearMonthDayFormat) ' تعيين التاريخ الحالي Format YearMonthDayFormat شكراً ابو جودي
  5. تمام .. شكراً جزيلاً وبالتأكيد سوف يستفيد الكثير _ وأنا منهم_ من أفكارك المجمعة فى مرفقك الأخير سن التقاعد 7 سؤالى فى هذا المرفق : لماذا لا تتأثر الحقول الغير منضمة بتنسيق التاريخ ( yyyy/mm/dd ) لأننى عندما أضفت هذا التنسيق لتاريخ الميلاد (غير منضم ) تم اللازم ، لكن الحقول الغير منضمة لم تتأثر به
  6. نظراً لضيق الوقت واختلاف المتغيرات بين أكواد ملف أخونا الحبيب ابو جودي ، وتطبيقى المتواضع فقد احتفظت بالملف كمرجع ، واستخدمت فى التطبيق دالة IIf فى مربع نص باسم Retirement =IIf([birth]<#01/07/1971#;DateAdd("yyyy";60;[birth]);IIf(([birth]<#01/07/1972#);DateAdd("yyyy";61;[birth]);IIf(([birth]<#01/07/1973#);DateAdd("yyyy";62;[birth]);IIf(([birth]<#01/07/1974#);DateAdd("yyyy";63;[birth]);IIf(([birth]<#01/07/1975#);DateAdd("yyyy";64;[birth]);IIf([birth]>=#01/07/1975#;DateAdd("yyyy";65;[birth]))))))) حيث birth هو تاريخ الميلاد ثم أنشأت مربع نص جديد لحساب سن التقاعد ووضعت به : =Year([Retirement])-Year([birth])
  7. إنفجار بعد الإفطار فى كتابة الأكواد .. نصيحة خد لك ساتر شكراً أبو جودي على كل إبداعاتك لكن لى ملاحظة عن قانون 2019 بعيدة عن الأكواد عندما تبحث فى جوجل عن "جدول خروج الموظفين على المعاش" تجد الكثير جداً من هذا الجدول والقليل _ يكاد لا يذكر _ من هذه الصورة والسؤال لذوى الإختصاص : أيهما الصحيح 1 / 1 أم 1 / 7
  8. القاعدة المشار إليها تم استخدامى لها من قبل فى قاعدة بيانات المدرسين ولكن باستخدام أسلوب IIf لكن من الجميل جداً أن يكون العمل من خلال دالة احترافية كما تفضلت هنا بالنسبة للبيانات الشاملة يفضل أن يكون الباقى على تاريخ المعاش مفصلاً بالسنة والشهر واليوم كما فى الصور التالية
  9. هذا ما فعلته أخى لأنه فى بداية المشاركة لم يكن يجيب سوى الأخ العزيز أبو عارف .. والسؤال الآن موجه لك : ماذا تقصد بالضبط !!!!
  10. مش ممكن يكون غلس .. ده حبيب الكل الآن عرفت هو مين ؟ لأننى متابعك من بدايات أوفيسنا إضافاتك ممتازة ، ولمساتك جميله فى كل تطبيقاتك ..... لكن لى ملاحظة بسيطة ( تعتبر غير مؤثرة ولم أذكرها لأخى أبو عارف وهى موجودة أيضاً فى مشاركتك ) عند الضغط على زر معاينة التقرير لا يتأثر برقم الصفحات "من" : " إلى" بل يعرض التقرير بأكمله ولو 100 صفحة فى حين الضغط على زر طباعة التقرير يلتزم بمواصفات الطباعة من صفحة # إلى صفحة # ...
×
×
  • اضف...

Important Information