Set WshShell = CreateObject("WScript.Shell")
WshShell.Run "cmd.exe /c acledit.bat", 0, False