Discussion :

[amirad]

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 :

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

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...

[Hinault Romaric]

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.

@++

[amirad]

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.

[Hinault Romaric]

OK si tu a un problème fait nous signe

@++

[amirad]

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

Bon je m'en sors toujours pas !

[Charaf Eddine]

Liste un peut ton code pour voir.

[Hinault Romaric]

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

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 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
- 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

@++

[amirad]

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

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 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
- 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.

[Charaf Eddine]

- 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.