执行结果空啊

milest

@MY寂寞的夜
.版本 2
.子程序 JS取值, 文本型, , 代码由发条JS调试工具生成,默认返回值变体型，如果请自行获取需要的类型
.参数 密码, 文本型
.参数 账号, 文本型
.参数 验证码, 文本型
.局部变量 script, 对象
.局部变量 result, 变体型
.局部变量 str, 文本型
' 如果需要多线程请在这里初始化com库
CoInitialize (0)
script.创建 (“scriptcontrol”, )
script.写属性 (“Language”, “JScript”)
script.数值方法 (“AddCode”, #TX新算法)
' result ＝ script.通用方法 (“Eval”, “getEncryption('” ＋ 密码 ＋ “','” ＋ 账号 ＋ “','” ＋ 验证码 ＋ “')”)  ' 此处的表达式如果比较复杂建议使用常量,或者改用Run方法
result ＝ script.通用方法 (“Eval”, “getEncryption('1','2','1','')”)  ' 此处的表达式如果比较复杂建议使用常量,或者改用Run方法
' 如果需要多多线程请在这里卸载com
str ＝ result.取文本 ()
str ＝ 子文本替换 (str, “/”, “-”, , , 真)
str ＝ 子文本替换 (str, “+”, “*”, , , 真)
str ＝ 子文本替换 (str, “=”, “_”, , , 真)
线程_初始化COM库结束 ()
返回 (str)  ' 返回变体类型 如果是文本可以取文本，如果是数值可以取数值

MY寂寞的夜

.版本 2
.子程序 JS取值, 文本型, , 代码由发条JS调试工具生成
.局部变量 script, 对象
.局部变量 result, 文本型
script.创建 (“scriptcontrol”, )
script.写属性 (“Language”, “JScript”)
script.数值方法 (“AddCode”, #常量1)
result ＝ script.通用方法 (“Eval”, “getEncryption('” ＋ “123456789a” ＋ “','” ＋ “1807513986” ＋ “','” ＋ “!cvb” ＋ “')”).取文本 ()  ' 此处的表达式如果比较复杂建议使用常量
返回 (result)  ' 返回变体类型 如果是文本可以取文本，如果是数值可以取数值

milest

用发条调试正常

MY寂寞的夜

源码 放 上来

milest

123.rar (10.23 KB, 下载次数: 1)

2015-6-22 22:40 上传

点击文件名下载附件 @MY寂寞的夜