تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] اضافة بيانات من داتا جريد فيو الي اخري
#1
عندي 2 داتا جريد فيو وانقل البيانات من الاولي الي الثانية بالفورم 2 اريد تطبيق الشروط الاتية

1- عدم نقل بيانات لصفوف سبق نقلها لكل مرة نقل ( حيث يضاف الي قاعدة بيانات الداتا الاولي صفوف جديدة مع الابقاء علي الصفوف القديمة )

2- نقل البيانات بكل الخلايا المطلوبة بشرط الا تكون قيم الخلية بالعمود الخامس او السادس خالية من الداتا جريد الاول الي الداتا جريد بالفورم 2

الكود الذي استخدمتة ولم ينقل معي


كود :
For intI As Integer = 0 To DataGridView1.Rows.Count - 1
           Dim AUTO As Integer = FORM2.DataSet1.Tables("TB1").Compute("Max(ID_TB)", "ID_TB >= 0") + "1"
           If Not DataGridView1.Rows(intI).Cells(6).Value = Nothing AndAlso DataGridView1.Rows(intI).Cells(5).Value.ToString.Length >= 11 Then
               Dim cmd As New OleDbCommand("insert into TB1 (ID_TB, NAME_TB,TELEPHON_TB,MON_TB,DATENOW_TB) values ('" & _
                                AUTO & "','" & DataGridView1.Rows(intI).Cells(1).Value & "','" & DataGridView1.Rows(intI).Cells(6).Value & " - " & DataGridView1.Rows(intI).Cells(5).Value & "','" & DataGridView1.Rows(intI).Cells(7).Value & "','" & "22/4/2015" & _
                                               "')")
               cmd.Connection = FORM2.con
               FORM2.con.Open()
               cmd.ExecuteNonQuery()
               FORM2.con.Close()
               If FORM2.con.State = ConnectionState.Open Then
                   FORM2.con.Close()
               End If

               Validate()
               DataGridView1.Refresh()
               FORM2.BindingSource1.EndEdit()
               FORM2.DataAdapter1.Update(FORM2.DataSet1, "TB1")
               FORM2.DataSet1.AcceptChanges()
               FORM2.conn()
               FORM2.count()
               MsgBox("تم الاضافه والحفظ بنجاح")
           End If

       Next
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] اريد اظهار الجمع الموجود في داتا قريد لكل شهر يظهر في label rochdi191 9 172 منذ 6 ساعة مضت
آخر رد: اسامه الهرماوي
  [VB.NET] كيفية اضافة drm لمتصفح geckofx لسبسيب 2 60 27-10-20, 02:51 PM
آخر رد: لسبسيب
  عكس ترتيب الصفوف في داتا جريد atefkhalf2004 4 76 26-10-20, 08:07 PM
آخر رد: atefkhalf2004
  [سؤال] طريقة ربط التكست بالداتا جريد فيو ابو يوسف 4 2,066 26-10-20, 04:20 PM
آخر رد: هاني هاني
  مساعدة في داتا جريد فيو cordava 1 82 22-10-20, 08:09 PM
آخر رد: Lathe1
  اخفاء صف في الداتا جريد بناء علي قيمه makky 1 105 22-10-20, 09:37 AM
آخر رد: mmali127
Thumbs Up [SQL] تطبيق عملى لمشروع قاعدة بيانات بSQL محمود بكير 1 117 13-10-20, 03:39 PM
آخر رد: محمد كريّم
  ربط ReportViewer بقاعدة بيانات access عليها password khaled Mohammed 0 75 13-10-20, 02:07 PM
آخر رد: khaled Mohammed
  [VB.NET] برنامج اقساط على الفجوال بيسك 2010 وقاعده بيانات سيكوال سيرفر 2008 shawky ahmed 1 149 12-10-20, 09:12 AM
آخر رد: mmali127
  [VB.NET] مساعدة لعمل برنامج حضور وانصراف+وقاعدة بيانات shone1 3 249 10-10-20, 01:14 PM
آخر رد: shone1

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


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