Private Function DataView2DataSetConvertor(ByVal dv As DataView) As DataSet
Dim dt As DataTable = dv.Table.Copy
Dim dsRtn As New DataSet(dv.Table.TableName)
dsRtn.Tables.Add(dt)
Return dsRtn
End Function
Private Function DataView2DataSetConvertor(ByVal dv As DataView) As DataSet
Dim dt As DataTable = dv.Table.Copy
Dim dsRtn As New DataSet(dv.Table.TableName)
dsRtn.Tables.Add(dt)
Return dsRtn
End Function