Rydde op i dataset

Oprettelsen af datasettet ser således ud:

Dim tempvarerdataset As New DataSet ''former Saetproduktionsplandataset
        Dim tempvarerlinier As New DataTable ''former saetplanlinier

        Dim tempvarerID As New DataColumn
        Dim tempvarerAntal As New DataColumn
        tempvarerdataset.Tables.AddRange(New System.Data.DataTable() {tempvarerlinier})
        tempvarerlinier.Columns.AddRange(New System.Data.DataColumn() {tempvarerID, tempvarerAntal})
        tempvarerlinier.TableName = "Table1"
        tempvarerID.AutoIncrement = True
        tempvarerID.ColumnName = "Column1"
        tempvarerID.DataType = GetType(System.Int32)

Oprettelsen af datasettet ser således ud:

Dim tempvarerdataset As New DataSet
Dim tempvarerlinier As New DataTable

Dim tempvarerID As New DataColumn
Dim tempvarerAntal As New DataColumn
tempvarerdataset.Tables.AddRange(New System.Data.DataTable() {tempvarerlinier})
tempvarerlinier.Columns.AddRange(New System.Data.DataColumn() {tempvarerID, tempvarerAntal})
tempvarerlinier.TableName = "Table1"
tempvarerID.AutoIncrement = True
tempvarerID.ColumnName = "Column1"
tempvarerID.DataType = GetType(System.Int32)

Har overvejet at starte fra vareid 1 til antallet af vareid i databasen, og så tælle én vareid op efter endt tælling, men hvis der er 100.000 vareid'er, tager det for lang tid hver gang...

For at få fat i de unikke VareID i datatable'en kan du lave en ny datatable som vist her:
http://weblogs.asp.net/eporter/archive/2005/02/10/370548.aspx

Når du så har de unikke vareid'er, så kan du på den oprindelige tabel køre en .compute metode til at tælle dem sammen for hvert vareid  og lægge resultatet i den nye tabel.
http://msdn2.microsoft.com/en-us/library/system.data.datatable.compute(vs.80).aspx

Er det ikke kun første del af nedenstående der skal bruges? http://weblogs.asp.net/eporter/archive/2005/02/10/370548.aspx
altså SelectDistinct

prøv lige at læse nederst i artiklen "Update 2"

Nu har jeg også læst de kommentarer folk har tilføjet til artiklen, og hvis jeg har opfattet dem korrekt så ser det ud til, at den anførte kode er hurtigere end det nye forslag med dataviews

Godt nok bange for det går lidt over evner:-(

mener du:

kramlen said: 
here is something I wrote that does the same thing - yet

just seems easier to understand:

public static DataTable SelectDistinct(string[] pColumnNames, DataTable pOriginalTable)

Altså den opretter en ny dataset hvor der er id felter, hvor man så kan skelne dem fra hinanden?

Det jeg mener er at den kode artiklens forfatter angiver gør det samme som den senere foreslåede metode md dataviews, men i kommentarerne synes det at fremgå, at hans kode er væsentlig hurtigere.

Nej - en datatable, ej et nyt dataset.
For at kunne tælle sammen på vareid'er så skal man vide hvilke unikke vareid'er der er i tabellen - det er hvad
http://weblogs.asp.net/eporter/archive/2005/02/10/370548.aspx leverer i en ny datatable.

Når man så har listen så kan man tælle sammen med .compute

Ahh ok - jeg kigger på det, og vender tilbage. Tak for hjælpen foreløbig

Ok - jeg har nu fået oprettet et datatable, som indeholde alle unikke id'er. Hvordan kan man nemmest løbe igennem et datatable og få fat på hver enkel værdi inden man går videre til den næste?

Jeg kan ikke få det til at virke. Plejer at løbe igennem et dataset - skal jeg smide værdierne over i et dataset for at løbe igennem dem?

Er lidt ude i dette, men kan ikke se hvordam man får fat på værdien er den enkelte row.
Dim dr As DataRow
        Dim dt As DataTable

        Dim i As Integer = 0
        While i < dt.Rows.Count
            dr = dt.Rows(i)
            If temp = "hej" Then
                dr.Delete()
            Else
                i = i + 1  'tæl kun op hvis der ikke slettes en række
            End If
        End While

Det er en god ting at google sådanne ting - nettet er fyldt med  eksempler på gennemløb af datatables.

For each workRow as DataRow in myTable.Rows
  Dim værdi1 as Hvad_den_nu_er
Dim værdi2 as Hvad_den_nu_er
  Værdi1=workRow(0) ' hvis den nu sidder i kolonne 1
  Værdi2=workRow(1) ' hvis den sidder i kolonne 2

next

hvorfor vil du delete rows ? det er et kapitel for sig hvordan  man gør det

nej nej det vil jeg heller ikke... Har nu søgt google, men jeg ved ikke rigtig hvor jeg skal begynde...

Takker det virker...

smider du et svar, så for du dine fortjente point

here goes:)