27-04-19, 06:24 PM
كيفيه نقل البيانات من داتا جرد فيو الي داتا جريد فيو عند الضغط علي button يتم نسخ سطر محد الي الدات جريد فيو الاخره علما بان الداتا جريد فيو الثانيه باوند ولا يوجد اي ربط بين الجدولين الجدول الثاني يقراء من قاعده البيانات
المشكله لما باجي بكتب الكود بتظهر الرساله ديت
Input string was not in a correct format.Couldn't store <a> in cost Column. Expected type is Decimal.
![[صورة مرفقة: file]](https://www.mediafire.com/view/f5d7ppbdh0ex69k/2.jpg/file)
المشكله لما باجي بكتب الكود بتظهر الرساله ديت
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 
