0

我正在尝试使用 Betfair NG API 创建一个用 VB.NET 编写的 Betfair 应用程序。我正在尝试使用以下说明在此处请求 VB.NET 中的导航菜单,但我收到错误 400 Bad request。有人可以给我一个这样做的代码吗?

Sub GetNavigatorManu(ByVal SessToken As String, ByVal AppKey As String)

    Dim request As HttpWebRequest = Nothing
    Dim response As HttpWebResponse = Nothing


    Dim strResponseStatus As String = ""
    Try
        request = WebRequest.Create(New Uri("https://api.betfair.com/exchange/betting/rest/v1/en/navigation/menu.json"))

        request.Accept = "application/json"
        request.Method = "GET"
        request.KeepAlive = True
        request.ContentType = "application/json"
        request.AutomaticDecompression = DecompressionMethods.GZip Or DecompressionMethods.Deflate
        request.Headers.Add("Accept-Encoding", "gzip,deflate")
        request.Headers.Add("X-Authentication", SessToken)
        request.Headers.Add("X-Application", AppKey)

        response = request.GetResponse()
        Display the status below 
        strResponseStatus = "Status is " & CType(response, HttpWebResponse).StatusCode

    Catch ex As Exception
        MsgBox("CreateRequest Error" & vbCrLf & ex.Message)
    End Try
    MsgBox(strResponseStatus)

End Sub
4

0 回答 0