set oshel = WScript.CreateObject("WScript.Shell") oshel.SendKeys "%Y" WScript.Sleep 2000 oshel.SendKeys "{ENTER}" WScript.Sleep 2000 oshel.SendKeys "{ENTER}"