Bonjour,

Voilà je cherche à modifier des droits d'accès à l'aide de VBScript en utilisant la commande cacls

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
'declaration
rep = chr(34) & "C:\partages\test" & chr(34)
optCacls = " /T /C /G Administrateurs:F"
commande1 = "cd " & rep
commande2 = "cacls " & rep & optCacls
 
Set objShell = CreateObject("Wscript.Shell")
objShell.Run "%COMSPEC% /k" & commande2
 
MsgBox "commande terminée.", vbInformation ,"Information"
Lorsque j’exécute objShell.Run "%COMSPEC% /k" & commande1 il n'y a pas d'erreur.

Si j’exécute objShell.Run "%COMSPEC% /k" & commande2 j'ai une erreur caractère incorrecte et je ne sais pas pourquoi.

Avez-vous une idée ?

Pour information si je tape directement la ligne suivante dans une cmd elle exécute correctement :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
cacls "C:\partages\test" /T /C /G Administrateurs:F