بسم الله الرحمن الرحيم
السلام عليكم شباب
هل من كود ليقوم بعمل update set لبيانات الجدول من الداتا جريد
ولو بطريقة الباروميتر يكون جزاكم الله خير جزاء
تستطيع الحصول علي البيانات الموجودة في الداتاجريدفيو عن طريق BindingSource الخاصة بها و شكل الكود سيكون كالتالي ومن ثم تستخدم المصفوفة كيفما شئت مثلا يمكنك استحدام جملة For Each او تستخدم LINQ مع المصفوفة لكي تستطيع حفظ البيانات ف الجدول
PHP كود :
' Get a reference to the list from the BindingSource.
Dim items As List(Of Object) = CType(Me.DataGridView1.DataSource, List(Of Object))
اخى الكريم الفكرة ان الطريقة عن طريق quary sql زى طريقة insert لاكن بدلا منها نطع update
الداتا جريد مربوطة بقاعدة بيانات، يعني بالداتاست؟
لو كانت الـDatagridview مربوطة عبر Dataset فالامر بسيط فقط امر Update عن طريق OledbDataAdapter
مثال
اشكرك اخى سعود
لاكنى اريد مثل هذا الكود او هذه الطريقة
PHP كود :
Dim cmd As New DAL
For I As Integer = 0 To DataGridView1.Rows.Count - 1
cmd.Editdata(" UPDATE item SET INVOID ='" & DataGridView1.Rows(I).Cells(0).Value & "' AND ITEMID ='" & DataGridView1.Rows(I).Cells(1).Value & "' AND ITEM ='" & DataGridView1.Rows(I).Cells(2).Value & "' AND MSN ='" & DataGridView1.Rows(I).Cells(3).Value & "' AND QAN ='" & DataGridView1.Rows(I).Cells(4).Value & "' AND AIAR ='" & DataGridView1.Rows(I).Cells(5).Value & "' AND NUM ='" & DataGridView1.Rows(I).Cells(6).Value & "' AND PRICE ='" & DataGridView1.Rows(I).Cells(7).Value & "' AND TOTAL ='" & DataGridView1.Rows(I).Cells(8).Value & "'")
Next
لكن ال update ما فيهاش and غير في where، بمعنى انو في حالت الكود تبعك يكون فاصلة بدل and لان ي مش شايف where
علفكرة انت كده بتخلي جميع الصفوف متل بعض باخر تفيذ لل update ، لانك ماستخدمتش where،،،،، انتبههههه
هههههههههههههههههههههه ما انا اخى العزيز لسه واخد بالى من المعلوة دى الابضيت نجح وتمام لاكن عدلى على كل التسجيلات مش واحد فقط
وهذاا الكود لاكن لا اعرف لماذا لم يعمل معى
PHP كود :
Dim cmd As New DAL
For I As Integer = 0 To DataGridView1.Rows.Count - 1
cmd.Editdata(" UPDATE item SET INVOID ='" & DataGridView1.Rows(I).Cells(7).Value & "' WHERE barcod ='" & DataGridView1.Rows(I).Cells(1).Value & "'")
Next
شكرا جزيلالالالالا تم التعديل والحمد لله