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

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



كود الحفظ يحفظ كل الخانات - اسامه الهرماوي - 25-11-18

السلام عليك اخواني قمت بعمل زر تعديل 
علي الكمية ولكن يحفظ لي كل ما في الحقل
باخر تعديل مثال لو اضفت كمية40 لصنف معين
يعطيني كل الاصناف كميتها 40فما الحل.
الصور الموضحة في المرفقات وشكرا

وايضا هذه صورة توضح مايحدث في البيانات.


RE: كود الحفظ يحفظ كل الخانات - عبدالرحمن رمضان - 25-11-18

(25-11-18, 12:26 AM)اسامه الهرماوي كتب : السلام عليك اخواني قمت بعمل زر تعديل 
علي الكمية ولكن يحفظ لي كل ما في الحقل
باخر تعديل مثال لو اضفت كمية40 لصنف معين
يعطيني كل الاصناف كميتها 40فما الحل.
الصور الموضحة في المرفقات وشكرا

وايضا هذه صورة توضح مايحدث في البيانات.

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


RE: كود الحفظ يحفظ كل الخانات - Rabeea Qbaha - 25-11-18

PHP كود :
If Conn.State ConnectionState.Closed Then
            Conn
.Open()
 
       End If

 
       Dim cmd As New OleDb.OleDbCommand
        cmd
.Connection Conn
        cmd
.CommandType CommandType.Text
        cmd
.CommandText "update buy set qun =@qun where id=@id"
cmd.Parameters.AddWithValue("@qun"textcount.Text)
 
       cmd.Parameters.AddWithValue("@id"Textid.Text)
 
  
        cmd
.ExecuteScalar()
 
       Conn.Close() 



RE: كود الحفظ يحفظ كل الخانات - اسامه الهرماوي - 25-11-18

(25-11-18, 01:26 AM)Rabeea Qbaha كتب :
PHP كود :
If Conn.State ConnectionState.Closed Then
            Conn
.Open()
 
       End If

 
       Dim cmd As New OleDb.OleDbCommand
        cmd
.Connection Conn
        cmd
.CommandType CommandType.Text
        cmd
.CommandText "update buy set qun =@qun where id=@id"
cmd.Parameters.AddWithValue("@qun"textcount.Text)
 
       cmd.Parameters.AddWithValue("@id"Textid.Text)
 
  
        cmd
.ExecuteScalar()
 
       Conn.Close() 

ممكن سؤال يابشمهندس
انت درست فين؟


RE: كود الحفظ يحفظ كل الخانات - Rabeea Qbaha - 25-11-18

(25-11-18, 01:52 AM)اسامه الهرماوي كتب :
(25-11-18, 01:26 AM)Rabeea Qbaha كتب :
PHP كود :
If Conn.State ConnectionState.Closed Then
            Conn
.Open()
 
       End If

 
       Dim cmd As New OleDb.OleDbCommand
        cmd
.Connection Conn
        cmd
.CommandType CommandType.Text
        cmd
.CommandText "update buy set qun =@qun where id=@id"
cmd.Parameters.AddWithValue("@qun"textcount.Text)
 
       cmd.Parameters.AddWithValue("@id"Textid.Text)
 
  
        cmd
.ExecuteScalar()
 
       Conn.Close() 

ممكن سؤال يابشمهندس
انت درست فين؟

انا درست في جامعة البتراء في الاردن ، لكن لم السؤال ؟؟


RE: كود الحفظ يحفظ كل الخانات - اسامه الهرماوي - 25-11-18

(25-11-18, 03:28 AM)Rabeea Qbaha كتب :
(25-11-18, 01:52 AM)اسامه الهرماوي كتب :
(25-11-18, 01:26 AM)Rabeea Qbaha كتب :
PHP كود :
If Conn.State ConnectionState.Closed Then
            Conn
.Open()
 
       End If

 
       Dim cmd As New OleDb.OleDbCommand
        cmd
.Connection Conn
        cmd
.CommandType CommandType.Text
        cmd
.CommandText "update buy set qun =@qun where id=@id"
cmd.Parameters.AddWithValue("@qun"textcount.Text)
 
       cmd.Parameters.AddWithValue("@id"Textid.Text)
 
  
        cmd
.ExecuteScalar()
 
       Conn.Close() 

ممكن سؤال يابشمهندس
انت درست فين؟

انا درست في جامعة البتراء في الاردن ، لكن لم السؤال ؟؟

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


RE: كود الحفظ يحفظ كل الخانات - Rabeea Qbaha - 26-11-18

لا شكر على واجب صديقي 

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