修改JS解密，用精易得脚本组件解密！

码农 · 发表于 2013-11-14 18:32:17

[e]
.版本 2.支持库 spec.子程序 QQrsa.参数 pass, 文本型.参数 ts, 文本型, 参考.局部变量 str, 文本型dom_运行Js (#Rsa, 1)str ＝ dom_运行Js (“RsaEncrypt('” ＋ pass ＋ “')”)调试输出 (str).子程序 dom_运行Js, 文本型.参数 js_, 文本型, 可空.参数方式_, 整数型, 可空, 0.执行 1.加载 2.清除.局部变量 hwin_, 对象, 静态.局部变量 dom_, 对象, 静态.局部变量 obj, 对象.局部变量 tmp, 文本型.如果真 (dom_.是否为空 ()) dom_.创建 (“{25336920-03F9-11CF-8FD0-00AA00686F13}”, ) dom_.方法 (“write”, “<HTML><BODY></BODY></HTML>”) hwin_ ＝ dom_.读对象型属性 (“ParentWindow”, ).如果真结束.如果真 (方式_ ＝ 1) hwin_.方法 (“execScript”, js_) 返回 (“”).如果真结束.如果真 (方式_ ＝ 2) dom_.清除 () hwin_.清除 () 返回 (“”).如果真结束dom_.读对象型属性 (“body”, ).方法 (“insertAdjacentHTML”, “BeforeEnd”, “<textarea display:none id=retjs></textarea>”)tmp ＝ “document.all.retjs.innerText=” ＋ js_hwin_.方法 (“execScript”, tmp)obj ＝ dom_.读对象型属性 (“getElementById”, “retjs”)tmp ＝ obj.读文本属性 (“innerText”, )obj.写属性 (“outerHTML”, “”)obj.清除 ()返回 (tmp)
[/e]

不调用模块可以直接运行成功，但是我用多线程时软件直接崩溃
来个高手改成调用精易得脚本组件运行