使用vbscript设置权限

使用vbscript设置权限,vbscript,Vbscript,我正在尝试向每个人授予文件夹调用测试的权限。如果我这样做,它会起作用 objShell.ShellExecute "cmd.exe","/k icacls c:\Test /grant everyone:(OI)(CI)M ", "", 但如果我这样做,它就不会 Set objShell = CreateObject("Shell.Application") Dim var var = "C:\Test" objShell.ShellExecute "cmd.exe", "/k

我正在尝试向每个人授予文件夹调用测试的权限。如果我这样做,它会起作用

objShell.ShellExecute "cmd.exe","/k icacls c:\Test /grant everyone:(OI)(CI)M ", "",  
但如果我这样做,它就不会

Set objShell = CreateObject("Shell.Application")
  Dim var
  var = "C:\Test"
  objShell.ShellExecute "cmd.exe", "/k icacls" & var & "/grant everyone:(OI)(CI)M ", "",  "runas", 1
所以我的问题是我怎样才能让它工作
请帮助

看起来像是间距问题。你能试试这个吗

Set objShell = CreateObject("Shell.Application")
  Dim var
  var = "C:\test"
  objShell.ShellExecute "cmd.exe", " /k icacls " & var & " /grant everyone:(OI)(CI)M ", "",  " runas ", 1

您忘记了空格,将它们包含在变量中,如

var = " C:\Test "
或者更好地预处理并将它们附加到字符串的其余部分

objShell.ShellExecute "cmd.exe", "/k icacls " & var & " /grant everyone:(OI)(CI)M ", "",  "runas", 1

在命令字符串中插入变量时,最好添加引号,例如,
“…”和Chr(34)&var&Chr(34)&“…”