Accéder à l'active directory avec login et mdp windows
Bonjour à tous,
Je voudrais savoir s'il est possible et si oui, comment accéder à l'AD en utilisant le login et mot de passe windows. (sachant que le compte windows a évidemment les droits d'accès à l'AD).
Je ne veux pas "récupérer" le mot de passe windows mais utiliser la connexion existante pour me connecter à l'AD.
Je sais qu'on peut le faire sous Visual Basic en moins de 10 lignes (d'ailleurs mon but est de recoder un programme existant sous VB).
Voici le code en VB :
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
Const ADS_SCOPE_SUBTREE = 2
Set objConnection = CreateObject("ADODB.Connection")
Set objCommand = CreateObject("ADODB.Command")
objConnection.Provider = "ADsDSOObject"
objConnection.Open "Active Directory Provider"
Set objCOmmand.ActiveConnection = objConnection
objCommand.CommandText = _
"Select Name, Location from 'LDAP://DC=fabrikam,DC=com' " _
& "Where objectClass='computer'"
objCommand.Properties("Page Size") = 1000
objCommand.Properties("Searchscope") = ADS_SCOPE_SUBTREE
Set objRecordSet = objCommand.Execute
objRecordSet.MoveFirst
Do Until objRecordSet.EOF
Wscript.Echo "Computer Name: " & objRecordSet.Fields("Name").Value
Wscript.Echo "Location: " & objRecordSet.Fields("Location").Value
objRecordSet.MoveNext
Loop |
Y voyez vous quelque chose qui m'aurait échappé? Comment retranscrire ces lignes en java?
Merci pour votre aide!
