###前提・実現したいこと
コンソールアプリにてWebKitBrowserを動作させたい
###発生している問題・エラーメッセージ
WebKitBrowserのNavigateが動かないようで、困っています。
Windowsフォームアプリケーションでは正常にNavigateされることを確認しています。
やりたいことは、httpアクセスして、ソースファイルを取得したいです。
ソースを取得したいだけでフォームは無駄なので、コンソールアプリでやってみようと思ったらとたんに動かず何が原因なのかわかりません。
エラーはなにも発生しません。
Navigateを実行すると、Navigating・Navigated・DocumentCompletedが呼ばれるはずなのですが
(フォームアプリではそのようになる)
どれだけまっても呼び出されません。
###該当のソースコード
VB.NET
1Module Program 2 Sub Main() 3 Console.Write("Press any key to continue . . . ") 4 Console.ReadKey(True) 5 6 'WebKitBrowser 7 Dim wwebk As WebKit.WebKitBrowser 8 wwebk = New WebKit.WebKitBrowser 9 AddHandler wwebk.DocumentCompleted, AddressOf wwebkDocumentCompleted 10 AddHandler wwebk.Navigated, AddressOf wwebkNavigated 11 AddHandler wwebk.Navigating, AddressOf wwebkNavigating 12 '以下を入れてみたけど・・・無意味? 13 wwebk.Name="webkit" 14 wwebk.Url=nothing 15 wwebk.SuspendLayout 16 17 wwebk.Navigate("http://www.yahoo.co.jp") 18 19 'UserAgentやURLはセットされているのか?確認(セットはされている) 20 Console.Write("navi . . . " & wwebk.UserAgent & " " & wwebk.Url.ToString) 21 Console.ReadKey(True) 22 23 '空になってしまう・・・ 24 Console.Write( wwebk.DocumentText ) 25 26 Console.Write("Press any key to continue . . . ") 27 Console.ReadKey(True) 28 End Sub 29 30 '以下全く呼び出されない・・・実行されていないということ・・・?? 31 Sub wwebkDocumentCompleted(sender As Object, e As WebBrowserDocumentCompletedEventArgs) 32 MsgBox("complete." & e.Url.ToString) 33 End Sub 34 Sub wwebkNavigated(sender As Object, e As WebBrowserNavigatedEventArgs) 35 MsgBox("navigated." & e.Url.ToString) 36 End Sub 37 Sub wwebkNavigating(sender As Object, e As WebBrowserNavigatingEventArgs) 38 MsgBox("navigating." & e.Url.ToString) 39 End Sub 40End Module
###試したこと
・STAでないとだめ
・メッセージループをまわしてやる必要がある
とのことですが、どうすれば良いのかわかりませんでした。。。
###補足情報(言語/FW/ツール等のバージョンなど)
.net framework 4.0
あなたの回答
tips
プレビュー