[VB6] Treeview en boucle

Version imprimable

Bonjour j'essaye d'alimenter un treeview en boucle mais j'ai un probleme de clé unique sur ma deuxieme boucle pourquoi cela ?
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 TreeView1.Nodes.Add , , "affaire", "Affaire" While Not Rsaffaire.EOF TreeView1.Nodes.Add "affaire", tvwChild, "AF" & Rsaffaire("id_affaire"), "affaire " & Rsaffaire("num_affaire") TreeView1.Nodes("AF" & Rsaffaire("id_affaire")).EnsureVisible Rsphase.Close Rsphase.Open While Not Rsphase.EOF TreeView1.Nodes.Add "AF" & Rsaffaire("id_affaire"), tvwChild, "PH" & Rsphase("id_phase"), Rsphase("nom_phase") Rsphase.MoveNext Wend Rsaffaire.MoveNext Wend
la première boucle se passe bien mais la boucle ratachant les phases à l'affaire ne fonctionne pas j indique bien pourtant le noeud dont elle depend et le "PH" & Rsphase("id_phase") est unique

Cordialement,
Corben

15/07/2008, 17h09
Delbeke

Je ne suis pas sur que "PH" & Rsphase("id_phase") soit véritablement unique. Je le verrai unique pour un même Rsaffaire("id_affaire")

Pour test essaye de remplacer "PH" & Rsphase("id_phase") par "PH" & Rsaffaire("id_affaire") & "!" & Rsphase("id_phase") et dis nous si çà plante toujours.
15/07/2008, 18h25
Corben

Bonjour,
Merci cela ca fonctionne bien mais je ne vois pas prq car ds ma base de donnée rsaffaire('id_affaire') et rsphase('id_phase') sont des clés primaire.

donc je dois obtenir

AF1
PH1 PH2 PH3 PH4
AF2 ,
PH5 PH6 ..
AF3
et ....

donc ou est le probleme de clé ?

Cordialement,
Corben