| Groups | Blog | Home |
vb.net data : Select Distinct on a DataTable
Doug,
Can't you just get the database to give you what you need? Kerry Moorman [quoted text, click to view] "Doug Bell" wrote:
> Hi, > > I have a DataSet with a DataTable that has a number of duplicate rows > (except for one column that has a unique value). > > Each row has OrderNo, OrderLineNo, etc and there are multiple rows with > the same OrderNo and OrderLineNo. > > I need to display data in a DataGrid but displaying only one record for each > OrderNo OrderLineNo. > > I was thinking about constructing a new DataTable holding the Unique > OrderNo-OrderLineNo records, something along the lines of code below but I > need to have the data ordered by 2 columns to do that. > > Any ideas or suggestions? > > Thanks, Doug > > Dim dt as DataTable = New DataTable > dt = dsMyDataSet.Tables("MyDataTable").Clone > Dim dr, drNew as DataRow > Dim drs() as DataRow = dsMyDataSet.Tables("MyDataTable").Select("PickList = > " & PickListNo, "OrderNo ASC") 'How can I sort on 2 Columns OrderNo and > OrderLineNo > Dim iOrd, iOrdLin as Integer > Dim iCol as integer > dim iCols as integer = dt.Columns.Count-1 > > for each dr in drs > If iOrd <> dr("OrderNo") and iOrdLin <> dr("OrderLineNo") Then > drNew = dt.NewRow > For iCol = 0 to iCols > drNew(iCol) = dr(iCol) > Next iCol > dt.Rows.Add(drNew) > Else > iOrd = dr("OrderNo") > iOrdLin <> dr("OrderLineNo") > End If > > next dr > >
Doug
You know that it is a standard overloaded method from 2.0 Cor "Doug Bell" <dug@bigpond.com> schreef in bericht news:uADgWgdgHHA.2432@TK2MSFTNGP03.phx.gbl... [quoted text, click to view] >I solved the problem using a DataView to create the new Table. > > > "Doug Bell" <dug@bigpond.com> wrote in message > news:umg1encgHHA.4260@TK2MSFTNGP03.phx.gbl... >> Hi, >> >> I have a DataSet with a DataTable that has a number of duplicate rows >> (except for one column that has a unique value). >> >> Each row has OrderNo, OrderLineNo, etc and there are multiple rows with >> the same OrderNo and OrderLineNo. >> >> I need to display data in a DataGrid but displaying only one record for > each >> OrderNo OrderLineNo. >> >> I was thinking about constructing a new DataTable holding the Unique >> OrderNo-OrderLineNo records, something along the lines of code below but >> I >> need to have the data ordered by 2 columns to do that. >> >> Any ideas or suggestions? >> >> Thanks, Doug >> >> Dim dt as DataTable = New DataTable >> dt = dsMyDataSet.Tables("MyDataTable").Clone >> Dim dr, drNew as DataRow >> Dim drs() as DataRow = dsMyDataSet.Tables("MyDataTable").Select("PickList > = >> " & PickListNo, "OrderNo ASC") 'How can I sort on 2 Columns OrderNo and >> OrderLineNo >> Dim iOrd, iOrdLin as Integer >> Dim iCol as integer >> dim iCols as integer = dt.Columns.Count-1 >> >> for each dr in drs >> If iOrd <> dr("OrderNo") and iOrdLin <> dr("OrderLineNo") Then >> drNew = dt.NewRow >> For iCol = 0 to iCols >> drNew(iCol) = dr(iCol) >> Next iCol >> dt.Rows.Add(drNew) >> Else >> iOrd = dr("OrderNo") >> iOrdLin <> dr("OrderLineNo") >> End If >> >> next dr >> >> > >
Cor, Please enlighten me.
[quoted text, click to view] "Cor Ligthert [MVP]" <notmyfirstname@planet.nl> wrote in message news:egmXDxdgHHA.4924@TK2MSFTNGP06.phx.gbl... > Doug > > You know that it is a standard overloaded method from 2.0 > > Cor > > "Doug Bell" <dug@bigpond.com> schreef in bericht > news:uADgWgdgHHA.2432@TK2MSFTNGP03.phx.gbl... > >I solved the problem using a DataView to create the new Table. > > > > > > "Doug Bell" <dug@bigpond.com> wrote in message > > news:umg1encgHHA.4260@TK2MSFTNGP03.phx.gbl... > >> Hi, > >> > >> I have a DataSet with a DataTable that has a number of duplicate rows > >> (except for one column that has a unique value). > >> > >> Each row has OrderNo, OrderLineNo, etc and there are multiple rows with > >> the same OrderNo and OrderLineNo. > >> > >> I need to display data in a DataGrid but displaying only one record for > > each > >> OrderNo OrderLineNo. > >> > >> I was thinking about constructing a new DataTable holding the Unique > >> OrderNo-OrderLineNo records, something along the lines of code below but > >> I > >> need to have the data ordered by 2 columns to do that. > >> > >> Any ideas or suggestions? > >> > >> Thanks, Doug > >> > >> Dim dt as DataTable = New DataTable > >> dt = dsMyDataSet.Tables("MyDataTable").Clone > >> Dim dr, drNew as DataRow > >> Dim drs() as DataRow = dsMyDataSet.Tables("MyDataTable").Select("PickList > > = > >> " & PickListNo, "OrderNo ASC") 'How can I sort on 2 Columns OrderNo and > >> OrderLineNo > >> Dim iOrd, iOrdLin as Integer > >> Dim iCol as integer > >> dim iCols as integer = dt.Columns.Count-1 > >> > >> for each dr in drs > >> If iOrd <> dr("OrderNo") and iOrdLin <> dr("OrderLineNo") Then > >> drNew = dt.NewRow > >> For iCol = 0 to iCols > >> drNew(iCol) = dr(iCol) > >> Next iCol > >> dt.Rows.Add(drNew) > >> Else > >> iOrd = dr("OrderNo") > >> iOrdLin <> dr("OrderLineNo") > >> End If > >> > >> next dr > >> > >> > > > > > >
http://msdn2.microsoft.com/en-us/library/h2b6ehaa.aspx
"Doug Bell" <dug@bigpond.com> schreef in bericht news:O91LyvhgHHA.3412@TK2MSFTNGP02.phx.gbl... [quoted text, click to view] > Cor, Please enlighten me. > > "Cor Ligthert [MVP]" <notmyfirstname@planet.nl> wrote in message > news:egmXDxdgHHA.4924@TK2MSFTNGP06.phx.gbl... >> Doug >> >> You know that it is a standard overloaded method from 2.0 >> >> Cor >> >> "Doug Bell" <dug@bigpond.com> schreef in bericht >> news:uADgWgdgHHA.2432@TK2MSFTNGP03.phx.gbl... >> >I solved the problem using a DataView to create the new Table. >> > >> > >> > "Doug Bell" <dug@bigpond.com> wrote in message >> > news:umg1encgHHA.4260@TK2MSFTNGP03.phx.gbl... >> >> Hi, >> >> >> >> I have a DataSet with a DataTable that has a number of duplicate rows >> >> (except for one column that has a unique value). >> >> >> >> Each row has OrderNo, OrderLineNo, etc and there are multiple rows > with >> >> the same OrderNo and OrderLineNo. >> >> >> >> I need to display data in a DataGrid but displaying only one record >> >> for >> > each >> >> OrderNo OrderLineNo. >> >> >> >> I was thinking about constructing a new DataTable holding the Unique >> >> OrderNo-OrderLineNo records, something along the lines of code below > but >> >> I >> >> need to have the data ordered by 2 columns to do that. >> >> >> >> Any ideas or suggestions? >> >> >> >> Thanks, Doug >> >> >> >> Dim dt as DataTable = New DataTable >> >> dt = dsMyDataSet.Tables("MyDataTable").Clone >> >> Dim dr, drNew as DataRow >> >> Dim drs() as DataRow = > dsMyDataSet.Tables("MyDataTable").Select("PickList >> > = >> >> " & PickListNo, "OrderNo ASC") 'How can I sort on 2 Columns OrderNo >> >> and >> >> OrderLineNo >> >> Dim iOrd, iOrdLin as Integer >> >> Dim iCol as integer >> >> dim iCols as integer = dt.Columns.Count-1 >> >> >> >> for each dr in drs >> >> If iOrd <> dr("OrderNo") and iOrdLin <> dr("OrderLineNo") Then >> >> drNew = dt.NewRow >> >> For iCol = 0 to iCols >> >> drNew(iCol) = dr(iCol) >> >> Next iCol >> >> dt.Rows.Add(drNew) >> >> Else >> >> iOrd = dr("OrderNo") >> >> iOrdLin <> dr("OrderLineNo") >> >> End If >> >> >> >> next dr >> >> >> >> >> > >> > >> >> > >
Hi,
I have a DataSet with a DataTable that has a number of duplicate rows (except for one column that has a unique value). Each row has OrderNo, OrderLineNo, etc and there are multiple rows with the same OrderNo and OrderLineNo. I need to display data in a DataGrid but displaying only one record for each OrderNo OrderLineNo. I was thinking about constructing a new DataTable holding the Unique OrderNo-OrderLineNo records, something along the lines of code below but I need to have the data ordered by 2 columns to do that. Any ideas or suggestions? Thanks, Doug Dim dt as DataTable = New DataTable dt = dsMyDataSet.Tables("MyDataTable").Clone Dim dr, drNew as DataRow Dim drs() as DataRow = dsMyDataSet.Tables("MyDataTable").Select("PickList = " & PickListNo, "OrderNo ASC") 'How can I sort on 2 Columns OrderNo and OrderLineNo Dim iOrd, iOrdLin as Integer Dim iCol as integer dim iCols as integer = dt.Columns.Count-1 for each dr in drs If iOrd <> dr("OrderNo") and iOrdLin <> dr("OrderLineNo") Then drNew = dt.NewRow For iCol = 0 to iCols drNew(iCol) = dr(iCol) Next iCol dt.Rows.Add(drNew) Else iOrd = dr("OrderNo") iOrdLin <> dr("OrderLineNo") End If next dr
I would have if I could.
The duplicate records are required. [quoted text, click to view] "Kerry Moorman" <KerryMoorman@discussions.microsoft.com> wrote in message news:6814F8E9-EBCC-4FC9-88B8-DD00A0466D27@microsoft.com... > Doug, > > Can't you just get the database to give you what you need? > > Kerry Moorman > > > "Doug Bell" wrote: > > > Hi, > > > > I have a DataSet with a DataTable that has a number of duplicate rows > > (except for one column that has a unique value). > > > > Each row has OrderNo, OrderLineNo, etc and there are multiple rows with > > the same OrderNo and OrderLineNo. > > > > I need to display data in a DataGrid but displaying only one record for each > > OrderNo OrderLineNo. > > > > I was thinking about constructing a new DataTable holding the Unique > > OrderNo-OrderLineNo records, something along the lines of code below but I > > need to have the data ordered by 2 columns to do that. > > > > Any ideas or suggestions? > > > > Thanks, Doug > > > > Dim dt as DataTable = New DataTable > > dt = dsMyDataSet.Tables("MyDataTable").Clone > > Dim dr, drNew as DataRow > > Dim drs() as DataRow = dsMyDataSet.Tables("MyDataTable").Select("PickList = > > " & PickListNo, "OrderNo ASC") 'How can I sort on 2 Columns OrderNo and > > OrderLineNo > > Dim iOrd, iOrdLin as Integer > > Dim iCol as integer > > dim iCols as integer = dt.Columns.Count-1 > > > > for each dr in drs > > If iOrd <> dr("OrderNo") and iOrdLin <> dr("OrderLineNo") Then > > drNew = dt.NewRow > > For iCol = 0 to iCols > > drNew(iCol) = dr(iCol) > > Next iCol > > dt.Rows.Add(drNew) > > Else > > iOrd = dr("OrderNo") > > iOrdLin <> dr("OrderLineNo") > > End If > > > > next dr > > > > > >
I solved the problem using a DataView to create the new Table.
[quoted text, click to view] "Doug Bell" <dug@bigpond.com> wrote in message news:umg1encgHHA.4260@TK2MSFTNGP03.phx.gbl... > Hi, > > I have a DataSet with a DataTable that has a number of duplicate rows > (except for one column that has a unique value). > > Each row has OrderNo, OrderLineNo, etc and there are multiple rows with > the same OrderNo and OrderLineNo. > > I need to display data in a DataGrid but displaying only one record for each > OrderNo OrderLineNo. > > I was thinking about constructing a new DataTable holding the Unique > OrderNo-OrderLineNo records, something along the lines of code below but I > need to have the data ordered by 2 columns to do that. > > Any ideas or suggestions? > > Thanks, Doug > > Dim dt as DataTable = New DataTable > dt = dsMyDataSet.Tables("MyDataTable").Clone > Dim dr, drNew as DataRow > Dim drs() as DataRow = dsMyDataSet.Tables("MyDataTable").Select("PickList = > " & PickListNo, "OrderNo ASC") 'How can I sort on 2 Columns OrderNo and > OrderLineNo > Dim iOrd, iOrdLin as Integer > Dim iCol as integer > dim iCols as integer = dt.Columns.Count-1 > > for each dr in drs > If iOrd <> dr("OrderNo") and iOrdLin <> dr("OrderLineNo") Then > drNew = dt.NewRow > For iCol = 0 to iCols > drNew(iCol) = dr(iCol) > Next iCol > dt.Rows.Add(drNew) > Else > iOrd = dr("OrderNo") > iOrdLin <> dr("OrderLineNo") > End If > > next dr > >
Thank you Cor
[quoted text, click to view] "Cor Ligthert [MVP]" <notmyfirstname@planet.nl> wrote in message news:e054qGkgHHA.1216@TK2MSFTNGP03.phx.gbl... > http://msdn2.microsoft.com/en-us/library/h2b6ehaa.aspx > > > "Doug Bell" <dug@bigpond.com> schreef in bericht > news:O91LyvhgHHA.3412@TK2MSFTNGP02.phx.gbl... > > Cor, Please enlighten me. > > > > "Cor Ligthert [MVP]" <notmyfirstname@planet.nl> wrote in message > > news:egmXDxdgHHA.4924@TK2MSFTNGP06.phx.gbl... > >> Doug > >> > >> You know that it is a standard overloaded method from 2.0 > >> > >> Cor > >> > >> "Doug Bell" <dug@bigpond.com> schreef in bericht > >> news:uADgWgdgHHA.2432@TK2MSFTNGP03.phx.gbl... > >> >I solved the problem using a DataView to create the new Table. > >> > > >> > > >> > "Doug Bell" <dug@bigpond.com> wrote in message > >> > news:umg1encgHHA.4260@TK2MSFTNGP03.phx.gbl... > >> >> Hi, > >> >> > >> >> I have a DataSet with a DataTable that has a number of duplicate rows > >> >> (except for one column that has a unique value). > >> >> > >> >> Each row has OrderNo, OrderLineNo, etc and there are multiple rows > > with > >> >> the same OrderNo and OrderLineNo. > >> >> > >> >> I need to display data in a DataGrid but displaying only one record > >> >> for > >> > each > >> >> OrderNo OrderLineNo. > >> >> > >> >> I was thinking about constructing a new DataTable holding the Unique > >> >> OrderNo-OrderLineNo records, something along the lines of code below > > but > >> >> I > >> >> need to have the data ordered by 2 columns to do that. > >> >> > >> >> Any ideas or suggestions? > >> >> > >> >> Thanks, Doug > >> >> > >> >> Dim dt as DataTable = New DataTable > >> >> dt = dsMyDataSet.Tables("MyDataTable").Clone > >> >> Dim dr, drNew as DataRow > >> >> Dim drs() as DataRow = > > dsMyDataSet.Tables("MyDataTable").Select("PickList > >> > = > >> >> " & PickListNo, "OrderNo ASC") 'How can I sort on 2 Columns OrderNo > >> >> and > >> >> OrderLineNo > >> >> Dim iOrd, iOrdLin as Integer > >> >> Dim iCol as integer > >> >> dim iCols as integer = dt.Columns.Count-1 > >> >> > >> >> for each dr in drs > >> >> If iOrd <> dr("OrderNo") and iOrdLin <> dr("OrderLineNo") Then > >> >> drNew = dt.NewRow > >> >> For iCol = 0 to iCols > >> >> drNew(iCol) = dr(iCol) > >> >> Next iCol > >> >> dt.Rows.Add(drNew) > >> >> Else > >> >> iOrd = dr("OrderNo") > >> >> iOrdLin <> dr("OrderLineNo") > >> >> End If > >> >> > >> >> next dr > >> >> > >> >> > >> > > >> > > >> > >> > > > > > >
Don't see what you're looking for? Try a search.
|
February 2004
March 2004
April 2004
May 2004
June 2004
July 2004
August 2004
September 2004
October 2004
November 2004
December 2004
January 2005
February 2005
March 2005
April 2005
May 2005
June 2005
July 2005
August 2005
September 2005
October 2005
November 2005
December 2005
January 2006
February 2006
March 2006
April 2006
May 2006
June 2006
July 2006
August 2006
September 2006
October 2006
November 2006
December 2006
January 2007
February 2007
March 2007
April 2007
May 2007
June 2007
July 2007
August 2007
September 2007
October 2007
| home · blog · groups | Questions? Comments? Contact the dn |