Bonjour à tous,
J'ai une petite demande de dev à faire et seulement toute cette demande est finie sauf un dernier composant que j'arrive pas à magner c'est le treeview
Actuellement j'ai une arborescence à faire de ce style
GroupMcu 1
.......|_______Mcu de groupmcu1
GroupMcu 2
.......|_______Mcu de groupmcu2
Actuellement voici mon code et ce qu'il me fait
GroupMcu 1
.......|_______Mcu de groupmcu1
.......|.........................|_____Mcu de groupmcu2
.......|
GroupMcu 2
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 Sql = "SELECT GroupMcuCode,GroupMCUName, MCUName FROM " & base & ".T_MCU, " & base & ".T_GroupMCU WHERE T_MCU.MCUGroupCode = T_GroupMCU.GroupMcuCode ORDER BY GroupMcuName ASC" Indiceconnection = Fct_RechercheConnection(CustURL) Index = 0 Set ObjAdoDri = TabCustUrl(Indiceconnection).ObjAdoCust.Execute(Sql) While Not ObjAdoDri.EOF GroupMcuNew = ObjAdoDri!GroupMcuName If GroupMcu = GroupMcuNew Then Set NodeX = tvMCU.Nodes.Add(1, tvwChild, , ObjAdoDri!MCUName) Else Set NodeX = tvMCU.Nodes.Add(, , , ObjAdoDri!GroupMcuName) End If GroupMcu = GroupMcuNew ObjAdoDri.MoveNext Wend
Partager