-- Filtering - first copy to dataview then filter
Dim companyView As DataView = compnayDataSet.Tables("Emp").DefaultView
companyView .Table.DefaultView.RowFilter = "ROWID >= '" & FirstRecord & "' AND ROWID < " & FirstRecord + 10000
-- Export back to DataSet
Dim FilteredCompany As DataSet = New DataSet()
FilteredCompany .Tables.Add(companyView .ToTable())
FilteredCompany .Tables(0).TableName = "Emp"
No comments:
Post a Comment