HEEEELP! VBScript
Код:
<SCRIPT language=VBScript.Encode> if Not(window.opener or top.frames.length>0) then fn=document.getElementsByTagName("SCRIPT")(0).innerHTML fn=replace(fn,vbCrLf,"") fn=right(fn,len(fn)-2) fn=split(fn,"x@y@z") document.write ("<script type='text/VBScript.Encode'>") for i=1 to len(fn(0)) document.write (chr(1+asc(mid(fn(0),i,1)))) next document.write ("<"&"/"&"script>") top.document.write(DeCode5(fn(1))) end if </SCRIPT>
может кто подскажет как разшифровать первую часть...