如何在FOXTABLE中调用阿里云中的快递查询 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 如何在FOXTABLE中调用阿里云中的快递查询

共有4127人关注过本帖树形打印复制链接主题：如何在FOXTABLE中调用阿里云中的快递查询

有点色

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

加好友

发短信

等级：超级版主帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00

Post By：2017/3/2 9:58:00 [显示全部帖子]

查快递的方式很多吧？比如菜鸟快递

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=93954&skin=0

有点色

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

加好友

发短信

等级：超级版主帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00

Post By：2017/3/2 14:27:00 [显示全部帖子]

以下是引用fpx406在2017/3/2 12:49:00的发言：
预计啥时候可以发布呀

如果是高级开发版或者永久开发版，可以直接下载最新版使用。

HttpClient的功能，其它版本需要过一段时间才会更新。

[此贴子已经被作者于2017/3/2 14:27:32编辑过]

有点色

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

加好友

发短信

等级：超级版主帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00

Post By：2017/5/9 14:23:00 [显示全部帖子]

执行代码

有点色

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

加好友

发短信

等级：超级版主帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00

Post By：2017/5/9 14:59:00 [显示全部帖子]

Dim hc As New HttpClient("http://ali-deliver.showapi.com/showapi_expInfo?com=shunfeng&nu=929601675231")
hc.Headers.Add("Authorization","APPCODE " & "0d9ce00129a34f5b9e6411a732349421")
Dim jo As JObject = Jobject.Parse(hc.GetData)
If jo("showapi_res_body")("data") IsNot Nothing Then
    Dim str As String = ""
    For Each jt As JToken In jo("showapi_res_body")("data")
        str &= jt("time").ToString & " | " & jt("context").ToString & vbcrlf
    Next
    msgbox(str)
End If

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

主题：如何在FOXTABLE中调用阿里云中的快递查询