تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
الاضافة والتعديل والحذف من خلال الداتا جريد فيوا
#1
اصدقائ الاعزاء اسئل عن طريقة الاضافه والتعديل والحذف من خلال الداتا جريد نفسها
الرد
تم الشكر بواسطة:
#2
جرب 
DA = New OleDb.OleDbDataAdapter("SELECT * FROM Sell_Detl", con)
        DA.Fill(DT)
        For I = 0 To dgv.Rows.Count - 2
            Dim DR1 = DT.NewRow
            If dgv.CurrentRow.Cells(10).Value = Nothing Then
                dgv.CurrentRow.Cells(10).Value = 0

            End If
            DR1!BUYCODE = TXTID.Text
            DR1!Code = dgv.Rows(I).Cells(0).Value
            DR1!Name = dgv.Rows(I).Cells(1).Value
            DR1!Price = Val(dgv.Rows(I).Cells(2).Value)
            DR1!Unit = dgv.Rows(I).Cells(3).Value
            DR1!Quant = dgv.Rows(I).Cells(4).Value
            DR1!Cost_Unit = dgv.Rows(I).Cells(5).Value
            DR1!Total = dgv.Rows(I).Cells(6).Value
            DR1!Tax = dgv.Rows(I).Cells(7).Value
            DR1!TaxVal = dgv.Rows(I).Cells(8).Value
            DR1!DS = dgv.Rows(I).Cells(9).Value
            DR1!DSVAL = dgv.Rows(I).Cells(10).Value

            DR1!Stock = dgv.Rows(I).Cells(11).Value
            DR1!QTY_IN = dgv.Rows(I).Cells(12).Value
            DR1!RowNum = TextBox5.Text
            DT.Rows.Add(DR1)
            Dim CMD_ As New OleDb.OleDbCommandBuilder(DA)
            DA.Update(DT)
            
        Next
     
الرد
تم الشكر بواسطة: makky
#3
نفس الشئ لكن ستتعامل مع البيانات من ال gv 

بالتعديل ستتعامل مع ال GV عند الانتهاء من تعديل السطر CellEndEdit وتضع كود التخديث فية 

تستطيع جلب القيم كالاتي :

PHP كود :
  Dim i As Integer DataGrid1.CurrentRow.Index
         
  Dim eid 
As String DataGrid1.Item(1i).Value.ToString
   Dim name 
As String DataGrid1.Item(2i).Value.ToString 


و للحذف ستتعامل مع ال DataGrid1_CellContentClick وتقوم بادراج button والنفرض في العمود الاول 
و عند الضغط عل تشغل كود الحذف 

PHP كود :
Dim id As Integer DataGrid1.SelectedRows(0).Cells(1).Value

        If e
.ColumnIndex 0 Then
 delete where id 
=
endif 

وهكذا

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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] رسالة خطأ بعد عملية الاضافة georgos 11 170 16-02-19, 03:36 PM
آخر رد: georgos
Information [VB.NET] بحاجة الى اكواد الاضافة و الحذف و التعديل و البحث .. georgos 7 184 15-02-19, 10:52 AM
آخر رد: georgos
  سؤال فى صفوف الداتا جريد فيو احمد خطاب 1 76 07-02-19, 03:51 AM
آخر رد: حريف برمجة
  الإضافة والتعديل والحذف لبرنامج مخزن sads 6 283 31-01-19, 09:51 PM
آخر رد: فراس الغزي
  الإضافة والتعديل والحذف لبرنامج مخزن sads 0 75 28-01-19, 10:13 PM
آخر رد: sads
  قسمة صف فى داتا جريد فيو nabil.1710 1 104 24-01-19, 03:31 AM
آخر رد: حريف برمجة
  مشكلة برفع صورة من خلال الويب براوزر ابو روضة 7 226 23-01-19, 07:12 PM
آخر رد: elgokr
  تشغيل progress bar مع تحميل الداتا %Eman% 9 368 22-01-19, 03:22 PM
آخر رد: %Eman%
  [سؤال] اريد الترجمة من خلال الفيجوال بيسك هل هذا متاح ؟ dametucorazon 2 87 22-01-19, 01:06 AM
آخر رد: dametucorazon
  شرط ديتا جريد فيو dasktop 1 82 20-01-19, 01:00 PM
آخر رد: sendbad100

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


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