Discussion :

[stevenhab]

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

[orducom1]

Lut',

VBScript ne permet pas de placer des ACLs sur des répertoire, c'est pas prévue...Va donc te falloir utiliser un miniSoft qui se trouve de le RessourceKit et les Outils d'Administration de Win2003 qui s'appelle XCACLS.EXE

Pour l'utiliser, il faut :
1 - s'armer de patience
2 - instensier l'objet Shell pour utiliser sa méthode Run et lancer la commande qui va bien du style :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

objShell.Run("%comspec% /c xcacls.exe /arg1 /arg2 /arg3 ... ChemRepertoire")

Bon courage,
Emeric

[stevenhab]

Bonjour Emeric,

Merci pour ta réponse, j'ai compri ce que je dois faire.

Je fais la chose suivante en ligne de cmd:
J'ai un utilisateur AD : NOM Prénom

mais j'ai l'erreur suivante..et je ne comprend pas pourquoi.
Si je fais la meme cmd avec administrateur comme user à la place de DOMAINMAQUETTE\NOM Prénom, ca fonctionne. Je suis bien connecté avec un compte qui à le droit de changer les droits.

C:\homedire>xcacls "c:\homedire\NOM Prénom" /G DOMAINMAQUETTE\NOM Prénom:RW
ERROR: Un ou plusieurs arguments sont incorrects.

Si tu as une idée..

Lut',

VBScript ne permet pas de placer des ACLs sur des répertoire, c'est pas prévue...Va donc te falloir utiliser un miniSoft qui se trouve de le RessourceKit et les Outils d'Administration de Win2003 qui s'appelle XCACLS.EXE

Pour l'utiliser, il faut :
1 - s'armer de patience
2 - instensier l'objet Shell pour utiliser sa méthode Run et lancer la commande qui va bien du style :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

objShell.Run("%comspec% /c xcacls.exe /arg1 /arg2 /arg3 ... ChemRepertoire")

Bon courage,
Emeric

[stevenhab]

C'est bon j'ai trouvé

Je pointais sur le CN, alors qu'il fallait pointer vers le LOGIN de l'AD du compte.

Merci encore pour ton aide !

[orducom1]

Pas de kwa !

Peut-être voudras tu poster ta commande que tout le monde en profite...

Bon courage pour la suite !
Emeric