Conexion a Active directory desde form

[cy5]

Estoy trabajando en una intranet y necesito que cuando entre cualquier usuario de la corporacion a la intranet le levante un mensaje de bienvenida tipo Bienvenido Fulano ..... Me dijeron que mi aplicacion debe pegarce al active directory solo se que tengo que agregar el Imports System.DirectoryServices pero de hay ni idea. Alguien tendra alguna referencia para establecer esta conexion.
Cabe destacar que para accesar a mi intranet no es necesario logearce osea que el usuario pone en su browser http://servername/intranet y el saludo debe incluir su nombre.
Gracias

[cy5]

bueno encontre algo pero para realizar busqueda ....
primero que nada la referencia

Imports System.DirectoryServices

Código:

Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
  Dim User As New System.DirectoryServices.DirectoryEntry("LDAP://dominio")

        Dim mySearcher As New System.DirectoryServices.DirectorySearcher(User)
        Dim result As System.DirectoryServices.SearchResult

        mySearcher.Filter = ("(anr= " & TextBox2.Text & ")")

        TextBox1.Text = ""

        For Each result In mySearcher.FindAll()
    
    TextBox1.Text = TextBox1.Text & result.GetDirectoryEntry().Path & "  " & vbCrLf & vbCrLf

        Next
    End Sub
End Class

en esta parte me duelve el path completo
TextBox1.Text = TextBox1.Text & result.GetDirectoryEntry().Path & " " & vbCrLf & vbCrLf

de esta manera

LDAP://domain-is/CN=Jaime Batista,OU=Servicios Generales,OU=VP Administración,OU=company,DC=iserach,DC=com

como podria hacer para que solo me devuelva lo que esta en CN apartir del valor ingresado