AppActivate ("無題 - メモ帳")
のようにアプリケーションウィンドウに表示された内容で指定します。
実際のVBS内容
- メモ帳を起動
- opera12を起動。 （起動直後はSpeedDial画面となっている）
- メモ帳をアクティブにして aaaaaaa と入力
- operaをアクティブにしてURLに yahoo.co.jpと入力
Dim WSHShell Set WSHShell=CreateObject("WScript.Shell") 'メモ帳起動 WSHShell.Exec "notepad.exe" 'opera起動 WSHShell.Exec "C:\Program Files (x86)\Opera\opera.exe" WScript.Sleep 2000 '2秒待つ WSHShell.AppActivate ("無題 - メモ帳") WSHShell.SendKeys "aaaaaaaaaaaaaaaaaaa" WScript.Sleep 5000 '指定したURLを表示 WSHShell.AppActivate ("Speed Dial - Opera") WSHShell.SendKeys "{F2}" WScript.Sleep 1000 WSHShell.AppActivate ("Speed Dial - Opera") WSHShell.SendKeys "yahoo.co.jp{ENTER}" |
久しぶりに使った際に、アプリ名だけを指定して失敗したのでメモ
参考
