Public pListeGenericItem1 As List(Of genericDatas)
----GenericDatas Model-----
Public Class genericDatas
Public pId As Int64
Public pCode As String
End Class
Dim dtTable as New DataTable
dtTable="Select Query"
pListeGenericItem1 = (
From m In dtTable.Rows.Cast(Of DataRow)()
Select New genericDatas With {
.pId = m.Field(Of Int32)("pId"),
.pCode= m.Field(Of String)("pCode")
}).ToList()
----GenericDatas Model-----
Public Class genericDatas
Public pId As Int64
Public pCode As String
End Class
Dim dtTable as New DataTable
dtTable="Select Query"
pListeGenericItem1 = (
From m In dtTable.Rows.Cast(Of DataRow)()
Select New genericDatas With {
.pId = m.Field(Of Int32)("pId"),
.pCode= m.Field(Of String)("pCode")
}).ToList()
Sign up here with your email
ConversionConversion EmoticonEmoticon