G
Guest
How can I re-sort a dataset.?
The code below doesn't do anything
Dim drs() As DataRow
Dim ds1 As DataSet, tab As DataTable
Dim dr As DataRow, dr1 As DataRow
Dim i As Integer, l As Integer
ds.Tables(0).DefaultView.Sort = "District, storeid desc"
drs = ds.Tables(0).Select("District=District")
ds1 = ds.Clone
tab = ds1.Tables(0)
l = tab.Columns.Count - 1
For Each dr In drs
dr1 = tab.NewRow
For i = 0 To l
dr1.Item(i) = dr.ItemArray(i)
Next
tab.Rows.Add(dr1)
Next
Return ds1.Tables(0).Rows
The code below doesn't do anything
Dim drs() As DataRow
Dim ds1 As DataSet, tab As DataTable
Dim dr As DataRow, dr1 As DataRow
Dim i As Integer, l As Integer
ds.Tables(0).DefaultView.Sort = "District, storeid desc"
drs = ds.Tables(0).Select("District=District")
ds1 = ds.Clone
tab = ds1.Tables(0)
l = tab.Columns.Count - 1
For Each dr In drs
dr1 = tab.NewRow
For i = 0 To l
dr1.Item(i) = dr.ItemArray(i)
Next
tab.Rows.Add(dr1)
Next
Return ds1.Tables(0).Rows