简单的js加密改成写易语言代码 加密位置只找到

haomengyuan

网址 https://www.681522.com/。   那位会js的帮帮忙 改写一下 实在是不会js

Sunfish

  

子程序名	返回值类型	公开	备 注
WT_JS_Eval	文本型		WT-JS_DEBUG
参数名	类 型	参考	可空	数组	备 注
script	文本型				常量JS脚本
data	文本型				参数1

变量名	类 型	静态	数组	备 注
js	对象
eval	变体型
ret	文本型

' CoInitialize (0)‘线程中使用 加载COM
js.创建 (“ScriptControl”, )
js.写属性 (“Language”, “JScript”)
' 如果调试结果与工具不符，有可能是编码问题，尝试加入： 【 编码_Utf8到Ansi (到字节集 (script)) 】
js.逻辑方法 (“AddCode”, script)
eval ＝ js.通用方法 (“Eval”, “getRSA("+#引号+data+#引号+")”)
ret ＝ eval.取文本 ()
js.清除 ()
' CoUninitialize () ‘线程中使用 卸载COM
返回 (ret)

.版本 2<br /> <br /> .子程序 WT_JS_Eval, 文本型, , WT-JS_DEBUG<br /> .参数 script, 文本型, , 常量JS脚本<br /> .参数 data, 文本型, , 参数1<br /> .局部变量 js, 对象<br /> .局部变量 eval, 变体型<br /> .局部变量 ret, 文本型<br /> <br /> ' CoInitialize (0)‘线程中使用 加载COM<br /> js.创建 (“ScriptControl”, )<br /> js.写属性 (“Language”, “JScript”)<br /> ' 如果调试结果与工具不符，有可能是编码问题，尝试加入： 【 编码_Utf8到Ansi (到字节集 (script)) 】<br /> js.逻辑方法 (“AddCode”, script)<br /> eval ＝ js.通用方法 (“Eval”, “getRSA("+#引号+data+#引号+")”)<br /> ret ＝ eval.取文本 ()<br /> js.清除 ()<br /> ' CoUninitialize () ‘线程中使用 卸载COM<br /> 返回 (ret)

hhhql

定制区   也 -可 -以 -看 -我 -签       m

YY阿狸

rsa

Sunfish

rsa1.txt (91.48 KB, 下载次数: 2)

2020-8-3 19:19 上传

点击文件名下载附件

haomengyuan

Sunfish 发表于 2020-8-3 19:19

能帮忙改写成易得吗