Foxtable(狐表)用户栏目专家坐堂 → [求助]请教下,获取时效价格的API怎么写?


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

主题:[求助]请教下,获取时效价格的API怎么写?

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


加好友 发短信
等级:六尾狐 帖子:1490 积分:10607 威望:0 精华:0 注册:2018/10/16 11:42:00
[求助]请教下,获取时效价格的API怎么写?  发帖心情 Post By:2018/12/31 0:20:00 [只看该作者]

API文档
基础信息下

获取时效价格


的代码应该怎么写?



合作商编码(company_id):   a27daa5603d342bd8021c90a8c497d7f
合作商名称:                       zto73125
合作商签名key:                  dc3f587db1e1
是否BASE64:                     Y

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


加好友 发短信
等级:六尾狐 帖子:1490 积分:10607 威望:0 精华:0 注册:2018/10/16 11:42:00
  发帖心情 Post By:2019/1/2 9:56:00 [只看该作者]

请教请教

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/1/2 11:30:00 [只看该作者]

请自行参考帮助文档替换值获取

 

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

 


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/1/2 11:33:00 [只看该作者]

Dim properties As new zopsdk.ZopProperties("a27daa5603d342bd8021c90a8c497d7f","dc3f587db1e1")
Dim client As new zopsdk.ZopClient(properties)
Dim request As new zopsdk.ZopRequest()
request.url = "http://japi.zto.cn/priceAndHourInterfaceGetHourPrice"
request.addParam("company_id", "a27daa5603d342bd8021c90a8c497d7f")
request.addParam("msg_type", "GET_HOUR_PRICE")
request.addParam("data", "{""dispCity"":""无锡市"",""dispProv"":""江苏"",""sendCity"":""杭州市"",""sendProv"":""浙江""}")
Dim str = client.execute(request)
msgbox(str)
Dim jo As JObject = JObject.Parse(str)

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


加好友 发短信
等级:六尾狐 帖子:1490 积分:10607 威望:0 精华:0 注册:2018/10/16 11:42:00
  发帖心情 Post By:2019/1/2 13:31:00 [只看该作者]

Dim properties As new zopsdk.ZopProperties("替换值","替换值")
Dim client As new zopsdk.ZopClient(properties)
Dim request As new zopsdk.ZopRequest()
request.url = "替换值"
request.addParam("company_id", "替换值")
request.addParam("msg_type", "类型替换值")
request.addParam("data", "{""dispCity"":""无锡市"",""dispProv"":""江苏"",""sendCity"":""杭州市"",""sendProv"":""浙江""}"data替换值)
Dim str = client.execute(request)
msgbox(str)
Dim jo As JObject = JObject.Parse(str)

就是这个API都是这么写,只是这几个替换值不一样是吧

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/1/2 15:10:00 [只看该作者]

 

认认真真看之前的几个例子。然后看具体的帮助文档。把代码替换成你帮助文档那里的对一个的值,即可。

 

 


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


加好友 发短信
等级:六尾狐 帖子:1490 积分:10607 威望:0 精华:0 注册:2018/10/16 11:42:00
  发帖心情 Post By:2019/1/3 0:15:00 [只看该作者]

Dim properties As new zopsdk.ZopProperties("a27daa5603d342bd8021c90a8c497d7f","dc3f587db1e1")
Dim client As new zopsdk.ZopClient(properties)
Dim request As new zopsdk.ZopRequest()
request.url = "http://japi.zto.cn/priceAndHourInterfaceGetHourPrice"
request.addParam("company_id", "a27daa5603d342bd8021c90a8c497d7f")
request.addParam("msg_type", "GET_HOUR_PRICE")
request.addParam("data", "{""dispCity"":""无锡市"",""dispProv"":""江苏"",""sendCity"":""杭州市"",""sendProv"":""浙江""}")
Dim str = client.execute(request)
msgbox(str)
Dim jo As JObject = JObject.Parse(str)
msgbox("时效:" & jo("data")("hour").tostring )
msgbox("首重:" & jo("data")("firstMoney").tostring )
msgbox("续重:" & jo("data")("addMoney").tostring )






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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/1/3 9:05:00 [只看该作者]

请问现在有什么问题?

 回到顶部