Pb avec un treeview

Version imprimable

27/02/2009, 22h27
Anaxagore

Pb avec un treeview
Bonsoir,

Apres de nombreuses recherches sur les sites, les forums, etc... j'ai bcp de mal a comprendre la philosophie du treeview.
J'essaye depuis environ 4 heures de construire un treeview pour lister les propriété des mes différentes cartes réseaux.

En gros j essaye de faire ceci :
Nom de la carte
- Mac adress
- connecté ou non
- Vitesse
- IP
- Subnet
- Passerelle
- DNS1
- DNS2

je collecte mes informations depuis :
Code:

1 2 mesInterfaces = NetworkInterface.GetAllNetworkInterfaces
Je ne suis pas arrivé a faire le 1er Noeds qui est d'inscrire : Interface réseau.

Helppppppppppppppppp :help:

Merci a vous

Anax
27/02/2009, 23h17
tomlev
L'arbre que tu veux obtenir au final, il est comme ça ?
- Interfaces réseau
  - Nom de la carte 1
    
    Mac adress
    connecté ou non
    Vitesse
    IP
    Subnet
    Passerelle
    DNS1
    DNS2
  - Nom de la carte 2
    
    Mac adress
    connecté ou non
    Vitesse
    IP
    Subnet
    Passerelle
    DNS1
    DNS2
Dans ce cas, tu commences par créer le noeud racine :

Code:

Dim rootNode As TreeNode = treeView1.Nodes.Add("Interfaces réseau")

Ensuite, pour chaque interface, tu ajoutes au noeud racine un sous-noeud :

Code:

Dim interfaceNode As TreeNode = rootNode.Nodes.Add(nom_de_l_interface)

Auquel tu ajoutes un sous-noeud pour chaque propriété de l'interface :
Code:

1 2 3 interfaceNode.Nodes.Add("Adresse MAC : " & adresse_mac) interfaceNode.Nodes.Add("Connecté : " & connecte) ...
27/02/2009, 23h30
Anaxagore

c est exactement cela :)
Je n'y comprends decidement rien au treeview :(
mais par contre je vais devoir sauver les infos.
Je vais regarder comment le lire pour le sauvearder en fin de traitement :)
Encore merci bcp

Anax
28/02/2009, 00h32
tomlev

Citation:

Envoyé par Anaxagore

Je n'y comprends decidement rien au treeview

Ben c'est pas compliqué en fait :
- le TreeView contient des noeuds, qui sont de type TreeNode
- les noeuds racine (de premier niveau) sont dans la collection Nodes du TreeView
- chaque TreeNode a une collection de sous-noeuds, accessibles par sa propriété Nodes

Bon desolé mais apres test, je n'y arrive tjrs pas :(
voici le code que j'utilise

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
        'Interfaces Réseau
        'Initialisation de root réseau du treeview
        Dim rootNode As TreeNode = TheTreeview.Nodes.Add("Network Interface")
 
        ' Récuparétion de la liste des interfaces réseau
        mesInterfaces = NetworkInterface.GetAllNetworkInterfaces
        Dim inter As NetworkInterface
 
        Try
            For Each inter In mesInterfaces
                Dim interfaceNode As TreeNode = rootNode.Nodes.Add(inter.Description)
                interfaceNode.Nodes.Add("Status : " & monInterface.OperationalStatus.ToString)
            Next
        Catch ex As Exception
            Dim interfaceNode As TreeNode = rootNode.Nodes.Add("Impossible de détecter une interface sur cette machine")
        End Try

Chose assez bizarre :

1) Qud je retire

Code:

1
2
 
interfaceNode.Nodes.Add("Status : " & monInterface.OperationalStatus.ToString)

J'obtiens bien :
Interfaces réseau
* Nom de la carte 1
* Nom de la carte 2

Par contre en le laissant j'obtiens :
Interfaces réseau
* Nom de la carte 1
* Impossible de détecter une interface sur cette machine

Je ne comprends pas pourquoi il ne change la donne qud j'ajoute des information :(

Anax

28/02/2009, 00h51
tomlev

Faire un try/catch, c'est bien, mais si tu en profites pour récupérer les infos sur l'exception c'est mieux ;)
Ca permet de voir ce qui s'est passé

Enfin bon, je soupçonne une NullReferenceException... Sur la ligne qui plante, tu utilises la variable monInterface, alors que l'interface en cours de la boucle est inter... remplace monInterface par inter, ça devrait marcher ;)
28/02/2009, 01h01
Anaxagore

