sha1解密 随手记登录取等级例子
.版本 2 .支持库 spec .程序集 窗口程序集_启动窗口 .程序集变量 乐玩, 图色模拟类 .子程序 _按钮1_被单击 .局部变量 获取_uid, 文本型 .局部变量 json, 类_json .局部变量 vccode, 文本型 .局部变量 uid, 文本型 .局部变量 password, 文本型 .局部变量 cookies, 文本型 .局部变量 局_返回, 文本型 .局部变量 cookie, 文本型 .局部变量 响应_cookie, 文本型 .局部变量 su, 文本型 .局部变量 iv, 文本型 .局部变量 sign, 文本型 .局部变量 st, 文本型 .局部变量 局_提交, 文本型 .局部变量 lv, 文本型 password = 功能_运行JS代码_表达式 (编辑框2.内容) password = 功能_运行JS代码_表达式 (编辑框1.内容 + password) 获取_uid = 网页_访问S (“https://login.sui.com/login.do?opt=vccode”, 0, , , , , , , , , , , , , , , , , , , ) json.解析 (获取_uid) vccode = json.取通用属性 (“vccode”, ) uid = json.取通用属性 (“uid”, ) password = 功能_运行JS代码_表达式 (password + vccode) json.清除 () 局_返回 = 网页_访问S (“https://login.sui.com/login.do?email=” + 编辑框1.内容 + “&status=0&password=” + password + “&uid=” + uid + “&callback=jsonp” + 时间_取现行时间戳 (), 0, , , 响应_cookie, #常量3, , , , , , , , , , , , , , , ) .如果真 (寻找文本 (局_返回, “ok”, , 假) ≠ -1) 响应_cookie = 文本_替换 (响应_cookie, , , , “__newAuth=” + #引号 + #引号 + “;”, “”, , , , , , , , ) 局_返回 = 网页_访问S (“https://login.sui.com/auth.do”, 0, , 响应_cookie, , , , , , , , , , , , , , , , , ) su = 文本_取出中间文本 (局_返回, #su, #引号, , ) iv = 文本_取出中间文本 (局_返回, #iv, #引号, , ) sign = 文本_取出中间文本 (局_返回, #sign, #引号, , ) st = 文本_取出中间文本 (局_返回, #st, #引号, , ) 局_提交 = “su=” + su + “&iv=” + iv + “&sign=” + sign + “&st=” + st 局_返回 = 网页_访问S (“https://www.sui.com/report_index.do”, 1, 局_提交, , 响应_cookie, , , , , , , , , , , , , , , , ) lv = 文本_取出中间文本 (局_返回, #lv, #引号, , ) 调试输出 (“等级:”, lv) 局_返回 = 网页_访问S (“https://www.sui.com/systemSet/setPassword.do”, 0, , 响应_cookie, , , , , , , , , , , , , , , , , ) 调试输出 (局_返回) .如果真结束 .子程序 功能_运行JS代码_表达式, 文本型, , 此代码由精易网页调试助手生成代码,配合精易模块使用。 .参数 参数1, 文本型 .局部变量 JS命令, 类_脚本组件 .局部变量 结果, 文本型 JS命令.执行 (#常量1) 线程_初始化COM库 () 结果 = JS命令.计算表达式 (“hex_sha1('” + 参数1 + “')”) 线程_取消COM库 () 返回 (结果)