تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] تعديل المدخلات في (الداتا قريد فيو ) لفاتورة مبيعات؟
#1
Photo 
السلام عليكم ورحمة الله وبركاتة 

لدي نمودج قيد التطوير لفاتورة مبيعات صغير, حاليا تعمل الفاتورة بشكل صحيح من حيث ادخال البيانات لكن المشكلة هي عند تعديل حقل "الكمية" فهو لا يتغير. هو معد مسبقا برقم (1)
سؤالي هو يتكون من جزئين جزاكم الله كل خير.

1 - * كيفية تعديل الكمية داخل الداتا قريد فيو ؟

2 - كيفية خصم الكمية من المخزون ( للعلم انى جربت عن طريق التكست بوكس لاكن لا يتم الخصم الا الصف الاول من الداتا قريد فيو اما باقي الصفوف فلا يتم خصم المخزون)؟

المشروع في المرفقات



[/url][url=https://up.top4top.net/]

كود الاضافة


كود :
For Each saf As DataGridViewRow In DataGridView1.Rows
           If Not saf.IsNewRow Then

               If db.State = ConnectionState.Closed Then db.Open()

               Dim s As String = "insert into ITM2(NO_AUTO1,NO_ITM,NA_ITM,BY_ITM,SEL_ITM,DATE_REC,MOR_ITM)" & _
                   "values (@NO_AUTO,@NO_ITM,@NA_ITM,@BY_ITM,@SEL_ITM,@DATE_REC,@MOR_ITM)"

               Dim sw As New OleDbCommand(s, db)

               sw.CommandText = s
               sw.Connection = db

               sw.Parameters.AddWithValue("@NO_AUTO1", TextBox1.Text)
               sw.Parameters.AddWithValue("@NO_ITM", saf.Cells(0).Value.ToString)
               sw.Parameters.AddWithValue("@NA_ITM", saf.Cells(1).Value.ToString)
               sw.Parameters.AddWithValue("@BY_ITM", saf.Cells(2).Value.ToString)
               sw.Parameters.AddWithValue("@SEL_ITM", saf.Cells(3).Value.ToString)
               sw.Parameters.AddWithValue("@DATE_REC", DateTimePicker1.Text)
               sw.Parameters.AddWithValue("@MOR_ITM", saf.Cells(4).Value.ToString)

               sw.ExecuteNonQuery()
               sw.Dispose()

           End If
       Next
       db.Close()

       MsgBox("تمت عمليةالحفظ بنجاح")
       DataGridView1.Rows.Clear()
   End Sub



كود التعديل

كود :
   Private Sub DataGridView1_CellDoubleClick(sender As System.Object, e As System.Windows.Forms.DataGridViewCellEventArgs) Handles DataGridView1.CellDoubleClick

       DataGridView1.Rows(e.RowIndex).Cells(3).Value = 1
       DataGridView1.Rows(DataGridView1.CurrentRow.Index).Cells(4).Value = (DataGridView1.Rows(DataGridView1.CurrentRow.Index).Cells(2).Value * DataGridView1.Rows(DataGridView1.CurrentRow.Index).Cells(3).Value)
الرد
تم الشكر بواسطة:
#2
السلام عليكم .
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] تعديل في data gird view وحفظه Hassan.syria 5 606 10-03-20, 03:06 PM
آخر رد: asemshahen5
  هل يمكن تعديل كلمة معينة داخل سجل alfaiz678 4 320 22-02-20, 11:38 AM
آخر رد: alsalamoni
  [VB.NET] حفظ البيانات دفعة واحدة الداتا جريد فيو mahmoud.3com 2 1,117 19-12-19, 11:23 PM
آخر رد: بسام محمدغانم
  [VB.NET] رسالة خطأ عند الحذف أو تعديل بيانات جديدة #concurrency violation# sniperjawadino 11 1,310 28-05-19, 10:50 PM
آخر رد: sniperjawadino
  سوال بخصوص الداتا جريد Abdelrahman ala 7 925 07-03-19, 03:26 AM
آخر رد: Abdelrahman ala
  سؤال عن كيفية جمع الارقام الموجبة فقط من عمود في الداتا جريد فيو alfaiz678 2 923 01-10-18, 09:24 AM
آخر رد: alfaiz678
  سؤال عن الداتا ريدر sal_56 4 889 17-09-18, 10:23 AM
آخر رد: 911
Heart [VB.NET] سؤال : كود يجمع العناصر المتشابة في داتا قريد عن الاظافة بدون تكرار EYADISMAIL 16 2,794 11-09-18, 01:22 AM
آخر رد: EYADISMAIL
  سؤال حول عرض البيانات في الداتا جريد والاستعلام alfaiz678 12 2,109 25-08-18, 10:00 PM
آخر رد: elgokr
  [VB.NET] الداتا غريد فيو Data Grid View QWERTU 3 1,333 25-07-18, 04:15 PM
آخر رد: elgokr

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


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