+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=35271)
طلب تعديل الكود - ahmedramzyaish - 18-06-20
تم اضافة الكود الاتى لتحديث سعر الشراء للصنف فى جدول الاصناف من فاتورة الشراء
كود :
For i = 0 To dgvItems.Rows.Count - 1
Dim cmd2 As New SqlCommand
cmd2 = New SqlCommand("update Currencies set purch_price=@purch_price", conn, tr)
cmd2.Parameters.Add("@purch_price", SqlDbType.Float).Value = dgvItems.Rows(i).Cells(7).Value
cmd2.ExecuteNonQuery()
Nextولكن المشكلة انى لم اعرف احدد شرط بحيث يحدث اسعار الاصناف الموجوده فى الداتا جريد dgvItems الخاصة بفاتورة المشتريات
عاوز يكون شرط التعديل رقم الصنف الموجود فى الداتا جريد
اريد تعديل الكود حتى يكون تحديث سعر الشراء لكل الاصناف الواردة فى فاتورة المشتريات
لان الكود الحالى يغير سعر المشتريات لكل الاصناف وليس للاصناف الواردة فى الفاتورة فقط
ولكم جزيل الشكر
RE: طلب تعديل الكود - kiki - 18-06-20
فقط عدل على هذا السطر
كود :
cmd2 = New SqlCommand("update Currencies set purch_price=@purch_price", conn, tr)ليصبح بهذا الشكل
كود :
cmd2 = New SqlCommand("update Currencies set purch_price=@purch_price WHERE ID=@thisid", conn, tr)ثم قم باضافة هذا السطر
كود :
cmd2.Parameters.Add("@thisid", SqlDbType.Float).Value = dgvItems.Rows(i).Cells(0).ValueRE: طلب تعديل الكود - ahmedramzyaish - 19-06-20
(18-06-20, 10:00 PM)kiki كتب : فقط عدل على هذا السطر
كود :
cmd2 = New SqlCommand("update Currencies set purch_price=@purch_price", conn, tr)
ليصبح بهذا الشكل
كود :
cmd2 = New SqlCommand("update Currencies set purch_price=@purch_price WHERE ID=@thisid", conn, tr)
ثم قم باذافة هذا السطر
كود :
cmd2.Parameters.Add("@thisid", SqlDbType.Float).Value = dgvItems.Rows(i).Cells(0).Value
تمام الف شكر
جربتها مظبوط
شكراا جداااا