Question

我已经通过互联网和Stack溢出来搜索这个问题的解决方案，并尝试了各种解决方案，但没有一个有效。

基本上，我有一个用VB.NET编写的Windows应用程序，当单击该按钮时，它会执行以下操作：

 Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click

    Dim data As Byte() = Encoding.UTF8.GetBytes("Some data message")

    Dim myHttpWebRequest As HttpWebRequest = HttpWebRequest.Create("https://SomeDomain.com/sandbox/update")

    'If required by the server, set the credentials.
    'myHttpWebRequest.Credentials = CredentialCache.DefaultCredentials

    Dim cert As X509Certificate = X509Certificate.CreateFromCertFile("C:\Program Files (x86)\Certificates\somecertificate.cer")
    System.Net.ServicePointManager.SecurityProtocol = SecurityProtocolType.Tls12
    myHttpWebRequest.ClientCertificates.Add(cert)

    myHttpWebRequest.ContentType = "application/json;profile=https://SomeDomain.com/update.json"

    myHttpWebRequest.Method = "POST"

    'WK 26/01/2017 - "2834"
    myHttpWebRequest.ContentLength = data.Length

    Dim oRequestStream = myHttpWebRequest.GetRequestStream()

    oRequestStream.Write(data, 0, data.Length)

    ' Get the response.
    Dim oWebResponse As WebResponse = myHttpWebRequest.GetResponse()

    ' Display the status.
    MsgBox(CType(oWebResponse, HttpWebResponse).StatusDescription)

    ' Get the stream containing content returned by the server.
    Dim oResponseStream As Stream = oWebResponse.GetResponseStream()

    ' Open the stream using a StreamReader for easy access.
    Dim oStreamReader As New StreamReader(oResponseStream)

    ' Read the content.
    Dim oResult As String = oStreamReader.ReadToEnd()

    ' Display the content.
    MsgBox(oResult)

    ' Clean up the streams and the response.
    oStreamReader.Close()
    oResponseStream.Close()

End Sub

但是，它不断抛出＆＃34;您必须在调用[Begin] GetResponse＆＃34;之前将ContentLength字节写入请求流。这一行的例外：

 Dim oWebResponse As WebResponse = myHttpWebRequest.GetResponse()

奇怪的是，此代码适用于同一网络上的其他计算机！唯一的区别是机器是32位，我的是64位，不确定是否相关。

我不是VB.NET的新手，但之前没有使用过HTTPWebRequest，基本上我试图向URL发送一些更新并尝试将结果返回以查看它是否成功。它需要将本地证书存储在我的机器上。

当我将网址域更改为＆＃34; www.google.com＆＃34;它工作正常，但显然不是我要发布的网址。

我只是不明白它是如何在一台机器上运行而不是另一台机器。

我已经尝试了其他用户在类似帖子上使用＆＃34;使用＆＃34;关键字：

 Using oRequestStream = myHttpWebRequest.GetRequestStream()
            oRequestStream.Write(data, 0, data.Length)
        End Using

但后来我得到了＃34;远程服务器返回了一个错误：（400）Bad Request。＆＃34; GetResponse行的异常。

我还尝试将以下内容添加到配置文件中：

<system.webServer>
    <security>
        <requestFiltering>
            <requestLimits maxAllowedContentLength="104857600" />
        </requestFiltering>
    </security>
</system.webServer>

但没有任何区别。

请有人帮助我，并就此提出一些建议。可能与机器上的编码差异有关吗？

谢谢。

使用HttpWebRequest时在VB.NET中出现此错误：＆＃34;在调用[Begin] GetResponse＆＃34;

0 个答案: