Foxtable(狐表)用户栏目专家坐堂 → 请教解析json数据的问题


  共有2066人关注过本帖平板打印复制链接

主题:请教解析json数据的问题

帅哥哟,离线,有人找我吗?
aqsunxj
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:171 积分:1471 威望:0 精华:0 注册:2021/6/4 15:05:00
请教解析json数据的问题  发帖心情 Post By:2021/9/26 17:50:00 [只看该作者]

想对返回的json数据解析,调试阶段 相同的接口返回的数据
一、
{
  "status": true,
  "data": "该公司暂时没有法律诉讼信息"
}

二、
{
  "status": true,
  "data": {
    "total": 2,
    "list": [
      {
        "caseContent": "原告:阜阳市融资担保有限公司:729781444 被告:安徽拓鑫再生资源有限公司:934537734,被告:阜阳龙跃精密轴承有限公司:349403845",
        "caseReason": "追偿权纠纷",
        "pulishDate": "2019-12-30",
        "caseName": "阜阳市融资担保有限公司与阜阳龙跃精密轴承有限公司、安徽拓鑫再生资源有限公司追偿权纠纷一审民事判决书",
        "caseNo": "(2019)皖1202民初3769号"
      },
      {
        "caseContent": "原告:阜阳市融资担保有限公司:729781444 被告:安徽拓鑫再生资源有限公司:934537734,被告:阜阳龙跃精密轴承有限公司:349403845",
        "caseReason": "追偿权纠纷",
        "pulishDate": "2019-09-30",
        "caseName": "阜阳市融资担保有限公司诉阜阳龙跃精密轴承有限公司、安徽拓鑫再生资源有限公司追偿权纠纷一案民事判决书",
        "caseNo": "(2019)皖1202民初3769号"
      }
    ]
  }
}

如果该公司没有诉讼的时候返回的date是没有嵌套的。
用如下代码,显示出错。请教问题出在哪了呢?谢谢

Dim jo As JObject = Jobject.Parse(ClipBoard.GetText)
If jo("data")("list") IsNot Nothing Then
    For Each jt As JToken In jo("data")("list")
        Output.Show(jt("caseReason").ToString & " | " & jt("caseNo").ToString)
    Next
Else
output.Show(jo("data"))
End If

 回到顶部