Discussion :

[inco69]

Bonjour,

J'ai fais un petit programme qui créé un dossier avec 4 sous dossiers sur une serveur de fichier.

Et j'aimerai pouvoir mettre des droits sur ces dossiers, enlever l'héritage. Mais je bloque. Je sais le faire via un fichier bat, mais j'aimerai tout faire en automatique via un vbs.

Mon vbs doit s'utiliser avec un argument récupéré via un autre logiciel.

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
 Dim objFSO, objFolder, args, username
 Set args = Wscript.Arguments
 
username = args(0) 'recup argument'
 
 
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFSO.CreateFolder("\\FILESERVER\test\"&username)
 
 
objFolder.subFolders.Add("Sousdossier1")
objFolder.subFolders.Add("Sousdossier2")
objFolder.subFolders.Add("Sousdossier3")
objFolder.subFolders.Add("Sousdossier4")
 
Wscript.echo "Dossier fileserver " &username + " créé"

Le dossier principal restera avec les droits en Héritage mais les 4 sous dossiers auront des droits différents.

une idée? j'ai entendu parlé de calc ect mais je ne vois pas comment l'implémenter dans mon code.

Merci

[zizo81]

Bonjour,

J'ai fait ce genre de chose avec setacl.exe qui permet de gérer les ACL depuis des scripts.

Tu as des exemples ici et c'est téléchargeable là.

Il ne me reste plus qu'à te souhaiter bon courage.

[inco69]

Je dois installer un programme ? si oui ou ça?

Parce que j'ai déjà essayé en recopiant un de leur script mais ça ne fonctionne pas.