tu peux utiliser une datatable au lieu d'un dataset. Voici ce que je ferais......
Dim myAdapter AsNew SqlDataAdapter
With myAdapter
.SelectCommand = New SqlCommand("SELECT mail, article, quantit,, prix from table")
.SelectCommand.Connection = OUFConnection
EndWith
Dim myResultTable AsNew DataTable()
myAdapter.Fill(myResultTable)
ForEach row As DataRow In myResultTable.Rows
Dim mail = row("mail")
Dim article = row("article")
Dim quantite = row("quantite"))
Dim prix AsDouble = row("quantite")
Next
Nicolas!
