Remplir un tableau dynamique
Bonjour,
Je récupère des données d'une base Access et je souhaite les ranger dans un tableau de clef / valeur.
Lorsque j'ai une seule ligne de résultat, je range ça dans un
Code:
Dim SQLoutputs As New System.Collections.Specialized.StringDictionary
Via le code:
Code:
1
2
3
4
5
6
7
8
9
| reader = command.ExecuteReader()
Dim count As Integer = 0
While reader.Read()
For Each key In SQLinputs.Keys
SQLoutputs(key) = reader(count)
count = count + 1
Next
count = 0
End While |
(J'ai aussi un tableau SQLinputs qui me définit les clefs à récupérer)
En revanche, lorsqu'il y a plusieurs lignes de résultats, comment déclarer proprement ma variable SQLoutputs ?
Peut-on et faut-il utiliser un ReDim Preserve à chaque nouveau résultat?
Je souhaiterais avoir un retour de la forme:
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
| SQLoutputs = {0 => System.Collections.Specialized.StringDictionary
{
"clef1" => "valeur1";
...
"clefN" => "valeurN"
}
...
M => System.Collections.Specialized.StringDictionary
{
"clef1" => "valeur1";
...
"clefN" => "valeurN"
}
} |
Merci
