从网站http://www.kuaidi100.com获取快递名称和物流信息报错

任我逍遥 · 发表于 2020-4-10 17:27

昨天开始从网站 http://www.kuaidi100.com获取快递名称和物流信息，发现获取不了任何信息了，请问是因为100网站改变了参数结构么？具体见附件，谢谢老师们。
Set xmlhttp = CreateObject("WinHttp.WinHttpRequest.5.1")
With xmlhttp
   For j = s To t
   If Cells(j, 12) <> "" And Cells(j, 14) <> "已签收" Then
      .Open "POST", "http://www.kuaidi100.com/autonumber/autoComNum?text=" & Trim(Cells(j, 12).Value)
      .send 'post请求，目的是获得快递公司名称
      str1 = Split(Split(.responsetext, "comCode"":""")(2), """")(0) ‘昨天开始获取不了任何信息了

VBA提取快递名称和最新状态信息-以前都可以的这两天突然出错了200410.zip (31.05 KB, 下载次数: 18)

changhong8 · 发表于 2020-4-10 18:29

访问频繁的话会被管制吧

任我逍遥 · 发表于 2020-4-10 19:24

用了一年了，突然就管制？

任我逍遥 · 发表于 2020-4-14 16:56

你们的IP测试，可以的吗？

		自动登录	找回密码
密码			免费注册