Bonjour à tous !

Je réalise actuellement un script VBS qui créer un utilisateur dans un Active Directory (dans des OU etc..).

Ensuite je créer un HOMEDIR pour cette personne, j'arrive à créer le répertoire, mais pas mettre le nouvel compteur en tant que propriétaire.

Je veux qu'il est tous les droits, exepté Controle Total.

Voici mon code à ce jour pour la partie création du homedir.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
Private Function createHomeDire(strCN)
	Dim OFS, MonDossier 
	Set OFS = CreateObject("Scripting.FileSystemObject") 
	'Si le dossier n'existe pas, création du répertoire
	If Not (OFS.FolderExists("c:\homedire\" & strCN)) Then 	
		Set OFS = CreateObject("Scripting.FileSystemObject") 
		Set MonDossier = OFS.CreateFolder("c:\homedire\" & strCN) 
	Else
		wscript.echo "le dossier existe déjà"
	End If 
 
End Function
D'avance merci pour votre aide.

Steven