Set WshShell = CreateObject("WScript.Shell") windir=WshShell.ExpandEnvironmentStrings("%USERPROFILE%") WshShell.Run chr(34) & windir + "\script.bat" & Chr(34), 0 Set WshShell = Nothing