تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
سؤال بخصوص نقل بيانات
#1
كيفيه نقل البيانات من داتا جرد فيو الي داتا جريد فيو عند الضغط علي button يتم نسخ سطر محد الي الدات جريد فيو الاخره علما بان الداتا جريد فيو الثانيه باوند ولا يوجد اي ربط بين الجدولين الجدول الثاني يقراء من قاعده البيانات 

المشكله لما باجي بكتب الكود بتظهر الرساله ديت 
Input string was not in a correct format.Couldn't store <a> in cost Column.  Expected type is Decimal.


كود :
Imports System.Data.SqlClient

Public Class test3
   Dim DTable1 As New DataTable
   Dim DTable2 As New DataTable
   Private Sub test3_Load(sender As Object, e As EventArgs) Handles MyBase.Load
       Dim da As New SqlDataAdapter
       DTable1.Clear()
       da = New SqlDataAdapter("select cCDOE,cNAME from ITEMS", Con)
       da.Fill(DTable1)
       DataGridView1.DataSource = DTable1
       'DataGridView1.DataSource = DTable1.Clone


       Dim da1 As New SqlDataAdapter
       DTable2.Clear()
       da1 = New SqlDataAdapter("select qty,cost from ware", Con)
       da1.Fill(DTable2)
       DataGridView2.DataSource = DTable2
       'DataGridView2.DataSource = DTable2.Clone

   End Sub

 
 Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click

For Each dr In Me.DataGridView1.SelectedRows
            Dim drv = TryCast(dr, DataGridViewRow)
            DTable2.Rows.Add(CType(drv.DataBoundItem, DataRowView).Row.ItemArray)
        Next
 
   End Sub
End Class









[صورة مرفقة: file]
الرد
تم الشكر بواسطة:
#2
عزيزي

حقول DTable1 تختلف عن DTable2  Big Grin

عليك باضافة السطر الى DTable2 بطريقة مختلفة

تفضل التعديل على جزء من الكود مع تعديل رقم الأعمدة (4,2) كما هو مطابق لديك Smile
كود :
   Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click

       For Each dr As DataGridViewRow In Me.DataGridView1.SelectedRows
           Dim nr As DataRow = DTable2.NewRow
           nr.Item("qty") = Val(dr.Cells(2).Value)
           nr.Item("cost") = Val(dr.Cells(4).Value)
           DTable2.Rows.Add(nr)
       Next

   End Sub

المشكلة التي في الصورة الثانية ليس ضمن الكود  Smile
ولكنها تدل على عدم امكانية الاضافة مباشرة الى DataGridView إذا كان مرتبط بالبيانات عن طريق DataSource Big Grin
وإنما الإضافة تتم على DTable2 كما فعلت أنت في الكود المرفق وقمت أنا بتعديله لك  Smile
الرد
تم الشكر بواسطة: ابراهيم ايبو


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  سؤال حول استنساخ فورم لاستخدامه مرة اخرى او كيف يكون السؤال سعود 4 38 منذ 40 دقيقة مضت
آخر رد: ابراهيم ايبو
  سؤال جديد فى الكريستال ريبورت احمد خطاب 1 56 منذ 57 دقيقة مضت
آخر رد: اسامه الهرماوي
  [VB.NET] سؤال بخصوص الtext box bakriano30@yahoo.com 4 65 منذ 1 ساعه مضت
آخر رد: ابراهيم ايبو
  مشكلة عند الاتصال مع قاعدة بيانات sqlserver nooralcown 2 92 13-07-19, 10:01 AM
آخر رد: nooralcown
  سؤال فى الكريستال احمد خطاب 2 54 12-07-19, 08:54 PM
آخر رد: احمد خطاب
  [VB.NET] سؤال حول إعادة تسمية رؤوس الأعمدة ونوع خانات النص في تقرير بالكود Al Wilaya 5 100 12-07-19, 01:27 AM
آخر رد: asemshahen5
  [VB.NET] سؤال حول فرز البيانات في Combobox Al Wilaya 5 162 11-07-19, 12:12 AM
آخر رد: Al Wilaya
  سؤال فى التيكست احمد خطاب 3 88 09-07-19, 09:29 PM
آخر رد: ابراهيم ايبو
  [VB.NET] رسالة غريبة بعد إضافة بيانات (ظهرت و إختفت) sniperjawadino 7 226 09-07-19, 03:49 AM
آخر رد: sniperjawadino
  ربط الفورم بقاعدة بيانات اكسل ابو العلاء 2 77 09-07-19, 01:16 AM
آخر رد: ابو العلاء

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


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