Discussion :

[quentincabo]

Bonjour,

Quelqu'un pourrait-il me dire pourquoi ma boucle en rouge ne tourne une fois et pas le nombre de fois que ma boucle en verte tourne

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
26
27
28
 While (dr.Read())
                MsgBox(n)
                Dim min = (dr.Item("DENSMIN"))
                Dim max = (dr.Item("DENSMAX"))
                Dim moy = (dr.Item("DENSMOY"))
                Dim Actif As Boolean
                'converir les valeurs afin qu ils soient comphreensible par les check box
                If (dr.Item("ACTIF") = "Y") Then
                    Actif = True
                Else
                    Actif = False
                End If
                While (dr1.Read)
                    MsgBox("ok")
                    If (dr.Item("CODPRO") = dr1.Item("CODPRO")) Then
                        emulation = "ME"
                        'MsgBox("ok")
                    Else
                        emulation = ""
                    End If
                End While
                Dim rown As String() = {dr.Item("CODPRO"), min, max, moy, Actif, emulation}
                With Distinct.DatagridDensity.Rows
                    .Add(rown)
                End With
                n = n + 1
            End While

[boubounne]

Quels sont les contenus de DR et DR1 ??

[quentincabo]

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
 
        Dim n As Integer = 1
        Dim emulation As String = ""
        '-----------------------------------------------
        cmd.CommandText = requete
        cmd.AddRowid = True
        cmd.CommandType = CommandType.Text
        Dim dr As OracleDataReader = cmd.ExecuteReader()
        '-----------------------------------------------
        cmd1.CommandText = requete1
        cmd1.AddRowid = True
        cmd1.CommandType = CommandType.Text
        Dim dr1 As OracleDataReader = cmd1.ExecuteReader()

merci de ton aide

[quentincabo]

les requêtes sont les suivantes

Code :

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

"requete = select  * FROM PROCESSTRG.DENSITY"

Code :

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

 "requete1 = select  * FROM PROCESSTRG.AJUST_EM_NAOH_VOLMAX"

L'ouverture d'oracles 9 est réalisée mais je ne l'ajoute sauf demande de votre part. Les requêtes sont bonnes et les champs utilisé sont bon eux aussi.

C'est pourquoi moi je ne comprends pas

[BalBalNet]

Peut-être parce requete<>requete1 ...?

[quentincabo]

Pourquoi?? je ne comprends ce que tu veux dire par là

[BalBalNet]

si la requete (DR) ne renvoie pas le même nombre d'enregistrements que la requete1 (DR1), il est normal que leur boucle n'est pas non plus le même nombre de passage

[boubounne]

et tes requêtes retournent bien plusieurs résultats ?? Je sais que ma question est un peu débile, mais on sais jamais...

Sinon, il ne faut pas remettre le dr au debut une fois que t'a fini de le lire ?? du genre dr.close()

[quentincabo]

Avant tout merci de vos réponses:

Biboune : ma requete possède 23 résultats différents et ma requete1 possède 5 resultats différents

J'ai quand même rajouté close mais cela ne change rien

[quentincabo]

le but de mes boucles est de tester pour chaque élément de requete(dr) si un élément de requete1(dr1) est identique.

Mais cela le réalise parfaitement pour la premiere valeur de requete(dr) mais pour les 22 autres valeurs la boucle imbriquées ne se remet pas en route.
Et je ne sais pas pourquoi

[boubounne]

met un dr.close a la sortie du second while, et test..

[BalBalNet]

ah ok, dès la 2ème passe dans la boucle DR, le DR1 a déjà été lu jusqu'au bout
donc où il faut le relancer, ou travailler avec un dataset

[quentincabo]

OK merci, je crois que ce que tu dis est bon mais comment on relance une boucle ou on utilise un dataset.

merci d'avance

[BalBalNet]

Connais-tu la classe ADO ? Sinon comme ça :
http://www.developpez.net/forums/sho...hlight=dataset

[quentincabo]

Merci pour ton aide et pour le lien. maintenant, je vais chercher un peu par moi-même car je ne voudrai pas abusé.

Mais merci pour tout

J'ai oublie de te répondre oui je connais la classe ADO mais je ne suis loin d'être pro dans ce domaine