vbN*_*bie 3 vb.net twitter json.net deserialization
我正在尝试从以下流中解析json值:
{"id": "tag:search.xxxxx.com,2005:xxxxxxxxxxx"}
{"body": "acordei (:"}
{"verb": "post"}
{"link": "http://xxxxx.com/rohanaf_/xxxxxxxxxx/xxxxxxxxx"}
{"generator": {
"link": "http://xxxxx.com",
"displayName": "web"
}}
{"postedTime": "2012-03-31T19:23:51.000Z"}
{"provider": {
"link": "http://www.xxxxx.com",
"displayName": "xxxxxx",
"objectType": "service"
}}
{"object": {
"summary": "acordei (:",
"id": "object:search.xxxxxx.com,2005:xxxxxxxxxxxx",
"link": "http://xxxxxxx.com/rohanaf_/statuses/xxxxxxxxxxxx",
"postedTime": "2012-03-31T19:23:51.000Z",
"objectType": "note"
}}
{"actor": {
"summary": "- namorada da @srtameiga fim. ♥",
"twitterTimeZone": "Brasilia",
"friendsCount": 197,
"location": {
"displayName": "Porto Alegre ",
"objectType": "place"
},
"link": "http://www.xxxxxxxxxx.com/rohanaf_",
"postedTime": "2010-03-31T20:12:49.000Z",
"image": "http://a0.twimg.com/profile_images/xxxxxxxxxxx/Foto1436_normal.jpg",
"links": [
{
"rel": "me",
"href": null
}
],
"listedCount": 3,
"id": "id:xxxxxxxxxxx.com:xxxxxxxxx",
"languages": [
"pt"
],
"utcOffset": "-10800",
"followersCount": 347,
"preferredUsername": "rohanaf_",
"displayName": ", feia ;$",
"statusesCount": 48412,
"objectType": "person"
}}
{
"xxxxxx_entities": {
"urls": [],
"hashtags": [],
"user_mentions": []
}}
{"objectType": "activity"}
{"source": {
"language": {
"value": "fr"
},
"matching_rules": [
{
"value": "lang:fr",
"tag": null
}
],
}}
Run Code Online (Sandbox Code Playgroud)
我使用JSON.NET尝试了以下选项,并且可以正常工作,但是缺少几个字段(来源:及其所有子项,包括其子项)。(“源”)(“匹配规则”)(“标签”)..etc
Dim results as List(Of JToken) = jobj.Children().ToList
For each item as JProperty In results
item.CreateReader()
If item.name ="id" then
id = item.value
End If
If item.name ="actor" then
author = item.Value("displayName").ToString
End If
If item.name="source" then
Dim gList as IList(Of JToken)= item("matching_rules").Children.ToList
End If
Next
Run Code Online (Sandbox Code Playgroud)
我正在尝试获取该属性名称来源的所有子代值。现在,如果我使用JsonTextReader,则可以阅读所有内容,但是这很繁琐且容易出错。任何建议表示赞赏。
我想到了
If item.name = "source" then
searchterm = item.last.selecttoken("matching_rules").first.item("value").tostring
End if
Run Code Online (Sandbox Code Playgroud)
| 归档时间: |
|
| 查看次数: |
9690 次 |
| 最近记录: |