msgbox "Press OK to run the Calculator" Set shell=CreateObject("wscript.shell") Shell.Run("calc.exe")