.版本 2
.支持库 spec
.程序集 窗口程序集1
.子程序 _按钮1_被单击
.局部变量 返回文本, 文本型
.局部变量 json, 类_json
.局部变量 总数, 整数型
.局部变量 i1, 整数型
返回文本 = 网页_访问S (“//www.kuaidi100.com/autonumber/autoComNum?text=” + 编辑框1.内容, 0)
调试输出 (返回文本)
返回文本 = 文本_取出中间文本 (返回文本, #常量1, #引号, , )
返回文本 = 网页_访问S (“//www.kuaidi100.com/query?type=” + 返回文本 + “&postid=” + 编辑框1.内容 + “&id=1&valicode=&temp=0.7026557298377156”, 0)
返回文本 = 编码_utf8到gb2312 (返回文本)
json.解析 (返回文本)
总数 = json.成员数 (“data”)
.判断开始 (总数 = 0)
编辑框2.内容 = “无数据。”
.默认
标签1.标题 = json.取通用属性 (“data[0].context”)
.计次循环首 (总数, i1)
调试输出 (总数 - i1)
编辑框2.加入文本 (json.取通用属性 (“data[” + 到文本 (总数 - i1) + “].time”) + #换行符 + json.取通用属性 (“data[” + 到文本 (总数 - i1) + “].context”) + #换行符)
编辑框2.加入文本 (“--------------------------------------------------------” + #换行符)
.计次循环尾 ()
.判断结束
调试输出 (返回文本)