Listar computadoras de un dominio en .NET

Un pequeño código para listar las pc's de un dominio. Muy sencillo, pero ya veremos a futuro como unimos varios pequeños códigos para hacer una aplicación más interesante.

Debes agregar previamente la referencia System.DirectoryServices

Dim domain As New DirectoryServices.DirectoryEntry("WinNT://MI_DOMINIO")
Dim computadoras As DirectoryServices.DirectoryEntries
Dim computadora As DirectoryServices.DirectoryEntry

computadoras = domain.Children
computadoras.SchemaFilter.Add("Computer")

   For Each computadora In computadoras
      Msgbox (computadora.Name)
   Next

A.

No hay comentarios.: