尝试在vb2013中获取面包屑时出现错误429

Question

https://query1.finance.yahoo.com/v1/test/getcrumb

当我在浏览器中使用上述网址时，它会显示面包屑。

当我尝试使用以下代码获取 vb2013 中的面包屑时，我收到“错误：（429）太多请求”。任何帮助将不胜感激。

    Dim url As String = "https://query1.finance.yahoo.com/v1/test/getcrumb"
    Dim client As New WebClient()

    Try
        Dim crumb As String = client.DownloadString(url)
        Console.WriteLine("Crumb value: " & crumb)
    Catch ex As Exception
        Console.WriteLine("Error fetching crumb value: " & ex.Message)
    End Try

    Console.ReadLine()

Answer 1

API 期待

user-agent

。您可以在请求中提供一份。这是使用 HttpClient 的代码示例，因为 WebClient 现已过时：

Dim url As String = "https://query1.finance.yahoo.com/v1/test/getcrumb"
Dim client As New HttpClient

client.DefaultRequestHeaders.Add("User-Agent", "Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 6.0)")

Try
    Dim response As HttpResponseMessage = Await client.GetAsync(url)
    Dim crumb As String = Await response.Content.ReadAsStringAsync

    Debug.WriteLine("Crumb value: " & crumb)

Catch ex As Exception
    Debug.WriteLine("Error fetching crumb value: " & ex.Message)
End Try