JScript.Encode 腳本在線解密 代碼
來源:易賢網(wǎng) 閱讀:2044 次 日期:2016-11-14 10:16:46
溫馨提示:易賢網(wǎng)小編為您整理了“JScript.Encode 腳本在線解密 代碼”,方便廣大網(wǎng)友查閱!

<HTML><HEAD><TITLE>JScript.Encode 在線解密</TITLE> 
<META http-equiv="Content-Type" content="text/html; charset=gb2312"> 
<SCRIPT language=javascript> 
<!-- 
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, 0, 1, 1, 2, 0, 0, 2, 1, 0, 2, 0, 0, 2, 
1, 1, 0, 2, 0, 2, 0, 1, 0, 1, 1, 2, 0, 1, 0, 2, 
1, 0, 2, 0, 1, 1, 2, 0, 0, 1, 1, 2, 0, 1, 0, 2 

var rawData = new Array( 
0x64,0x37,0x69, 0x50,0x7E,0x2C, 0x22,0x5A,0x65, 0x4A,0x45,0x72, 
0x61,0x3A,0x5B, 0x5E,0x79,0x66, 0x5D,0x59,0x75, 0x5B,0x27,0x4C, 
0x42,0x76,0x45, 0x60,0x63,0x76, 0x23,0x62,0x2A, 0x65,0x4D,0x43, 
0x5F,0x51,0x33, 0x7E,0x53,0x42, 0x4F,0x52,0x20, 0x52,0x20,0x63, 
0x7A,0x26,0x4A, 0x21,0x54,0x5A, 0x46,0x71,0x38, 0x20,0x2B,0x79, 
0x26,0x66,0x32, 0x63,0x2A,0x57, 0x2A,0x58,0x6C, 0x76,0x7F,0x2B, 
0x47,0x7B,0x46, 0x25,0x30,0x52, 0x2C,0x31,0x4F, 0x29,0x6C,0x3D, 
0x69,0x49,0x70, 0x3F,0x3F,0x3F, 0x27,0x78,0x7B, 0x3F,0x3F,0x3F, 
0x67,0x5F,0x51, 0x3F,0x3F,0x3F, 0x62,0x29,0x7A, 0x41,0x24,0x7E, 
0x5A,0x2F,0x3B, 0x66,0x39,0x47, 0x32,0x33,0x41, 0x73,0x6F,0x77, 
0x4D,0x21,0x56, 0x43,0x75,0x5F, 0x71,0x28,0x26, 0x39,0x42,0x78, 
0x7C,0x46,0x6E, 0x53,0x4A,0x64, 0x48,0x5C,0x74, 0x31,0x48,0x67, 
0x72,0x36,0x7D, 0x6E,0x4B,0x68, 0x70,0x7D,0x35, 0x49,0x5D,0x22, 
0x3F,0x6A,0x55, 0x4B,0x50,0x3A, 0x6A,0x69,0x60, 0x2E,0x23,0x6A, 
0x7F,0x09,0x71, 0x28,0x70,0x6F, 0x35,0x65,0x49, 0x7D,0x74,0x5C, 
0x24,0x2C,0x5D, 0x2D,0x77,0x27, 0x54,0x44,0x59, 0x37,0x3F,0x25, 
0x7B,0x6D,0x7C, 0x3D,0x7C,0x23, 0x6C,0x43,0x6D, 0x34,0x38,0x28, 
0x6D,0x5E,0x31, 0x4E,0x5B,0x39, 0x2B,0x6E,0x7F, 0x30,0x57,0x36, 
0x6F,0x4C,0x54, 0x74,0x34,0x34, 0x6B,0x72,0x62, 0x4C,0x25,0x4E, 
0x33,0x56,0x30, 0x56,0x73,0x5E, 0x3A,0x68,0x73, 0x78,0x55,0x09, 
0x57,0x47,0x4B, 0x77,0x32,0x61, 0x3B,0x35,0x24, 0x44,0x2E,0x4D, 
0x2F,0x64,0x6B, 0x59,0x4F,0x44, 0x45,0x3B,0x21, 0x5C,0x2D,0x37, 
0x68,0x41,0x53, 0x36,0x61,0x58, 0x58,0x7A,0x48, 0x79,0x22,0x2E, 
0x09,0x60,0x50, 0x75,0x6B,0x2D, 0x38,0x4E,0x29, 0x55,0x3D,0x3F 

var transformed = new Array() 
for (var i=0; i<3; i++) transformed[i] = new Array() 
for (var i=31; i<=126; i++) for (var j=0; j<3; j++) transformed[j][rawData[(i-31) * 3 + j]] = (i==31) ? 9 : i 

var digits = new Array() 
for (var i=0; i<26; i++) 

digits["A".charCodeAt(0)+i] = i 
digits["a".charCodeAt(0)+i] = i+26 

for (var i=0; i<10; i++) digits["0".charCodeAt(0)+i] = i+52 
digits[0x2b] = 62 
digits[0x2f] = 63 

function unescape(char) 

var escapes = "#&!*$" 
var escaped = "\r\n<>@" 

if (char.charCodeAt(0) > 126) return char 
if (escapes.indexOf(char) != -1) return escaped.substr(escapes.indexOf(char), 1) 
return "?" 

function decodeBase64(string) 

var val = 0 
val += (digits[string.substr(0,1).charCodeAt(0)] << 2) 
val += (digits[string.substr(1,1).charCodeAt(0)] >> 4) 
val += (digits[string.substr(1,1).charCodeAt(0)] & 0xf) << 12 
val += ((digits[string.substr(2,1).charCodeAt(0)] >> 2) << 8) 
val += ((digits[string.substr(2,1).charCodeAt(0)] & 0x3) << 22) 
val += (digits[string.substr(3,1).charCodeAt(0)] << 16) 
return val 

function strdec(encodingString) 

var marker = "#@~^" 
var stringIndex = 0 
var scriptIndex = -1 
var unEncodingIndex = 0 
var char = null 
var encodingLength = unEncodinglength = 0 
var state = STATE_COPY_INPUT 
var unEncodingString = "" 
var re, arr 

while(state) 

switch (state) 

case (STATE_COPY_INPUT) : 
scriptIndex = encodingString.indexOf(marker, stringIndex) 
if (scriptIndex != -1) 

unEncodingString += encodingString.substring(stringIndex, scriptIndex) 
scriptIndex += marker.length 
state = STATE_READLEN 

else 

stringIndex = stringIndex==0 ? 0 : stringIndex 
unEncodingString += encodingString.substr(stringIndex, encodingString.length) 
state = 0 

break 

case (STATE_READLEN) : 
encodingLength = encodingString.substr(scriptIndex, 6) 
unEncodinglength = decodeBase64(encodingLength) 
scriptIndex += (6 + "==".length) 
state = STATE_DECODE 
break 

case (STATE_DECODE) : 
if (!unEncodinglength) 

stringIndex = scriptIndex + "DQgAAA==^#~@".length 
unEncodingIndex = 0 
state = STATE_COPY_INPUT 
break 

char = encodingString.substr(scriptIndex, 1) 
if (char == "@") state = STATE_UNESCAPE 
else 

if (char.charCodeAt(0) < 0xFF) 

unEncodingString += String.fromCharCode(transformed[pick_encoding[unEncodingIndex%64]][char.charCodeAt(0)]) 
unEncodingIndex++ 

else 

unEncodingString += char 

scriptIndex++ 
unEncodinglength-- 
break 

case STATE_UNESCAPE: 
unEncodingString += unescape(encodingString.substr(++scriptIndex, 1)) 
scriptIndex++; unEncodinglength -=2 
unEncodingIndex++ 
state = STATE_DECODE 
break 

re = new RegExp("(JScript|VBscript).encode", "gmi") 
while(arr = re.exec(unEncodingString)) unEncodingString = RegExp.leftContext + RegExp.$1 + RegExp.rightContext 
return unEncodingString 

//--> 
</SCRIPT> 
<body style="font-family: tahoma,verdana;font-size: 15px;color:#c0c0c0; background-color: #151515; text-align:center;width:666px;margin:50px"> 
<div style="color:#c0c0c0; background-color: #151515; text-align:left;width:700px;margin:auto"> 
<h1 style="color:#ffa500; text-align:center">JScript.Encode 腳本在線解密</h1> 
<b style="color:#f6f">用途</b>:
 
  1. 解密英文信函(如果您想加密/解密中文信函等等,請查閱 <a href="uniendecode.htm" style="color: #f90;" target=_blank>文本 Unicode 碼加密與解密</a> );
 
  2. 秘密數(shù)字信息;
 
  3. BBS 等上面發(fā)布英文、數(shù)字留言;
 
  4. 網(wǎng)頁解密。

 
  此類 JScript.Encode 碼解密,只解密英文、符號,對中文文字不解密。
 
  使用本頁面可以解密 javascript 函數(shù),將 script 標記中的內(nèi)容復(fù)制后進行解密(可多次解密),然后將標記修改為 <em><script language="javascript"></em> 即可。

 
<b>使用方法</b>:
 
   <font color=#ff66ff>解密</font>:源代碼粘貼在下面的框內(nèi),<font color=#ff66ff>請在解密前先備份您的網(wǎng)頁</font>
 
   <font color=#ff66ff>解密方法</font>:將引號內(nèi)的亂碼貼入按解密即可

 
  如果下面無法解密,常見的是以下兩種情況:
 
  1. 是 unescape 碼加密解密,請訪問  <a href="uniendecode.htm" style="color: #f90;" target=_blank>文本 Unicode 碼加密與解密</a> );
 
  2. 多次加密,那么您就多按幾次解密直到可以閱讀為止,Unicode 解密也有這種情況。
 
