تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] مطلوب كود يقوم بالتنبيه
#1
السلام عليكم
مطلوب كود يقوم بالتنبيه بأن كمية الصنف على وشك النفاد من المخزن
مثلا يوجد عندي جدول اصناف وجدول مخازن وجدول مبيعات عندما يتم بيع الاصناف ويكون هناك صنف معين قابل للنفاد بمعنى يوجد منه 2 فقط في المخزن اريد ان يظهر تنبيه بأنه على وشك النفاد
الرد
تم الشكر بواسطة:
#2
السلام عليكم

عليك باجراء استعلام
وهذا يعتمد على طريقتك في التعامل مع قاعدة البيانات
الرد
تم الشكر بواسطة:
#3
Big Grin 
يمكنك إستخدام الكود التالى وهو يقوم بالذى تريد ويمكنك أستدعاءة بعد كل عملية بيع تقوم بها
كود :
   Public sub checkitemcount(ByVal itemid As Integer)
Dim DataSet1 As New DataSet
       DataSet1.Clear()
       Dim SQLstr As String = "SELECT * FROM dnname WHERE itemid = " & itemid &"
       Dim Da1 As New MySqlDataAdapter(SQLstr, newConnection)
       newConnection.Open()
       Da1.Fill(DataSet1, "suppitems")
       newConnection.Close()
       If DataSet1.Tables(0).Rows(0).item(3) < 2 Then
msgbox("يرجى الإنتباه أن هذا الصنف لم يتبقى منه الكثير فى المخزن")
       Else
       End If
   End sub
إذا كان فى اي استفسار انا موجود .
الرد
تم الشكر بواسطة: naden
#4
(28-12-16, 08:23 AM)Hazim Elabd كتب : يمكنك إستخدام الكود التالى وهو يقوم بالذى تريد ويمكنك أستدعاءة بعد كل عملية بيع تقوم بها
كود :
   Public sub checkitemcount(ByVal itemid As Integer)
Dim DataSet1 As New DataSet
       DataSet1.Clear()
       Dim SQLstr As String = "SELECT * FROM dnname WHERE itemid = " & itemid &"
       Dim Da1 As New MySqlDataAdapter(SQLstr, newConnection)
       newConnection.Open()
       Da1.Fill(DataSet1, "suppitems")
       newConnection.Close()
       If DataSet1.Tables(0).Rows(0).item(3) < 2 Then
msgbox("يرجى الإنتباه أن هذا الصنف لم يتبقى منه الكثير فى المخزن")
       Else
       End If
   End sub
إذا كان فى اي استفسار انا موجود .

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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مطلوب كود ايجاد موقع مؤشر الكتابة ابو انس 14 530 18-12-21, 09:29 PM
آخر رد: ابو انس
  مطلوب ملف خاص بالفيجوال ستوديو فضلا مسلم_١ 0 264 09-11-21, 06:50 PM
آخر رد: مسلم_١
  مطلوب ايقونات لاستعمالها في تصميم البرامج ابو انس 8 656 19-10-21, 07:30 PM
آخر رد: alfaiz678
  [كود] مطلوب كود يسحب معلومات بسيطة من موقع كورة مثلا؟ خالد يعقوب 1 496 25-07-21, 04:22 PM
آخر رد: aldery
Wink [سؤال] مشكل في build و dubug.... لا يقوم بحفظ التعديلات على المشروع bilgacim 3 560 23-07-21, 12:25 AM
آخر رد: bilgacim
  [VB.NET] مطلوب تعديل في قاعدة البيانات nrkarat 0 493 09-06-21, 01:02 AM
آخر رد: nrkarat
  [VB.NET] مطلوب كود يختص بحفظ البيانات Ayat.B.H 1 523 28-04-21, 07:45 AM
آخر رد: messry
  [مشروع] مطلوب مثال او مشروع لطباعة ملصقات الباركودوتحديد عدد الملصقات ahmedramzyaish 3 1,483 18-04-21, 03:01 PM
آخر رد: Bibo2030
  [VB.NET] مشكلة مطلوب حلها Lathe1 2 731 09-04-21, 02:38 PM
آخر رد: Lathe1
  مطلوب تحديد صف معين داخل الداتا جريد فيو نور الهدى الهدى 1 856 11-02-21, 11:01 PM
آخر رد: سعود

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم