Bonjour,


Je cherche à vérifier l'existence d'un utilisateur dans l'AD a partir du SamAccountName.

j'ai trouvé le script chez microsoft mais il ne semble pas trouver les users que je lui soumets :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
on error resume next
strUserName = "prefix.usertest"
dtStart = TimeValue(Now())
Set objConnection = CreateObject("ADODB.Connection")
objConnection.Open "Provider=ADsDSOObject;"
 
Set objCommand = CreateObject("ADODB.Command")
objCommand.ActiveConnection = objConnection
 
objCommand.CommandText = _
    ";(&(objectCategory=User)" & _
         "(samAccountName=" & strUserName & "));samAccountName;subtree"
 
Set objRecordSet = objCommand.Execute
 
If objRecordset.RecordCount = 0 Then
    WScript.Echo "sAMAccountName: " & strUserName & " does not exist."
Else
    WScript.Echo strUserName & " exists."
End If
objConnection.Close
le user does not exist a chaque essai :/, meme lorsque je lui donne un samaccoutname de l'AD.

si qqun a une idée je prends volontier.