1

我正在尝试在 WebBrowser 控制请求中添加两件事：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)

上面的代码只发送用户代理。如果我删除用户代理，则接受和引用 URL 都已设置。

似乎每当我添加用户代理附加标头时，任何其他自定义附加标头都会被取消。

这是 WebBrowser 的错误/无法做到的事情，还是我在这里做错了什么！？！

4

2 回答 2

1

编辑：稍后解决了问题-来自文本框的我的用户代理有一个额外的 vbcrlf 导致其他标题不起作用，在修剪后一切正常:)

于 2013-01-28T16:58:53.637 回答
0

另一个注意事项：你设置 chr(10) & chr(13) 应该是相反的。http 标准中的 CRLF 表示 chr(13) & chr(10)

于 2013-05-31T17:11:07.763 回答