我有以下JSON:
{
"row2": {
"Activity_log_key": 2,
"Activity_day": "2017-01-12T00:00:00",
"Effort": 8.0,
"Comment": "comment text",
"Activity": "activity text",
"Work_group": "Project",
"Work_item": "test project 1",
"Related_category": {
"Project_phase": [
["category_name", "Design"],
["category_key", 116255]
]
}
},
"row3": {
"Activity_log_key": 3,
"Activity_day": "2017-01-12T00:00:00",
"Effort": 5.5,
"Comment": "no comments",
"Activity": "activty demo text",
"Work_group": "Project",
"Work_item": "project 2",
"Related_category": {
"Project_phase": [
["category_name", "Develop"],
["category_key", 116256]
],
"Training_provider": [
["category_name", "Analysis"],
["category_key", 116254]
]
}
}
}
我将JSON响应转换为控制器中的对象:
Dim client As New HttpClient
Dim request = client.GetStringAsync(url & "/effort")
request.Wait()
Dim response = request.Result
Dim jsonObj As Object = New JavaScriptSerializer().Deserialize(Of Object)(response)
ViewData("response") = jsonObj
现在我尝试在视图中的For Each
上运行ViewData("response")
循环,但我没有结果。
我该如何解决?