Afficher la deuxième valeur d'une boucle

**persia** · 23/08/2007, 17h14

Bonjour à tous,

J'ai un script vbs qui me liste tous les "Guid" (Identifiants) de mon interface réseau, mais moi je suis interessé juste par le deuxième Guid qui m'affiche, étant donné qui' il ya quatre en tous.

Avez-vous une idée comment ?

Voici mon code:

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
 
 
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\\" & strComputer & _
        "\root\microsoft\homenet")
 
Set colItems = objWMIService.ExecQuery _
    ("Select * from HNet_ConnectionProperties")
 
For Each objItem in colItems
 
    MsgBox "Connection: " & objItem.Connection
 
 
Next

Merci

**pc75** · 24/08/2007, 08h13

Bonjour,

J'espère avoir compris ta question.

En utilisant un compteur :

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
 
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\\" & strComputer & _
        "\root\microsoft\homenet")
 
Set colItems = objWMIService.ExecQuery _
    ("Select * from HNet_ConnectionProperties")
 
Cpt = 1
For Each objItem in colItems
    if Cpt = 2 then
       MsgBox "Connection: " & objItem.Connection
    end if
    Cpt = Cpt + 1
Next