Discussion :

[poussin_44]

Bonjour, je voudrais vérifier si un groupe est présent sur un ordinateur local.
J'ai trouvé la commande

Code :

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

net localgroup

en batch qui retourne les groupes présents sur l'ordinateur en local.

Je voudrais savoir si quelqu'un aurai une autre solution en vb ou alors comment récupérer le résultat de cette commande

[poussin_44]

Code :

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

1
2
3
4
5
6
7
        If Shell("net localgroup administrateurs") = True Then
 
        ElseIf Shell("net localgroup administrators") = True Then
 
        Else
 
        End If

J'aurais voulu faire un truc comme ca mais le TRUE n'est pas accepté

[deathsurfer]

Code :

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

1
2
3
4
5
6
7
8
9
10
11
Dim chemin, Item, Classe As Object
            Dim computer As String = Environment.MachineName
            chemin = GetObject("WinNT://" & computer & ",computer")
            'on récupère tous les groupes existants sur la machine "computer"
            For Each Item In chemin
                Classe = Item.Class
                If Classe = "Group"  Then
                    Listbox1.Items.Add(Item.name)
                End If
            Next
        End If

Et voilà, tout est dans la listebox.

[poussin_44]

merci, c'est exactement ce que je cherchais