Foxtable(狐表)用户栏目专家坐堂 → 接口返回的json格式数据 列表table控件不显示


  共有3440人关注过本帖树形打印复制链接

主题:接口返回的json格式数据 列表table控件不显示

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


加好友 发短信
等级:婴狐 帖子:14 积分:191 威望:0 精华:0 注册:2020/12/30 14:12:00
接口返回的json格式数据 列表table控件不显示  发帖心情 Post By:2021/1/6 13:55:00 [只看该作者]

有个问题不知道怎么原因,麻烦大家帮帮忙。
接口数据:图片点击可在新窗口打开查看


列表会增加一行空白但是结果不显示
图片点击可在新窗口打开查看
列表读取数据并处理代码:
图片点击可在新窗口打开查看


 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:105473 积分:536350 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/1/6 14:10:00 [只看该作者]

请把完整代码文字发上来,不要截图,方便别人修改

 回到顶部
帅哥哟,离线,有人找我吗?
zhaozilong
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:14 积分:191 威望:0 精华:0 注册:2020/12/30 14:12:00
  发帖心情 Post By:2021/1/6 14:20:00 [只看该作者]

Dim url As String="http://127.0.0.1?v=sale" 
Dim hc As new HttpClient(url)
Dim str As String
str=hc.GetData()
Dim jo As jarray=jarray.parse(str)
'MessageBox.Show(jo.Tostring)
For Each jt As Jtoken In jo
  With Tables("Sale_Sale")
        Dim r As Row=.addnew()
        For Each c As Col In .Cols
       r(c.name)=jt(c.name)
        Next
  End With
Next

接口返回json格式的结果:
[ { "公司名称": "软件开发公司", "订单编号": "SSDD202001050001", "客户类型": "系统内", "客户ID": "2", "收货地址ID": "0", "用户名称": "超级管理员", "创建时间": "2020-01-05", "订单来源": "" }, { "公司名称": "test公司1", "订单编号": "SSDD202001050002", "客户类型": "系统外", "客户ID": "2", "收货地址ID": "0", "用户名称": "张三", "创建时间": "2020-01-04", "订单来源": "" } ]

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:105473 积分:536350 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/1/6 14:24:00 [只看该作者]

一楼截图的表格是第一列,第二列这种列名,json里是公司名称,订单编号这种完全对应不上

For Each jt As Jtoken In jo
  With Tables("Sale_Sale")
        Dim r As Row=.addnew()
        r("第一列") = jt("公司名称").tostring
        r("第二列") = jt("订单编号").tostring
  End With
Next

 回到顶部
帅哥哟,离线,有人找我吗?
zhaozilong
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:14 积分:191 威望:0 精华:0 注册:2020/12/30 14:12:00
  发帖心情 Post By:2021/1/6 14:45:00 [只看该作者]

 谢谢啦。

 这么修改之后确实可以显示数据了, 

我还想问一下 那个表格列的标题能修改吗?  不想让显示 第一列, 第二列,第三列 ,想让显示成 公司名称,订单编号, 创建时间  这种的

 回到顶部
帅哥,在线噢!
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:105473 积分:536350 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/1/6 14:51:00 [只看该作者]

参考:http://www.foxtable.com/webhelp/topics/0036.htm

很基础的知识,建议还是先看看帮助吧,基础没打好只会更浪费时间

 回到顶部