click物流信息在信息框中显示 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → click物流信息在信息框中显示

共有2118人关注过本帖树形打印复制链接主题：click物流信息在信息框中显示

yuntian

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

加好友

发短信

等级：幼狐帖子：87 积分：960 威望：0 精华：0 注册：2018/8/8 18:43:00

click物流信息在信息框中显示 发帖心情

Post By：2020/10/26 14:10:00 [显示全部帖子]

大佬，编辑表click，如何将物流信息在信息框中显示啊，求教

[此贴子已经被作者于2020/10/27 11:18:54编辑过]

yuntian

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

加好友

发短信

等级：幼狐帖子：87 积分：960 威望：0 精华：0 注册：2018/8/8 18:43:00

Post By：2020/10/26 14:11:00 [显示全部帖子]

Dim hc As New HttpClient("http://ali-deliver.showapi.com/showapi_expInfo?com=auto&nu=SF1042535821840")

hc.Headers.Add("Authorization","APPCODE " & "ff56ccadbdc606bf2f")

Dim jo As JObject = Jobject.Parse(hc.GetData)

If jo("showapi_res_body")("data") IsNot Nothing Then

For Each jt As JToken In jo("showapi_res_body")("data")

Output.Show(jt("time").ToString & " | " & jt("context").ToString)

End If

If e.Col.name = "dhqrd" Then

FoxUI.Msgbox("Output.Show","快递信息标题", FoxUI.MessageType.Main)

End If

[此贴子已经被作者于2020/10/27 11:19:07编辑过]

yuntian

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

加好友

发短信

等级：幼狐帖子：87 积分：960 威望：0 精华：0 注册：2018/8/8 18:43:00

Post By：2020/10/26 14:19:00 [显示全部帖子]

大佬能否给详细说下，没看懂

yuntian

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

加好友

发短信

等级：幼狐帖子：87 积分：960 威望：0 精华：0 注册：2018/8/8 18:43:00

Post By：2020/10/26 15:53:00 [显示全部帖子]

If e.Col.name = "dhqrd" Then

Dim hc As New HttpClient("http://ali-deliver.showapi.com/showapi_expInfo?com=auto&nu=SF1042535821840")

hc.Headers.Add("Authorization","APPCODE " & "ff56cca9dc606bf2f")

Dim jo As JObject = Jobject.Parse(hc.GetData)

If jo("showapi_res_body")("data") IsNot Nothing Then

For Each jt As JToken In jo("showapi_res_body")("data")

MessageBox.Show (jt("time").ToString & " | " & jt("context").ToString)

End If

生成的快递信息会逐条出现消息框提示一段段的快递信息，不能在出现的消息框钟输出这个单号的所有快递信息

[此贴子已经被作者于2020/10/27 11:19:24编辑过]

yuntian

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

加好友

发短信

等级：幼狐帖子：87 积分：960 威望：0 精华：0 注册：2018/8/8 18:43:00

Post By：2020/10/26 15:54:00 [显示全部帖子]

此主题相关图片如下：12.jpg

此主题相关图片如下：1.jpg

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

主题：click物流信息在信息框中显示