VBS脚本自动变形

先上代码：
str=''wscript.echo''''hello'''':randomize:key=int(rnd*8+2):str=rev:str=replace(str,chr(34),chr(34)+chr(34)):set aso=createobject(""ADODB.Stream""):with aso:.open:.writetext""str=""+chr(34)+str+chr(34)+"":key=""+cstr(key)+"":str=rev:execute str:function rev():for i=1 to len(str)  step key:rev=rev+strreverse(mid(str,i,key)):next:end function"":.savetofile wscript.scriptfullname,2:end with'':key=1:str=rev:execute str:function rev():for i=1 to len(str) step key:rev=rev+strreverse(mid(str,i,key)):next:end functiom

手机打代码真TM累……刚看嫖客发了VBS教程突然想起这个来了 这是黑客X档案上的一个东西 当初我也是看了很久才看懂…… 这个程序每次运行完代码都不一样 是自动变形

看着也累
只是无意注意到
最后一个字母错了

回复4楼：
谢啦……我还检查了一遍……应该是n

这就是所谓的随即加密 病毒常这么搞

回复8楼：
对的嘿嘿

发了个大概的解释居然要审核……下午要考试晚上电脑上注释 手机不给力

回复11楼：
大概过程是先还原 然后运行STR里的内容 然后变形 把变形后的保存成新的文件

大体过程就是刚开始运行脚本时候把代码还原然后运行 运行完再把代码打乱 等下午考完试写下注释吧……手机不给力啊

open:.writetext""str=""+chr(34)+str+chr(34)+"":key=""+cstr(key)+"":str=rev:execute str:function rev():for i=1 to len(str)   step key:rev=rev+strreverse(mid(str,i,key)):
亮点