Listage machine d'un domaine

Bonjour à tous,

Je cherche a lister tous les pcs d'un domaine en VB.net




 strFilter = "(objectCategory=computer)"


        strQuery = "<LDAP://" & strDNSDomain & ">;" & strFilter & ";Name;subtree"

        objCommand.CommandText = strQuery


        objRecordSet = objCommand.Execute
        Do Until objRecordSet.EOF

            Dim nom
            nom = objRecordSet.Fields("Name")
            MsgBox(nom)
            objRecordSet.MoveNext()

        Loop

Mais la ca ne m'affiche rien. Cela fonctionne en VBS
Quelq'un a t il une solution?

Merci

si:

codes le en .Net ^^