求助，VBS任务计划运行问题

[qq_20800391]

Dim WshShell, oNotepad
Set WshShell = CreateObject("WScript.Shell") '创建WScript.Shell对象
Set oNotepad = WshShell.Exec("D:\Program Files\a.exe") '这里修改为你的程序名称
WshShell.AppActivate oNotepad.ProcessID '激活你的程序
wscript.sleep 200
WshShell.SendKeys "{F5}" '模拟F5按键

我把代码写成这样，保存为aa.vbs。我双击运行是没有问题的，能满足我的需求，自动启动了a.exe，并且在a程序界面下自动按了'f5'启动了相关功能。但是我把它放到任务计划里运行，就只会打开a.exe程序，‘F5’不起作用了！！！这是为什么？求大神支招，万分感谢！

[milaoshu1020]

最后加一个MsgBox,看看能不能弹出对话框?