منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[VB.NET] جمع قيمة عند تحديث البيانات - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] جمع قيمة عند تحديث البيانات (/showthread.php?tid=24353)

جمع قيمة عند تحديث البيانات - محمد اسماعيل - 28-03-18

السلام عليكم

عندي كود لتحديث البيانات عند التعديل

والكود يعمل بشكل جيد

ولكن اردت التعديل علي خلية مع زيادة قيمة الخلية مباشرة مع عملية التعديل بقيمة من تيكست بوكس

يعني الخلية قيمتها بالداتا 100  وانا بعدل عايز اضيف 20قيمة اسندها الي التيكست بوكس  الي قيمة الخلية  عشان تبقي بعد التعديل 120

استخدمت الكود التالي ولكن لا يعمل يعطي نفس قيمة الخلية

الكود


كود :
Sub updatd()
       PURCH_.con.Open()
       Dim Sav As New OleDb.OleDbCommand
       Sav.Connection = PURCH_.con
       Sav.CommandType = CommandType.Text
       Sav.CommandText = "UPDATE TBPURCH_ SET  TBPURCH_.NUM_TBPURCH += '" & _
      NUMTYPE_.Text & "' , TBPURCH_.TOTA_TBPURCH += '" & _
        TOTAPURCH_.Text & "' where ID_TBPURCH LIKE '" & _
       IDTEXT_.Text & "'"

       Sav.ExecuteNonQuery()
       Dim DataAdapter As New OleDbDataAdapter("SELECT * FROM TBPURCH_ Order By ID_TBPURCH", con)

       If PURCH_.con.State = ConnectionState.Open Then
           PURCH_.con.Close()
       End If
   End Sub


حاولت ايضا باضافة رمز الجمع قبل التيكست المراد اضافة قيمتة للخلية

RE: جمع قيمة عند تحديث البيانات - محمود صالح - 28-03-18

استدعي قيمة الخلية اولا في متغير integer
ثم اضف عليها الزيادة 
ثم حدث

RE: جمع قيمة عند تحديث البيانات - محمد اسماعيل - 29-03-18

(28-03-18, 11:48 PM)محمود صالح كتب : استدعي قيمة الخلية اولا في متغير integer
ثم اضف عليها الزيادة 
ثم حدث

جزاك اللة الف خير ولكن لي طلب

الجدول هذا المحدث خاص بفورم المشتريات بمكان اخر
كيف اظهر بيانات خلية من غير داتا جريد فيو لها

انا عندي برنامج مبيعات وعندي فورم شراء وفورم بيع وتابعت مسبقا برنامجك للبيع باسم 9

لما ابيع بجيب البيانات من فورم الشراء واضيفها لفورم البيع مع طرح القيم من فورم الشراء
واضيف الاصناف للفاتورة بالداتا جريد بفورم البيع

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

RE: جمع قيمة عند تحديث البيانات - محمود صالح - 29-03-18

تعمل فنكشن لترجيع قيمة الخلية
PHP كود :
   Public Function NUM_(ByVal TXT_ As String) As Decimal
        Dim CMD As New SqlCommand(TXT_, CON)
        OPEN_CON()
        Return CMD.ExecuteScalar()
        CLOSE_CON()
    End Function 
طبعا CON هي الاتصال و OPEN_CON و CLOSE_CON هي فتح وغلق الاتصال كما هو معروف

بعد كده هتشغل الفنكشن بشكل ده 

PHP كود :
       Dim num As Decimal = NUM_("Select val from table where NAME_T like '" & TextBox1.Text & "'  ") 
مع تغير جملة الاستعلام 
هيرجعلك قيمة الخلية في المتغير NUM

RE: جمع قيمة عند تحديث البيانات - محمد اسماعيل - 29-03-18

(29-03-18, 12:52 AM)محمود صالح كتب : تعمل فنكشن لترجيع قيمة الخلية
PHP كود :
   Public Function NUM_(ByVal TXT_ As String) As Decimal
        Dim CMD As New SqlCommand(TXT_, CON)
        OPEN_CON()
        Return CMD.ExecuteScalar()
        CLOSE_CON()
    End Function 
طبعا CON هي الاتصال و OPEN_CON و CLOSE_CON هي فتح وغلق الاتصال كما هو معروف

بعد كده هتشغل الفنكشن بشكل ده 

PHP كود :
       Dim num As Decimal = NUM_("Select val from table where NAME_T like '" & TextBox1.Text & "'  ") 
مع تغير جملة الاستعلام 
هيرجعلك قيمة الخلية في المتغير NUM

طيب وحدة وحدة عشان انا مش مركز انا حفظت الايدي بتاع الصف الخاص بالصنف من جدول المشتريات

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

بفورم المشتريات

- عمود الايدي بالجدول ياخذ اسم id_tb   
-  عمود الصنف بالجدول ياخذ اسم type_tb
- عمود الكمية بالجدول ياخذ اسم moun_tb

الاضافة التي تمت بالفاتورة بفورم البيع والتي تاتي من فورم المشتريات مثلا
لو عندي الايدي 5  مثلا ,  واسم الصنف "كشكول 60 صفحة " , الكمية التي تم بيعها 10    والكمية الاصلية 50 مثلا

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

- جملة الاستعلام الي حضرتك وضعتها
PHP كود :
NAME_T اسم الجدول 
val    ?  تشير الي اية 


RE: جمع قيمة عند تحديث البيانات - محمود صالح - 29-03-18

PHP كود :
Select SUM(moun_tb)AS moun_tb from "اسم الجدول" where id_tb like '" & TextBox1.Text & "' 


RE: جمع قيمة عند تحديث البيانات - محمد اسماعيل - 29-03-18

(29-03-18, 01:19 AM)محمود صالح كتب :
PHP كود :
Select SUM(moun_tb)AS moun_tb from "اسم الجدول" where id_tb like '" & TextBox1.Text & "' 

اللّهمّ إني أسألك من فضلك ورحمتك، فإنّه لا يملكها إلا أنت.

ان يرزقك الجنة

مش عارف اشكر حضرتك ازاي

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

RE: جمع قيمة عند تحديث البيانات - محمود صالح - 29-03-18

لو الى فهمته صح انك تريد ان تنقل عناصر فاتورة المشتريات الى فاتورة مبيعات بدل ما تكتبها مرة اخرى
مفيش مشكلة لانها اصناف معدودة

RE: جمع قيمة عند تحديث البيانات - محمد اسماعيل - 29-03-18

(29-03-18, 01:58 AM)محمود صالح كتب : لو الى فهمته صح انك تريد ان تنقل عناصر فاتورة المشتريات الى فاتورة مبيعات بدل ما تكتبها مرة اخرى
مفيش مشكلة لانها اصناف معدودة

طيب اخيرا انشاء اللّة الاستعلام السابق ذكرة جاب البيانات معايا بس في حاجة صغيرة لما ضغط مرة اخري علي بوتن مثلا  ظهر القيمة بصفر و قيمة الخلية 12 لنفس كود الايدي هل هذا امر طبيعي