salut je souhaite convertir un script vbs en vb  
 
 
le script vbs qui fonctionne nickel
-----
Sub ListGroups(strDomain)
    Set objComputer = GetObject("WinNT://" & strDomain)
    objComputer.Filter = Array("Group" )
    For Each objGroup In objComputer
        WScript.Echo "Name: " & objGroup.Name
    Next
End Sub
 
Dim strDomain
Do
    strDomain = "ad"
Loop Until strDomain <> ""
 
ListGroups (strDomain)
 
--
en vb j'obtient une erreur d'automation à la ligne :
Set objComputer = GetObject("WinNT://" & strDomain)
 
merci par avance

en VB, VBA ou VB6 ??

 
oups sorry
 
VB6
 
merci par avance
 
tu est partout toi....      
bon après je me met aux tuto