数组提取 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 数组提取

共有3631人关注过本帖树形打印复制链接主题：数组提取

fubblyc

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：九尾狐帖子：2355 积分：16187 威望：0 精华：0 注册：2013/9/1 8:09:00

数组提取

Post By：2019/9/16 23:32:00 [只看该作者]

\"tag\":1,

\"msg\":[

{\"id\":852908,\"ean\":\"852908\",\"sku\":\"729022019\"},{\"id\":852909,\"ean\":\"852909\",\"sku\":\"729022020\"}

]

老师，这个字符串 ,怎么提取
id ean sku 到表格对应的列呢？

[此贴子已经被作者于2019/9/16 23:32:40编辑过]

有点蓝

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：110744 积分：563646 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2019/9/17 8:35:00 [只看该作者]

Dim json As String = ".....上面json......"
Dim jo As JObject = JObject.Parse(json)
Dim ja As JArray = jo("msg")
For i As Integer = 0 To ja.Count - 1
Output.Show(ja(i)("id").ToString)

Output.Show(ja(i)("ean").ToString)

[此贴子已经被作者于2019/9/17 8:34:58编辑过]

fubblyc

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：九尾狐帖子：2355 积分：16187 威望：0 精华：0 注册：2013/9/1 8:09:00

Post By：2019/9/17 8:46:00 [只看该作者]

谢谢蓝老师。

不过他这个好像不是正常的json数据，有双引号，还有斜杠

我按照您说的写，出现了这个错误

此主题相关图片如下：微信截图_20190917084443.png

fubblyc

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：九尾狐帖子：2355 积分：16187 威望：0 精华：0 注册：2013/9/1 8:09:00

Post By：2019/9/17 8:52:00 [只看该作者]

我把斜杠去掉：

此主题相关图片如下：微信截图_20190917084701.png

有点蓝

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：110744 积分：563646 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2019/9/17 9:09:00 [只看该作者]

把最外一层的双引号去掉

fubblyc

小大 6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：九尾狐帖子：2355 积分：16187 威望：0 精华：0 注册：2013/9/1 8:09:00

Post By：2019/9/17 11:11:00 [只看该作者]

可以啦，谢谢蓝老大

下一主题 >> << 上一主题

主题：数组提取