<center> 
<form> 
<textarea name="codeinput" style="border-right: #696969 1px solid; border-top: #696969 1px solid; color:#c0c0c0; font-size: 14px; background: #202020; border-left: #696969 1px solid; width: 590px; border-bottom: #696969 1px solid; height: 200px"></textarea> 

 
<!-- <inputtype="button" onclick="this.form.codeinput.value=screncode(this.form.codeinput.value,'JS')" value="解密"> --> 
<input type="button" onclick="this.form.codeinput.value=strdec(this.form.codeinput.value)" value="解密 Decode"/> 
<input name="reset" id="reset" type="reset" value="重置 Reset"/> 

 </form> 
</center> 
<P >  <b style="color:#f6f">說明</b>:解密時應(yīng)只解密腳本部分,加密腳本標記為 <em><script language="JScript.Encode"></em> ,解密后腳本標記應(yīng)改為:<em><script language="javascript"></em></P> 
<P><u><b style="color:#f6f">特別注意</b></u>:<b style="color:#f6f">本頁面以及您解密后的 jscript 一般只可以在 IE 中運行</b>。此頁為 JScript.Encode 解密及加密(暫只能用 M$ 的編碼器 Script Encoder 加密),但是個別動態(tài)網(wǎng)頁腳本加密后不能使用。</P> 
<p align="center"><a href="http://blog.21softs.com/" style="color: #f90;" title="blog.21softs.com">返回總統(tǒng)博客</a></p> 

</div> 
</body></html> 

更多信息請查看網(wǎng)絡(luò)編程
易賢網(wǎng)手機網(wǎng)站地址:JScript.Encode 腳本在線解密 代碼
關(guān)于我們 | 聯(lián)系我們 | 人才招聘 | 網(wǎng)站聲明 | 網(wǎng)站幫助 | 非正式的簡要咨詢 | 簡要咨詢須知 | 加入群交流 | 手機站點 | 投訴建議
工業(yè)和信息化部備案號:滇ICP備2023014141號-1 云南省教育廳備案號:云教ICP備0901021 滇公網(wǎng)安備53010202001879號 人力資源服務(wù)許可證:(云)人服證字(2023)第0102001523號
聯(lián)系電話:0871-65317125(9:00—18:00) 獲取招聘考試信息及咨詢關(guān)注公眾號:hfpxwx
咨詢QQ:526150442(9:00—18:00)版權(quán)所有:易賢網(wǎng)