jd彻底删除订单易语言源码

.版本 2
.支持库 spec

.程序集 窗口程序集_启动窗口

.子程序 __启动窗口_创建完毕



.子程序 _按钮2_被单击
.局部变量 res, 文本型
.局部变量 cookies, 文本型
.局部变量 返回结果, 文本型
.局部变量 result, 文本型
.局部变量 url, 文本型

url ＝ 文本_替换 (#常量2, , , , “[num]”, 编辑框3.内容, , , , , , , , )
cookies ＝ 编辑框4.内容
res ＝ 编码_URL解码 (到文本 (网页_访问_对象 (url, 0, , cookies, , , , , , , , , , , , , )), 真)
调试输出 (res)
返回结果 ＝ 文本_取出中间文本 (res, “errMsg” ＋ #引号 ＋ “:” ＋ #引号, #引号 ＋ “,”)
result ＝ 文本_取出中间文本 (res, “result” ＋ #引号 ＋ “:” ＋ #引号, #引号 ＋ “})}catch ”)
调试输出 (返回结果)
调试输出 (result)
.判断开始 (返回结果 ＝ “”)
    .如果 (result ＝ “1”)
        信息框 (“删除成功”, 0, , )
    .否则
        .如果 (result ＝ “0”)
            信息框 (“删除失败，复制ck重试”, 0, , )
        .否则

        .如果结束

    .如果结束

.判断 (返回结果 ＝ “用户未登录”)
    信息框 (“Cookies错误，用户未登录”, 0, , )
.默认

.判断结束


.子程序 _按钮3_被单击

编辑框3.内容 ＝ “”
编辑框4.内容 ＝ “”

@guren123