Как читать файл JSON

Question

Я буду использовать следующий код, чтобы получить 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.

Answer 1

Для чтения из файла на диске, замените код с этим:

Dim json As String = File.ReadAllText(@"c:\wherever\whatever.txt") 
Dim o As JObject = JObject.Parse(json)