我将使用以下代码从请求中获取json。
Dim url As String = urlbuilder.ToString
Dim request As HttpWebRequest = DirectCast(WebRequest.Create(url), HttpWebRequest)
Dim response As HttpWebResponse = DirectCast(request.GetResponse(), HttpWebResponse)
Dim reader As StreamReader = New StreamReader(response.GetResponseStream())
Dim o As JObject = JObject.Parse(reader.ReadToEnd)
reader.Close()
response.Close()
我已经检查了这个,而o(JObject)有信息。
我现在需要使用这些数据,但为了不在开发过程中产生成本(数据来自付费服务),我有一个输出样本,我将其保存为文件。如何修改上面的代码,以便我暂时读入文件而不是处理响应。理想情况下,我希望它仍然是一个JObject。
答案 0 :(得分:1)
要从磁盘上的文件中读取,请将代码替换为:
Dim json As String = File.ReadAllText(@"c:\wherever\whatever.txt")
Dim o As JObject = JObject.Parse(json)