copie de groupe avec ses membres

On 22 nov, 10:33, "Jean-Luc" <tual...@hotmail.com> wrote:

Bonjour,

Comment faire pour copier un groupe d'utilisateurs ou d'ordinateurs
avec ses membres ?
je n'ai pas trouvé de commande.
sinon j'ai pensé faire un export du groupe puis faire un dsadd group
....
si qq a une solution plus simple , ou un script déjà fait !

Merci

Salut,

Il faut faire un export du groupe dans le fichier Account.txt, puis
purger ce fichier pour qu'il ne reste que les noms des users et ensuite
tu lance mon script sur le contrôleur avec le groupe de destination
comme argument .


------Copuer ici -------------

' addUsersToGroup.vbs
' FVBScript to add users to a group .
' Author Yves Descamps
' Version 2.0 - December 2006
' ---------------------------------------------------------------'
' Cmde : addUsersToGroup <groupe> et lit le fichier Accounts.txt
' Script à lancer sur le contrôleur de domaine

Option Explicit


' déclaration des variables
Dim oFs, oGrp, oFile, oUser
Dim strUser


' définition des constantes
Const ForReading = 1
Const File = "Accounts.txt"


' initialisation des objets
Set oFs = CreateObject ("Scripting.FileSystemObject")
Set oGrp = GetObject ("WinNT://./" & WScript.Arguments(0))


' lecture des enregistrements
Set oFile = oFs.OpenTextFile (File, ForReading)


' parcours des comptes utilisateurs
For Each strUser In Split (oFile.ReadAll, VBCrLf)
If strUser <> "" Then
' bind uniquement pour résoudre le nom de domaine
Set oUser = GetObject ("WinNT://./" & strUser)
' ajout du compte utilisateur dans le groupe
oGrp.Add (oUser.ADsPath)
End If
Next

------- couper ici ------


Voila , j'espère que ça te rendra service.


@+