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

عدم اضافة الاسم


عفرنس
إذهب إلى أفضل إجابة Solved by ابوآمنة,

الردود الموصى بها

منذ ساعه, ابوآمنة said:

السلام عليكم 

كل شيء عندك تمام 

إلا جدول Teacher غير حقل Email إلى مطلوب من نعم إلى لا   فقط 

راح تضبط معك بإذن الله تعالى .

بإذن الله 

أوافيك بالنتيجة شكر الله لك .

ولك أحلى تفاحة 🍎

  • Like 1
رابط هذا التعليق
شارك

9 دقائق مضت, فايز.. said:

بإذن الله 

أوافيك بالنتيجة شكر الله لك .

ولك أحلى تفاحة 🍎

ههههههههه الحمد لله اخى صالح @ابوآمنة اخدت تفاحه مش عروسه 😀 :fff:

بالتوفيق اخى فايز

  • Like 1
  • Haha 1
  • Confused 1
رابط هذا التعليق
شارك

21 دقائق مضت, فايز.. said:

ولك أحلى تفاحة 🍎

 

9 دقائق مضت, أحمد الفلاحجى said:

ههههههههه الحمد لله اخى صالح @ابوآمنة اخدت تفاحه مش عروسه 😀 :fff:

 

الحمد لله أنه قال: تفاحة ما قال عروسه 

لأنا مراقبين و من الخائفيين   🤣

يا ساتر 😁

  • Like 1
  • Haha 1
رابط هذا التعليق
شارك

الان, kha9009lid said:

من باب تعدد الحلول

في طريقة بدون الحاجة الى تغيير قيمة الحقل من مطلوب الى غير مطلوب

عن طريق وضع القيمة الافتراضية للحقل الايميل =""

 

مطلوب.PNG

شكرا لك أخي

@kha9009lid

ولك أحلى 🌹

  • Like 2
  • Thanks 1
رابط هذا التعليق
شارك

1 دقيقه مضت, ابوآمنة said:

 

الحمد لله أنه قال: تفاحة ما قال عروسه 

لأنا مراقبين و من الخائفيين   🤣

يا ساتر 😁

وتستاهل احلى عروسه قصدى احلى تفاحه اخى صالح :fff:

جزاك الله اخى واستاذى خالد @kha9009lid :fff:

بارك الله فيكم اخوانى واساتذتى

  • Like 2
رابط هذا التعليق
شارك

2 دقائق مضت, فايز.. said:

@أحمد الفلاحجى @ابوآمنة @kha9009lid 

تفاعلكم في الردود يخليني ادور مشكلة في احد البرامج واطرحها هنا علشان تثرونا بما لديكم .. 😉😉😉

انا اول طالب يشارك معك بتعلم من المشاكل المطروحه فهكذا اتعلم

جزاهم الله خيرا اخواننا واساتذتنا

تم تعديل بواسطه أحمد الفلاحجى
  • Like 1
رابط هذا التعليق
شارك

وايضا ممكن ترك الجدول بدون اي تعديلات وتعديل بسيط على الكود

Dim strSQL As String, X As Integer
    X = MsgBox("المعلم غير موجود .. هل ترغب في إضافته؟", vbYesNo + vbDefaultButton1)
    If X = vbYes Then
       strSQL = "Insert Into Teacher (Teacher,Email) values ('" & NewData & "','الايميل مطلوب')"
       CurrentDb.Execute strSQL
        Response = acDataErrAdded
    Else
       Response = acDataErrContinue
    End If

او اي عبارة تبين ان هذا المعلم لم يتم تسجيل ايميله

  • Like 2
  • Thanks 1
رابط هذا التعليق
شارك

33 دقائق مضت, kha9009lid said:

وايضا ممكن ترك الجدول بدون اي تعديلات وتعديل بسيط على الكود


Dim strSQL As String, X As Integer
    X = MsgBox("المعلم غير موجود .. هل ترغب في إضافته؟", vbYesNo + vbDefaultButton1)
    If X = vbYes Then
       strSQL = "Insert Into Teacher (Teacher,Email) values ('" & NewData & "','الايميل مطلوب')"
       CurrentDb.Execute strSQL
        Response = acDataErrAdded
    Else
       Response = acDataErrContinue
    End If

او اي عبارة تبين ان هذا المعلم لم يتم تسجيل ايميله

شكر الله لك أستاذ خالد حلول رائعة .. مبدع .. 

  • Like 1
رابط هذا التعليق
شارك

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information