快递助手开源----一次作业的源码

笨小孩1995 · 发表于 2017-7-4 14:54:11

只用了精易模块本软件特点在于启动自动检查上次查询的订单是否有新的物流，并且可以跟踪多个订单。在订单号处右键菜单有详细信息和取消跟踪
顺丰也能查哦

上传核心代码

窗口程序集名	保留	保留	备注
查询

子程序名	返回值类型	公开	备注
查询	快递信息
参数名	类型	参考	可空	数组	备注
单号	文本型

变量名	类型	静态	数组	备注
返回文本	文本型
n	整数型
com	文本型			公司名
最后信息	快递信息
零时信息	快递信息
cookies	文本型

清除数组 (全部信息)
返回文本＝编码_URL解码 (到文本 (网页_访问_对象 (“http://www.kuaidi100.com/autonumber/autoComNum?text=” ＋单号, 1, “type=yunda&postid=3947740269393&id=1&valicode=&temp=0.5826656165806814”, , , )), 真)
调试输出 (返回文本)
JSON.解析 (返回文本)
com ＝ JSON.取通用属性 (“auto[0].comCode”)
' com ＝ “yunda”
返回文本＝编码_URL解码 (到文本 (网页_访问 (“https://www.kuaidi100.com/query?type=” ＋ com ＋ “&postid=” ＋单号＋ “&id=19&valicode=&temp=0.04727539093303368”, 0, , , , )), 真)
调试输出 (返回文本)
JSON.解析 (返回文本)
JSON.取通用属性 (“message”)
JSON.取通用属性 (“status”)

如果 (JSON.取通用属性 (“message”) ＝ “ok” 且 JSON.取通用属性 (“status”) ＝ “200”)

计次循环首 (JSON.成员数 (“data”), n)

如果真 (n ＝ 1)

最后信息.时间＝到文本 (JSON.取通用属性 (“data[” ＋到文本 (n － 1) ＋ “].time”))

最后信息.地址＝到文本 (JSON.取通用属性 (“data[” ＋到文本 (n － 1) ＋ “].context”))

零时信息.时间＝到文本 (JSON.取通用属性 (“data[” ＋到文本 (n － 1) ＋ “].time”))

零时信息.地址＝到文本 (JSON.取通用属性 (“data[” ＋到文本 (n － 1) ＋ “].context”))

加入成员 (全部信息, 零时信息)

' 调试输出 (到文本 (JSON.取通用属性 (“data[” ＋到文本 (n － 1) ＋ “].time”)) ＋ “|” ＋到文本 (JSON.取通用属性 (“data[” ＋到文本 (n － 1) ＋ “].context”)))

计次循环尾 ()

调试输出 (“查询失败”)

最后信息.时间＝ “查询失败”

最后信息.地址＝ “查询失败”

加入成员 (全部信息, 最后信息)

返回 (最后信息)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br />
.支持库 spec<br />
<br />
.程序集 查询<br />
<br />
.子程序 查询, 快递信息<br />
.参数 单号, 文本型<br />
.局部变量 返回文本, 文本型<br />
.局部变量 n, 整数型<br />
.局部变量 com, 文本型, , , 公司名<br />
.局部变量 最后信息, 快递信息<br />
.局部变量 零时信息, 快递信息<br />
.局部变量 cookies, 文本型<br />
<br />
清除数组 (全部信息)<br />
返回文本 ＝ 编码_URL解码 (到文本 (网页_访问_对象 (“http://www.kuaidi100.com/autonumber/autoComNum?text=” ＋ 单号, 1, “type=yunda&postid=3947740269393&id=1&valicode=&temp=0.5826656165806814”, , , )), 真)<br />
调试输出 (返回文本)<br />
JSON.解析 (返回文本)<br />
com ＝ JSON.取通用属性 (“auto[0].comCode”)<br />
' com ＝ “yunda”<br />
返回文本 ＝ 编码_URL解码 (到文本 (网页_访问 (“https://www.kuaidi100.com/query?type=” ＋ com ＋ “&postid=” ＋ 单号 ＋ “&id=19&valicode=&temp=0.04727539093303368”, 0, , , , )), 真)<br />
调试输出 (返回文本)<br />
JSON.解析 (返回文本)<br />
JSON.取通用属性 (“message”)<br />
JSON.取通用属性 (“status”)<br />
.如果 (JSON.取通用属性 (“message”) ＝ “ok” 且 JSON.取通用属性 (“status”) ＝ “200”)<br />
    .计次循环首 (JSON.成员数 (“data”), n)<br />
        .如果真 (n ＝ 1)<br />
            最后信息.时间 ＝ 到文本 (JSON.取通用属性 (“data[” ＋ 到文本 (n － 1) ＋ “].time”))<br />
            最后信息.地址 ＝ 到文本 (JSON.取通用属性 (“data[” ＋ 到文本 (n － 1) ＋ “].context”))<br />
        .如果真结束<br />
        零时信息.时间 ＝ 到文本 (JSON.取通用属性 (“data[” ＋ 到文本 (n － 1) ＋ “].time”))<br />
        零时信息.地址 ＝ 到文本 (JSON.取通用属性 (“data[” ＋ 到文本 (n － 1) ＋ “].context”))<br />
        加入成员 (全部信息, 零时信息)<br />
        ' 调试输出 (到文本 (JSON.取通用属性 (“data[” ＋ 到文本 (n － 1) ＋ “].time”)) ＋ “|” ＋ 到文本 (JSON.取通用属性 (“data[” ＋ 到文本 (n － 1) ＋ “].context”)))<br />
    .计次循环尾 ()<br />
.否则<br />
    调试输出 (“查询失败”)<br />
    最后信息.时间 ＝ “查询失败”<br />
    最后信息.地址 ＝ “查询失败”<br />
    加入成员 (全部信息, 最后信息)<br />
.如果结束<br />
<br />
返回 (最后信息)

全部代码...象征性的收取1精币

快递助手.7z (410.35 KB, 下载次数: 119)