特定のurl(サンプルではgoogle)をブラウザで開きキーストローク
SendKeys.Send("{TAB 10}{ENTER}")
を送信したいのですが、正常に動作する事もあるのですが、
キーストロークが正常に送れないケースが頻繁に発生します。
メモ帳や電卓に対しては問題なく、キーストロークが送信
できるのですが、安定して動作させるには、どうしたら良いでしょうか?
教えてください
'サンプル googleをブラウザで開き [TAB]キーを10回 [Enter]キーを送信しリンク先にアクセス
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim intProcID As Integer
Dim id = Shell("C:\Program Files\Internet Explorer\IEXPLORE.EXE " & "http://www.google.co.jp/", 1)
'ウエイト
System.Threading.Thread.Sleep(5000)
'アクティブにする
AppActivate(id)
SendKeys.Send("{TAB 10}{ENTER}")
End Sub
追伸
言語は vb.net です。よろしくお願いいたします。
やりたい事にもよりますが、SendKeysを使うのではなく、
InternetExplorerオブジェクトのdocumentプロパティを
操作する…というのは如何でしょうか。
IE.Navigate と keybd_event の組み合わせで、思い通りの処理ができました。
ありがとうございました。