تعديل رساله الحذف من شرط الي شرطين

[النجاشي]

السلام عليكم ورحمه الله وبركاته

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

عندي رساله تظهر عندما اضع علامه صح علي الصنف في حاله كان الرصيد صفر بنموذج واجه حذف الاصناف ويقبل الحذف من الزر

فاريد تعديل عليها شرط  اخر  اذا وجد  الصنف  بجدول HRR  يظهر الرساله

شاكرين مقدرين 

تحياتي اليكم

 

 

الحذف بشرطين.rar

تم تعديل فبراير 25, 2018 بواسطه ابو زاهر

[النجاشي]

للرفع

[النجاشي]

للرفع

[AlwaZeeR]

وعليكم السلام ورحمة الله وبركاته

جرب مع تغيير حقل المقارنة حسب ما تريد

::

تحياتي

  If Rsnf <> 0 Then
    MsgBox "الرصيد ليس صفر لا يمكن الحذف"
    Me.xx = 0
   ElseIf Rajmsanf = DLookup("[Rajmsanf]", "HRR") Then
    MsgBox "رقم الصنف موجود في جدول HRR"
    Me.xx = 0
  Else

  End If

 

[النجاشي]

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

وعليكم السلام ورحمة الله وبركاته

جرب مع تغيير حقل المقارنة حسب ما تريد

::

تحياتي

  If Rsnf <> 0 Then
    MsgBox "الرصيد ليس صفر لا يمكن الحذف"
    Me.xx = 0
   ElseIf Rajmsanf = DLookup("[Rajmsanf]", "HRR") Then
    MsgBox "رقم الصنف موجود في جدول HRR"
    Me.xx = 0
  Else

  End If

 

بارك الله فيك استاذي الكريم@AlwaZeeR

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

زادك الله علما

الله يعطيك العافيه

تحياتي اليك