从 vb.net 中的 httpwebrequest 获取 Json 响应

Question

我正在处理旧的 VB.NET (ASP.NET) 网页，我需要获得 HttpWebRequest 调用的响应，如下所示：

Dim s As HttpWebRequest
Dim enc As UTF8Encoding
Dim postdatabytes As Byte()
s = httpWebRequest.Create("www.theurl.com/api")
enc = New System.Text.UTF8Encoding()
Dim PostData = "grant_type=client_credentials"
postdata = postdata & "&client_id=" & ConfigurationManager.AppSettings("client_id")
postdata = postdata & "&client_secret=" & ConfigurationManager.AppSettings("client_secret")
postdata = postdata & "&audience=" & ConfigurationManager.AppSettings("audience")
postdatabytes = enc.GetBytes(postdata)
s.Method = "POST"
s.ContentType = "application/x-www-form-urlencoded"
s.ContentLength = postdatabytes.Length

Using stream = s.GetRequestStream()
      stream.Write(postdatabytes, 0, postdatabytes.Length)
End Using
Dim result = s.GetResponse()
response.write(result)

我遇到的问题是，我没有得到 Postman 得到的 Json 字符串，而是在响应写“result”时得到这个：

System.Net.HttpWebResponse

有什么想法吗？

谢谢！

Answer 1

对于那些寻找答案的人，我通过添加以下代码使其工作：

Dim responsedata As Stream = result.GetResponseStream
Dim responsereader As StreamReader = New StreamReader(responsedata)
Dim xResponse = responsereader.ReadToEnd
Response.Write(xResponse)

谢谢。

从 vb.net 中的 httpwebrequest 获取 Json 响应

Get Json response from httpwebrequest in vb.net

json

vb.net

httpwebrequest