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

اضافة شرط في كود زر امر


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

السلام عليكم ورحمة الله وبركاته  اخواني اعضاء ومشرف المنتدي الكرام لي طلب لو تكرمتو  

طلبي هو  عندي زرامر اسمه طباعة باركود بسعر  في form8  به كود اريد ان اضيف علي هذا الكود شرط 

الشرط هو  عند الضغط علي الزر اقول له في الشرط اذا كان  ITEM_STATUS  يساوي   0  او  2   يلغي امر الطباعة  ويظهر رسالة للمستخدم   ان الصنف موقوف ولا يمكن طباعته

ولكم جزيل الشكر مرفق نسخة من البرنامج

BARCODE _coop k.rar

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

منذ ساعه, حسين العربى said:

السلام عليكم ورحمة الله وبركاته  اخواني اعضاء ومشرف المنتدي الكرام لي طلب لو تكرمتو  

طلبي هو  عندي زرامر اسمه طباعة باركود بسعر  في form8  به كود اريد ان اضيف علي هذا الكود شرط 

الشرط هو  عند الضغط علي الزر اقول له في الشرط اذا كان  ITEM_STATUS  يساوي   0  او  2   يلغي امر الطباعة  ويظهر رسالة للمستخدم   ان الصنف موقوف ولا يمكن طباعته

ولكم جزيل الشكر مرفق نسخة من البرنامج

BARCODE _coop k.rar

اتفضل

BARCODE _coop k.rar

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

  • 2 weeks later...
  • 2 weeks later...

اخي الفاضل لوتكرمت /حصل عندي تعديل  بنائا علي طلب المستخدم  طبعا يريد ان يطبع رقم 0 ورقم 1 الي هو موقوف وفعال  دون رقم 2 فما التعديل علي هذا الكود 

If Me.ert <> "فعال" Then
MsgBox "الصنف موقوف"
Exit Sub
Else

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

2 ساعات مضت, حسين العربى said:

اخي الفاضل لوتكرمت /حصل عندي تعديل  بنائا علي طلب المستخدم  طبعا يريد ان يطبع رقم 0 ورقم 1 الي هو موقوف وفعال  دون رقم 2 فما التعديل علي هذا الكود 

If Me.ert <> "فعال" Then
MsgBox "الصنف موقوف"
Exit Sub
Else

عفوا لكن ممكن توضح اكثر لو سمحت
 

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

اخي الفاضل شكر علي اهتمامك انا اريد عند الضغط علي زر طباعة اذا كان الصنف فعال او موقوف يطبع معي اما اذا كان موقوف مؤقت لايطبع وشكر  مرف نسخة من البرنامج الذي عدلة عليه حضرتك قبل سابق 

BARCODE _coop k.rar

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

7 ساعات مضت, حسين العربى said:

اخي الفاضل شكر علي اهتمامك انا اريد عند الضغط علي زر طباعة اذا كان الصنف فعال او موقوف يطبع معي اما اذا كان موقوف مؤقت لايطبع وشكر  مرف نسخة من البرنامج الذي عدلة عليه حضرتك قبل سابق 

BARCODE _coop k.rar

اخي الكريم
لا عليك الا تغير هذا السطر
 

If Me.ert <> "فعال" Then

الى

If Me.ert = "موقوف مؤقت" Then

مع تقدير

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

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

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



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

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

Important Information