Yep ca marche bcp mieux :)
Effectivement, il commence a ce faire tard et je suis désolé d'avoir oublié d afficher l'erreur :(
J'ai commencé le VB.net ce WE et il faut que je développe cette interface assez rapidement :(
Encore merci pour ton aide
Par contre, aurais tu des pistes pour sauvegarder le treeview dans un fichier?
Je suis en train de coder la sauvegarde des autres éléments de cette interface.

Merci d'avance pour les infos que tu pourras me donner.

Anax
28/02/2009, 01h12
tomlev

Citation:

Envoyé par Anaxagore

Par contre, aurais tu des pistes pour sauvegarder le treeview dans un fichier?

Sauvegarder le TreeView ? C'est plutôt les données sur les interfaces réseau qu'il faudrait sauvegarder, non ? Après, tu peux toujours reconstruire le TreeView à partir de ces données si besoin...
28/02/2009, 02h18
Anaxagore

Je vais encore t embetter mais je n'arrive pas a collecter ces elements la pour les cartes :
# IP
# Subnet
# Passerelle
# DNS1
# DNS2

J'ai des erreurs ds le treeview a chaque fois que j'essaye d'utiliser un autre bout de code. Serais tu par hasard comment je peux les retrouver ?
Je pense qu'il sont contenu ds la classe que j'utilise mais j'arrive pas a trouver bcp d'info :(

Merci d'avance

Anax
28/02/2009, 16h44
tomlev

Citation:

Envoyé par Anaxagore

Je vais encore t embetter mais je n'arrive pas a collecter ces elements la pour les cartes :
# IP
# Subnet
# Passerelle
# DNS1
# DNS2

Là c'est est un autre problème... ouvre plutôt une nouvelle discussion

Citation:

Envoyé par Anaxagore

J'ai des erreurs ds le treeview a chaque fois que j'essaye d'utiliser un autre bout de code. Serais tu par hasard comment je peux les retrouver ?
Je pense qu'il sont contenu ds la classe que j'utilise mais j'arrive pas a trouver bcp d'info :(

Ben exécute le programme en pas à pas (F10/F11), ou mets des breakpoints (F9) pour voir où est le problème...
28/02/2009, 20h54
Anaxagore

bon alors je pense avoir un bout de réponse mais je ne sais comment faire :(
J'ai cherché toute la journée ....

Voila j'arrive bien a avoir mon tree view mais qud j ajoutes des infos ds le treeview provenant d'un autre endroit il me rajoute des noeuds alorq qu'il existe déja.
Pour inter clair :
Interface réseau
+ Interface 1
+ info 1
+ Interface 1
+ info 2 (différent de info 1)

Comment puis je lui dire que si le bode existe, il faut qu'il ecrive en child et non sur le même niveau?

Merci d'avance

Anax
01/03/2009, 13h43
tomlev

J'ai pas tout compris :?
Fais voir ton code, ce sera plus clair

Ok j'ai un fichier dans lequel j'ai des lignes. Le 1er champ me permet de savoir a quelle catégorie il corresponds. J'ai en tout 2 catégories : DNS et Port.
Ensuite, j'ai le 2nd champ qui m'indique le serveur sur lequel j'effectue le test.
Voici en gros une ligne de mon fichier texte :
DNS;From;To;To_IP;Result_DNS;Reverse_Test

Voici le code que j'ai écrit :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
 
            Dim rootNode_DNS As TreeNode = TheTreeview.Nodes.Add("DNS Resoltion Testing Result")
            Dim rootNode_Port As TreeNode = TheTreeview.Nodes.Add("Firewal Port Testing Result")
 
            'Boucle pour ecrire les données dans le Treeview
            Ligne = sr.ReadLine()
            While Not Ligne = Nothing
                TAB = Ligne.Split(";")
                Select Case TAB(0)
                    Case "Port"                                                             'Si tab(0) = Port
                    Case "DNS"                                                              'Si tab(0) = DNS
                        interfaceNode_DNS = rootNode_DNS.Nodes.Add(TAB(1).ToString)
                        If rootNode_DNS.Name.ToString <> TAB(1).ToString Then
                            interfaceNode_DNS = rootNode_DNS.Nodes.Add(TAB(1).ToString)
                        Else
                            'interfaceNode_DNS = rootNode_DNS.Nodes.Add(TAB(1).ToString)
                        End If
                End Select
                TAB = Nothing
                Ligne = sr.ReadLine()
            End While

Voile pb c est que je n'arrive pas a faire un tree du genre :

DNS
+ From
+ To; TO_IP; etc...

Pourrais tu me dire ce qui cloche? je n'ai pas réussi à composer le test de regroupement sur le from.

Merci d'avance

Anax

02/03/2009, 09h59
tomlev
Ben tu crées systématiquement un nouveau noeud pour l'interface, sans vérifier s'il existe déjà :

Code:

interfaceNode_DNS = rootNode_DNS.Nodes.Add(TAB(1).ToString)

Il faudrait faire ça plutôt :
Code:

1 2 3 If interfaceNode_DNS Is Nothing OrElse interfaceNode_DNS.Text <> TAB(1) Then interfaceNode_DNS = rootNode_DNS.Nodes.Add(TAB(1)) End If
Au fait, inutile d'appeler ToString sur des objets de type String ;)
02/03/2009, 13h05
Anaxagore

Merci bcp pour ta réponse, cela fonctionne impec :) je vais repartir de plus belle :)