Active directory

giovedì 02 aprile 2009 - 17.10

Elenco Threads

Stanze Forum

Aggiungi ai Preferiti

Cerca nel forum

cicemoi Profilo | Junior Member

72 messaggi | Data Invio: gio 2 apr 2009 - 17:10

Salve,
sto creando una piccola applicazione che dovrebbe effettuare delle operazioni su l'active directory aziendale
Ho creato una funzione "GetDEFromUsernamePassword" che permette di tornare la directoryEntry di un utente in modo da poter effettuare delle modifiche sul suo account. Essa che contiene queste righe di codice:

Dim oDirectoryEntry As New DirectoryEntry
Dim oDirectorySearcher As New DirectorySearcher
Dim oSearchResult As SearchResult

oDirectoryEntry.Path = strLdap
oDirectoryEntry.Username = strUser
oDirectoryEntry.AuthenticationType = AuthenticationTypes.Secure
oDirectoryEntry.Password = strPassword

oDirectorySearcher.SearchRoot = oDirectoryEntry
oDirectorySearcher.Filter = "(&(objectClass=user)(SAMAccountName=" + strUser + "))"
oDirectorySearcher.SearchScope = SearchScope.Subtree

Try
oSearchResult = oDirectorySearcher.FindOne()
oDirectoryEntry = oSearchResult.GetDirectoryEntry()
Catch ex As Exception
oDirectoryEntry = Nothing
End Try

Return oDirectoryEntry

solo che oSearchResult torna sempre nothing anche se passo dei dati che esistono per certo sull'active directory.
Chi sa dirmi se ho saltato qualche passaggio?

Grazie mille

Torna su

Stanze Forum

Elenco Threads

Partecipa anche tu! Registrati!

Hai bisogno di aiuto ?
Perchè non ti registri subito?

Dopo esserti registrato potrai chiedere
aiuto sul nostro Forum oppure aiutare gli altri

Consulta le Stanze disponibili.

Registrati ora !