VB.net调用Laravel PHP API时PostAsync报错：连接意外关闭

核心问题分析 #

你遇到的错误根源主要来自三个方面：异步代码的不规范使用、TLS协议/套件不匹配、HttpClient生命周期管理不当。Postman能正常请求说明API本身无问题，问题出在VB.NET客户端的配置和代码实现上。

解决方案 #

1. 修复异步代码的错误实现 #

你的代码用Task.Factory.StartNew包裹异步逻辑，且通过.Result阻塞线程，这不仅易引发死锁，还会让异步异常被包装在AggregateException中难以排查。改用标准async/await模式：

Private Shared Async Function MakeRequest(ByVal RequestedUrl As String, ByVal Params As Dictionary(Of String, String)) As Task(Of WebResponse)
    Dim httpResponse As HttpResponseMessage = Nothing
    Try
        ' 全局设置一次TLS协议，无需每次请求重复配置
        System.Net.ServicePointManager.SecurityProtocol = SecurityProtocolType.Tls12 Or SecurityProtocolType.Tls13
        
        ' 修复URL拼接逻辑，避免格式错误
        Dim baseUrl As String = If(_apiUrl.EndsWith("/"), 
                                  $"{_httpMethod}://{_apiUrl.TrimEnd("/")}", 
                                  $"{_httpMethod}://{_apiUrl}")
        Dim fullUrl As String = $"{baseUrl}/{RequestedUrl.TrimStart("/")}"

        Using httpClient As HttpClient = New HttpClient()
            Dim response = Await httpClient.PostAsync(fullUrl, New FormUrlEncodedContent(Params))
            response.EnsureSuccessStatusCode()

            Dim responseBody = Await response.Content.ReadAsStringAsync()
            Return JsonConvert.DeserializeObject(Of WebResponse)(responseBody)
        End Using
    Catch ex As HttpRequestException
        If httpResponse IsNot Nothing Then
            Return New WebResponse(CInt(httpResponse.StatusCode).ToString(), $"Error {CInt(httpResponse.StatusCode)}: {ex.Message}", Nothing)
        Else
            Return New WebResponse("500", ex.Message, Nothing)
        End If
    Catch ex As Exception
        Return New WebResponse("500", ex.Message, Nothing)
    End Try
End Function

2. 调整TLS协议支持 #

你当前仅设置了TLS1.2（DirectCast(3072, SecurityProtocolType)），但OpenSSL 1.1.1a支持TLS1.3，若Apache配置中启用了更严格的协议组合，会导致客户端与服务器协议不匹配。修改协议设置为同时支持TLS1.2和TLS1.3：

System.Net.ServicePointManager.SecurityProtocol = SecurityProtocolType.Tls12 Or SecurityProtocolType.Tls13

建议将该配置放在应用启动时（如Main方法开头），而非每次请求重复设置。

3. 检查Apache SSL配置 #

打开XAMPP的httpd-ssl.conf文件，确保SSL协议和套件兼容VB.NET客户端：

• 确保SSLProtocol包含TLS1.2和TLS1.3：

  SSLProtocol all -SSLv3 -TLSv1 -TLSv1.1
  

• 调整SSLCipherSuite为兼容套件（避免过于严格的配置）：

  SSLCipherSuite ECDHE-ECDSA-AES128-GCM-SHA256:ECDHE-RSA-AES128-GCM-SHA256:ECDHE-ECDSA-AES256-GCM-SHA384:ECDHE-RSA-AES256-GCM-SHA384:ECDHE-ECDSA-CHACHA20-POLY1305:ECDHE-RSA-CHACHA20-POLY1305:DHE-RSA-AES128-GCM-SHA256:DHE-RSA-AES256-GCM-SHA384
  

修改后重启Apache服务。

4. 复用HttpClient实例 #

频繁创建HttpClient会导致套接字资源耗尽，进而引发连接意外关闭问题。建议在应用中创建全局HttpClient单例：

Private Shared ReadOnly _httpClient As New HttpClient()

' 应用启动时初始化配置
Shared Sub New()
    System.Net.ServicePointManager.SecurityProtocol = SecurityProtocolType.Tls12 Or SecurityProtocolType.Tls13
    _httpClient.BaseAddress = New Uri(If(_apiUrl.EndsWith("/"), 
                                        $"{_httpMethod}://{_apiUrl}", 
                                        $"{_httpMethod}://{_apiUrl}/"))
End Sub

之后在MakeRequest中直接使用该单例：

Dim response = Await _httpClient.PostAsync(RequestedUrl, New FormUrlEncodedContent(Params))

验证步骤 #

1. 按上述修改代码，改用async/await并复用HttpClient
2. 调整Apache SSL配置并重启服务
3. 测试请求，观察是否仍出现连接关闭错误

内容的提问来源于stack exchange，提问作者yeongseo_jj