Foxtable(狐表)用户栏目专家坐堂 → [求助]百度万年历接口相关


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

主题:[求助]百度万年历接口相关

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


加好友 发短信
等级:六尾狐 帖子:1465 积分:10403 威望:0 精华:0 注册:2018/10/16 11:42:00
[求助]百度万年历接口相关  发帖心情 Post By:2021/6/23 0:51:00 [只看该作者]

http://opendata.baidu.com/api.php?query=2020%E5%B9%B46%E6%9C%88&resource_id=6018&format=json

上面这个链接红色部分在浏览器打开后编程了下面这样

我要怎样才能把2020年6月用代码写成2020%E5%B9%B46%E6%9C%88这样呢?

还有我这样写出来的代码都变成了乱码,怎么才让他变成正常文字?
Dim hc As New HttpClient("http://opendata.baidu.com/api.php?query=2020%E5%B9%B46%E6%9C%88&resource_id=6018&format=json")
Dim ret As String = hc.GetData()
Dim jo As JObject = JObject.Parse(ret)
For Each jt As JToken In jo("data")
    For Each ep As JToken In JArray.Parse(jt("holidaylist").ToString )
        Output.Show("节日:"  & ep("name").ToString() &  "  日期:" & ep("startday").ToString())
    Next
Next


'结果

姓名:???  年龄:2020-1-1
姓名:???  年龄:2020-1-24
姓名:????  年龄:2020-1-25
姓名:??????  年龄:2020-4-4
姓名:?????  年龄:2020-5-1
姓名:?????  年龄:2020-6-25
姓名:?????  年龄:2020-10-1
姓名:?????  年龄:2020-10-1

图片点击可在新窗口打开查看此主题相关图片如下:企业微信截图_16263159957616.png
图片点击可在新窗口打开查看

[此贴子已经被作者于2021/7/15 10:29:45编辑过]

 回到顶部