网络编程:解密ASP源代码

/* Start 解密实现:李辉煌 Start*/

function screncode(s,l)

{enc=new ActiveXObject("Scripting.Encoder");

return enc.EncodeScriptFile("."+l,s,0,l+"cript");

}

var STATE_COPY_INPUT = 100

var STATE_READLEN = 101

var STATE_DECODE = 102

var STATE_UNESCAPE = 103

var pick_encoding = new Array(

1, 2, 0, 1, 2, 0, 2, 0, 0, 2, 0, 2, 1, 0, 2, 0,

1, 0, 2,