dim wshshell set wshshell = createobject("wscript.shell") wshshell.run "tuneup.exe",,true wshshell.run "rundll32 Shell32.dll,SHExitWindowsEx 1"