VBSファイルを定期的に自動実行する方法

質問

毎日同時刻に下記のVBSファイルを自動実行したいと思います。

タスクスケジューラで実行すると download.exe は起動しますが
表示されたダイアログがアクティブ状態にならないため
（タイトルバーが灰色のまま、タスクバーのボタンが点滅）、
文字入力ができないまま、処理が終了してしまいます。

１．ダイアログをアクティブにし、正常に処理を実行させるには
　　どのように記述すれば良いですか？

２．このVBSファイルをユーザーがログオフされている状態で
　　実行することは可能ですか？

恐れ入りますが、ご存じの方がおられましたら、ご教示願います。

＜環境＞
Windows 2008 Server R2 standard （64ビット）

＜D:\aaa.vbs＞

Set objShell = WScript.CreateObject("WScript.Shell")

'ダウンロードEXEを実行
Set objExec = objShell.Exec("D:\download.exe")
WScript.Sleep 1000
objShell.AppActivate(objExec.ProcessID)

'ファイルのダウンロード先を指定し、実行（ENTER）
WScript.Sleep 1000
objShell.SendKeys "D:\data.txt~"

回答No.1

notnot · ベストアンサー

＞１．ダイアログをアクティブにし、正常に処理を実行させるにはどのように記述すれば良いですか？

objShell.AppActivate(objExec.ProcessID)
とのことですが、VBScriptのAppActivateで引数にウィンドウタイトル名でなくプロセスIDがとれることは確認されてますか？手元のヘルプファイルにはウィンドウタイトルしか書いてないです。

＞２．このVBSファイルをユーザーがログオフされている状態で実行することは可能ですか？

さすがにそれは無理です。

あと、AppActivateの戻り値を確認してないですが、AppActivateが失敗した場合にSendKeysすると他のウィンドウに送られちゃいます。

お礼

notnotさん、ご回答心より感謝申し上げます。

ご教示いただいた内容をもとに、無事VBSでダイアログをアクティブにし処理を実行させることができました。

残念ながら、ユーザーがログオフされている状態では実行できないとのことなので、その場合はVBで作成しようと思います。
http://homepage2.nifty.com/sak/w_sak3/doc/sysbrd/vb_t23.htm

ありがとうございました。