Changement de la valeur du DataReader.read ()

Bonjour,

Disposant d'un DataReader qui permet de lire le résultat d'une requête select,
le résultat de ce DataReader est l'age d'un employé. Par exemp,e

Soit la requête suivante :

Code:

---

1 2	Dim req As String = "select Nom,Age from Matable group by Age"

---

Le résultat sera lu à partir d"'un DataReader.
J'aurai donc les différents noms des employés regroupés par Age.
Exemple :
XX 25
YY 25
ZZ 25

DD 30
AA 30
etc..
Je voudrai faire un traitement sur ces ages de telle sorte que je prendrai ceux qui ont le même age ensemnle (je ferai par exemple 25+25+25) , puis (30+30) etc..

Comment est-il possible de lire dans myDataReader uniquement les valeurs qui ont le même age ?
(Autrement, comment vérifier si la veleur du DataReader a changé dans le While myDataReader.read () ? )

J'espère que je suis claire...

Le DataReader ne contient qu'une seule ligne pour chaque lecture donc je crois que avec une variable intermédiaire dans laquel tu stocke la valeur du datareader et tu vérifier avec la prochaine valeur s'il y'a égalité tu additionne sinon tu affecte la valeur du datareader a la variable intermédiaire tu sauvegarde la somme et la réinitialise avec la valeur de la variable tampon ou du datareader. J'espère que tu me comprend.

@++ ;)

Citation:

---

Envoyé par lilroma

Le DataReader ne contient qu'une seule ligne pour chaque lecture donc je crois que avec une variable intermédiaire dans laquel tu stocke la valeur du datareader et tu vérifier avec la prochaine valeur s'il y'a égalité tu additionne sinon tu affecte la valeur du datareader a la variable intermédiaire tu sauvegarde la somme et la réinitialise avec la valeur de la variable tampon ou du datareader. J'espère que tu me comprend.

@++ ;)

---

Oui lilroma, j'ai bien compris ton raisonnement. Je vais voir dans ce sens, merci.

OK si tu a un problème fait nous signe ;)

@++

Citation:

---

Envoyé par amirad

Oui lilroma, j'ai bien compris ton raisonnement. Je vais voir dans ce sens, merci.

---

Bon je m'en sors toujours pas !

Liste un peut ton code pour voir.

voila un exemple a adapter a ton cas, je sauvegarde les addition dans le tableau "tab"

Code:

---

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 tab(20) as integer 'tableu ou sera sauvegarde la somme des ages dim inter as integer 'variable intermédiaire dim i as integer 'compteur i=0 'On lie la premiére ligne Reader.read() 'on initialise les variables avec la première ligne tab(i) = Reader.Getint(index) inter = Reader.Getint(index) 'On boucle sur les autres lignes while Reader.read() ' On vérifier si la précédente valeur est égal a celle dans le Reader if(inter=Reader.Getint(index)) 'On fait l'addition tab(i) = tab(i) + Reader.Getint(index) else 'on initiale inter inter = Reader.Getint(index) 'on incremente compteur i = i + 1 'on initialise la valeur de tab tab(i) = Reader.Getint(index) end if wend

---

Edit:
- je ne reviens plus sur la connexion et l'exécution de la requête je suppose que c'est fait.
- j'ai pas utiliser d'éditeur pour ce code donc il pourrais avoir des erreurs de syntaxe :aie:
- Dans le cas ou les éléments distinct sont plus de 20 y'aura une exception puisque j'ai déclarer un tableau de 20 éléments sinon voila au moins de quoi te guider

@++ ;)

Citation:

---

Envoyé par lilroma

voila un exemple a adapter a ton cas, je sauvegarde les addition dans le tableau "tab"

Code:

---

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 tab(20) as integer 'tableu ou sera sauvegarde la somme des ages dim inter as integer 'variable intermédiaire dim i as integer 'compteur i=0 'On lie la premiére ligne Reader.read() 'on initialise les variables avec la première ligne tab(i) = Reader.Getint(index) inter = Reader.Getint(index) 'On boucle sur les autres lignes while Reader.read() ' On vérifier si la précédente valeur est égal a celle dans le Reader if(inter=Reader.Getint(index)) 'On fait l'addition tab(i) = tab(i) + Reader.Getint(index) else 'on initiale inter inter = Reader.Getint(index) 'on incremente compteur i = i + 1 'on initialise la valeur de tab tab(i) = Reader.Getint(index) end if wend

---

Edit:
- je ne reviens plus sur la connexion et l'exécution de la requête je suppose que c'est fait.
- j'ai pas utiliser d'éditeur pour ce code donc il pourrais avoir des erreurs de syntaxe :aie:
- Dans le cas ou les éléments distinct sont plus de 20 y'aura une exception puisque j'ai déclarer un tableau de 20 éléments sinon voila au moins de quoi te guider

@++ ;)

---

Merci, je testerai ceci demain.

Citation:

---

Envoyé par lilroma

- Dans le cas ou les éléments distinct sont plus de 20 y'aura une exception puisque j'ai déclarer un tableau de 20 éléments sinon voila au moins de quoi te guider

---

Dans ce cas la, il n'a qu'a utiliser un tableau dit dynamique genre ArrayList ou generis... on se contentera des tests sans avoir à penser au nombre d'enregistrement que retourne la requête.