.版本 2
.支持库 spec
.程序集 窗口程序集_启动窗口
.子程序 _按钮1_被单击
.局部变量 str, 文本型
.局部变量 url, 文本型
.局部变量 ua, 文本型
.局部变量 小数字, 文本型
ua = JavaScriptua (#常量1)
调试输出 (ua)
小数字 = JavaScript (#常量2, “^CE%JUm#r3w&)”, “1.0.0” + ua)
调试输出 (小数字)
url = “https://api.quyuehui.com/account/getSmsCode.do?mobile=18888888789&type=2&_=” + 时间_取现行时间戳 (假) + “&ua=h5%2F1.0.0%2F2%2F0%2F0%2F0%2F0%2F0%2F%2F0%2F0%2F” + ua + “%2F0%2F0%2F” + 小数字
str = 到文本 (网页_访问_对象 (url, 0, , , , #常量3, , , , , , , , , , , ))
str = 编码_URL解码 (str, 真)
调试输出 (str)
.子程序 JavaScriptua, 文本型, , WT-JS_DEBUG
.参数 script, 文本型, , 常量JS脚本
.局部变量 js, 对象
.局部变量 eval, 变体型
.局部变量 ret, 文本型
' CoInitialize (0)‘线程中使用 加载COM
js.创建 (“ScriptControl”, )
js.写属性 (“Language”, “JScript”)
' 如果调试结果与工具不符,有可能是编码问题,尝试加入: 【 编码_Utf8到Ansi (到字节集 (script)) 】
js.逻辑方法 (“AddCode”, script)
eval = js.通用方法 (“Eval”, “r()”)
ret = eval.取文本 ()
js.清除 ()
' CoUninitialize () ‘线程中使用 卸载COM
返回 (ret)
.子程序 JavaScript, 文本型, , WT-JS_DEBUG
.参数 script, 文本型, , 常量JS脚本
.参数 e, 文本型, , 参数1
.参数 t, 文本型, , 参数2
.局部变量 js, 对象
.局部变量 eval, 变体型
.局部变量 ret, 文本型
' CoInitialize (0)‘线程中使用 加载COM
js.创建 (“ScriptControl”, )
js.写属性 (“Language”, “JScript”)
' 如果调试结果与工具不符,有可能是编码问题,尝试加入: 【 编码_Utf8到Ansi (到字节集 (script)) 】
js.逻辑方法 (“AddCode”, script)
eval = js.通用方法 (“Eval”, “aa(” + #引号 + e + #引号 + “, ” + #引号 + t + #引号 + “)”)
ret = eval.取文本 ()
js.清除 ()
' CoUninitialize () ‘线程中使用 卸载COM
返回 (ret)
趣约会脚本