Machine Names

[mohamedriji]

Hi,

Is it possible to display the names of all the online machines that are connected to a network using VB.Net

[bratuha]

I have never worked with it but i think you have to use active directory service

[deadcoconuts]

Imports System
Imports System.DirectoryServices

Namespace ActiveDirectorySearch1
Class Class1
Shared Sub Main(ByVal args() As String)
'Note : microsoft is the name of my domain for testing purposes.
Dim enTry As DirectoryEnTry = New DirectoryEnTry("LDAP://microsoft")
Dim mySearcher As DirectorySearcher = New DirectorySearcher(enTry)
mySearcher.Filter = ("(objectClass=computer)")
Console.WriteLine("Listing of computers n the Active Directory")
Console.WriteLine("=========== ===========")
Dim resEnt As SearchResult
For Each resEnt In mySearcher.FindAll()
Console.WriteLine(resEnt.GetDirectoryEnTry().Name.ToString())
Next
Console.WriteLine("=========== End of Listing =============")
End Sub
End Class
End Namespace