Question simple ???
Comment faire pour exporter la liste des utilisateurs d’un groupe AD, pour la réimporter dans un nouveau groupe ?
Quelqu’un connait il un script VBS ou un outil (gratuit) qui puisse faire cela ?
Merci d’avance
Hello
Merci de ta réponse, je n’ai pas encore vu le résultat que ça donnait.
Vendredi, j’ai trouvé ça :
Set objGroup = GetObject(“LDAP://CN=sg_app_compta_REG,OU=GROUPE-DE-TRAVAIL,DC=filiales-citrix,DC=Nom_de_mon_domaine,DC=com”)
For Each objMember in objGroup.Members
Wscript.Echo objMember.Name
Next
Qui me donne comme résultat dans un fichier txt :
CN=Antoine R…
CN=Christelle L…
CN=Mireille C…
CN=Melanie G…
CN=Ibrahim M…
Bref, ce n’était pas exactement ce que je voulais, mais dans l’absolue, c’est exploitable.
L’idée maintenant c’est pour moi, de réimporter cette liste d’utilisateur dans un nouveau groupe que j’ai créé.
Je vais creusé, mais si vous avez un petit script VBS qui fait ça bien (oui, j’avoue je suis nul en VBS… erf)… :
Merci d’avance 
dans ta boucle de listage des user tu te connecte au groupe et tu lui ajoute l’utilisateur
Const ADS_PROPERTY_APPEND = 3
Set objRootDSE = GetObject("LDAP://rootDSE")
Set objContainer = GetObject("LDAP://cn=Users," & _
objRootDSE.Get("defaultNamingContext"))
Set objGroup = objContainer.Create("Group", "cn=Group1")
objGroup.Put "sAMAccountName","Group1"
objGroup.SetInfo
For i = 1 To 1000
strDN = ",cn=Users," & objRootDSE.defaultNamingContext
objGroup.PutEx ADS_PROPERTY_APPEND, "member", _
Array("cn=UserNo" & i & strDN)
objGroup.SetInfo
Next
WScript.Echo "Group1 created and 1000 Users added to the group."
Yes merci !
Bon j’ai pas encore testé ton script, mais je le ferais ^^
En cherchant, j’ai trouvé comment recupérer la liste dans un groupe et ensuite comment réimporter cette liste dans un autre groupe.
Je vous mettrais tout cela. (Vu que c’est de l’intégration manuel… Je pense qu’une automatisation via le script de Chavers va etre intéressant !!).
Je vous tiens au courant dans la semaine !!
Merci encore