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

تبديل رسالة خطا برسالة اخرى


Hussein888
إذهب إلى أفضل إجابة Solved by jjafferr,

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

في قاعدة البيانات المرفقة يظهر لي خطأ عند ترك قيمة المنصرف بالوحدة الصغرى فارغ بدون قيم (لاني عامل الحقل مطلوب فب خصائص الجدول )

عاوز الغي الرسالة اللي بتظهرلي من microsoft access و ابدلها برسالة اخرى و لتكن "ادخل القيمة في الحقل"

Mark.rar

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

قد لا تستطيع تغيير الرسالة اذا كانت خصائص الحقل في الجدول مطلوب

قم بتغيير خصائص الحقل من الجدول الى مطلوب: لا

بعدها تستطيع وضع أي رسالة تريد في حدث قبل التحديث للنموذج

حتى تستطيع تنفيذ امر الغاء الامر

     If Nz(Me.[اسم الحقل هنا],"") = "" Then
          Cancel = True
          Msgbox "لا يمكن ترك الحقل فارغ", vbExclamation, "قيمة مطلوبة"
     End If

 

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

  • أفضل إجابة

السلام عليكم 🙂

 

اذا تسمحوا لي بالمشاركة 🙂

لإصطياد رقم الخطأ ، يجب علينا ان نستعمل حدث "on error" ، في النموذج الذي نحصل فيه على الخطأ ، وفي حالتنا ، فهو النموذج الفرعي ، هكذا:

Private Sub Form_Error(DataErr As Integer, Response As Integer)

    MsgBox DataErr
End Sub

 

وعند التجربة ، نحصل على هذا:

image.png.c57fd172e35bb12e57e39de436918001.png

 

الآن وقد عرفنا رقم الخطأ ، اصبح من السهل التعامل معاه ، هكذا مثلا:

Private Sub Form_Error(DataErr As Integer, Response As Integer)

    'MsgBox DataErr
    
    If DataErr = 3314 Then
        Response = acDataErrContinue
        strMsg = "لا يمكن ترك الحقل التالي فارغ " & vbCrLf & _
                 "المنصرف بالوحدة الصغرى"
        MsgBox strMsg
    End If

End Sub

 

ونلقى هذه الرسالة الآن:

image.png.9e82b179de6f53d0bb0ee64e8f14c5aa.png

 

جعفر

1110.Market.accdb.zip

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

4 ساعات مضت, AlwaZeeR said:

قد لا تستطيع تغيير الرسالة اذا كانت خصائص الحقل في الجدول مطلوب

قم بتغيير خصائص الحقل من الجدول الى مطلوب: لا

بعدها تستطيع وضع أي رسالة تريد في حدث قبل التحديث للنموذج

حتى تستطيع تنفيذ امر الغاء الامر


     If Nz(Me.[اسم الحقل هنا],"") = "" Then
          Cancel = True
          Msgbox "لا يمكن ترك الحقل فارغ", vbExclamation, "قيمة مطلوبة"
     End If

 

الف شكر لمرورك و تفاعلك يا استاذ احمد و جاري التجربة 

3 ساعات مضت, jjafferr said:

السلام عليكم 🙂

 

اذا تسمحوا لي بالمشاركة 🙂

لإصطياد رقم الخطأ ، يجب علينا ان نستعمل حدث "on error" ، في النموذج الذي نحصل فيه على الخطأ ، وفي حالتنا ، فهو النموذج الفرعي ، هكذا:


Private Sub Form_Error(DataErr As Integer, Response As Integer)

    MsgBox DataErr
End Sub

 

وعند التجربة ، نحصل على هذا:

image.png.c57fd172e35bb12e57e39de436918001.png

 

الآن وقد عرفنا رقم الخطأ ، اصبح من السهل التعامل معاه ، هكذا مثلا:


Private Sub Form_Error(DataErr As Integer, Response As Integer)

    'MsgBox DataErr
    
    If DataErr = 3314 Then
        Response = acDataErrContinue
        strMsg = "لا يمكن ترك الحقل التالي فارغ " & vbCrLf & _
                 "المنصرف بالوحدة الصغرى"
        MsgBox strMsg
    End If

End Sub

 

ونلقى هذه الرسالة الآن:

image.png.9e82b179de6f53d0bb0ee64e8f14c5aa.png

 

جعفر

1110.Market.accdb.zip 43.13 \u0643\u064a\u0644\u0648 \u0628\u0627\u064a\u062a · 4 downloads

ماشاء الله عليك يا اخ جعفر.. عبقري الله اكبر عليك.. 

معلش ليا طلب تاني و انا عارف اني طلبته قبل كده.. بس اتعشم فيك و في خبرتك انك تساعدني.. 

في نفس قاعدة البيانات دي في النموذج الفرعي.. 

عند كتابة كود الصنف في خانة باركود يتم جلب باقي بيانات الصنف من جدول الاصناف.. 

انا عامل حقل تاني في جدول الاصناف اسمه كود مختصر.. 

المطلوب.. 

في حقل باركود في النموذج الفرعي اذا قمت بكتابة الباركود او الكود المختصر (ايهما) للصنف يتم استيراد باقي بيانات الصنف من جدول الاصناف.. 

ولك جزيل للشكر يا اخي الفاضل

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

حياك الله 🙂

 

7 ساعات مضت, Hussein888 said:

معلش ليا طلب تاني

على راسي ، ولكن شروط المنتدى لا تسمح لأكثر من سؤال في موضوع واحد 🙂

 

7 ساعات مضت, Hussein888 said:

و انا عارف اني طلبته قبل كده

رجاء ارفاق رابط بالموضوع ، او تعمل موضوع جديد ، وترفق الرابط هنا 🙂

 

جعفر

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

6 ساعات مضت, jjafferr said:

حياك الله 🙂

 

على راسي ، ولكن شروط المنتدى لا تسمح لأكثر من سؤال في موضوع واحد 🙂

 

رجاء ارفاق رابط بالموضوع ، او تعمل موضوع جديد ، وترفق الرابط هنا 🙂

 

جعفر

تسلم راسك يا استاذنا.. 

تفضل رابط الموضوع 

ويكفيني أهتمامك 

 

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

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

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

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

Important Information