oShell = CREATEOBJECT("Wscript.Shell") oShell.SendKeys("+{TAB}+{F10}{DOWN}{ENTER}{ENTER}") GETPICT()