WebBrowser制御要求に2つのものを追加しようとしています:1)ユーザーエージェント、2)参照URL、(オプション3):タイプを受け入れます。
私のコード:
Dim Headers As String = "Accept: */*" & Chr(10) & Chr(13)
Headers = Headers & "Referer: " & "http://www.google.com/" & Chr(10) & Chr(13)
Headers = Headers & "User-Agent: " & "My Program User Agent" & Chr(10) & Chr(13)
WebBrowser1.Navigate(UrlToVisit, "_self", Nothing, Headers)
上記のコードは、ユーザーエージェントのみを送信します。ユーザーエージェントを削除すると、Acceptと参照URLの両方が設定されます。
ユーザーエージェントに追加のヘッダーを追加するたびに、他のカスタムの追加のヘッダーがキャンセルされているようです。
これはWebBrowserのバグですか、それとも実行できないことですか、それともここで深刻な問題を実行していますか?!?!