Discussion :

[zayoub]

Bonjour,
J'ai une requête SELECT qui me retourne plusieurs lignes , j'utilise les valeurs de ces lignes retournés pour effectuer un INSERT, j'ai décider d'utiliser le Dataset pour récupérer tout les lignes à la fois puis parcourir ces lignes avec un (For each) Voici le code que j'utilise :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
 
    Dim MyAdapter As SqlDataAdapter
    Dim MyDataset As DataSet
    Dim MyDatarow As DataRow
    Dim MyDatatable As DataTable
 
 
 MyDataset = New DataSet()
 
        'Instantiate  DataAdapter object
        MyAdapter = New SqlDataAdapter()
 
        'Set DataAdapter command properties
        MyAdapter.SelectCommand = cmd
 
        'Populate the Dataset
        MyAdapter.Fill(MyDataset)
 
 
        MyDatatable = MyDataset.Tables(0)
        For Each MyDatarow In MyDatatable.Rows
            Val1 = la valeur stocker dans la 1er colone du Dataset
            Val2= la la valeur stocker dans la 2eme colone du Dataset
             .....
        Next

Comment écrire la partie du ( For Each ) en code VB svp ?

[zayoub]

c'est bon j'ai trouver le morceau de code qui me manqué :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
For i = 0 To MyDataset.Tables(0).Rows.Count - 1
            val1 = MyDataset.Tables(0).Rows(i).Item(0)
            val2 = MyDataset.Tables(0).Rows(i).Item(1)
            val3 = MyDataset.Tables(0).Rows(i).Item(2)
 
        Next

cette boucle me permet de stocker les valeurs d'une seule ligne à la fois, j'espère que ça vous aidera un jour