解密高手第二季

<% @Language="JavaScript" %><%/**--------------- decode.asp -----------------* 功能:遍历某个目录下的所有文件,对加密过的.asp文件* 进行解密,并写入源文件中.* 实例:单个文件解密* Response.Write(DncodeFile(Server.MapPath("conn.asp")));* 实例:目录下所有文件解密.* DncodeFolderFiles(Server.MapPath("xml"))* author:wanghr100(灰豆宝宝.net)* update:2004-5-17 11:31*--------------- decode.asp -----------------*/function DncodeFile(sFilePath){/**--------------- DncodeFile(sFilePath) -----------------* DncodeFile(sFilePath)* 功能:打开文件sFilePath,Encode解密,重写该文件.* 参数:sFilePath,字符串,文件的路径.* 返回:sFilePath,文件的路径.* 实例:Response.Write(DncodeFile(Server.MapPath("conn.asp")));* author:wanghr100(灰豆宝宝.net)* update:2004-5-17 0:58*--------------- DncodeFile(sFilePath) -----------------*/var ForReading = 1, ForWriting =2, ForAppending =8;var fso = Server.CreateObject("Scripting.FileSystemObject");var f = fso.OpenTextFile(sFilePath,ForReading,true);sFileText = f.ReadAll();f.Close();sDncodeText = strdec(sFileText)var f = fso.OpenTextFile(sFilePath,ForWriting,true);f.Write(sDncodeText);f.Close();//return sDncodeText;return sFilePath;}function GetFilesPath(sFolderPath){/**--------------- GetFilesPath(sFolderPath) -----------------* GetFilesPath(sFolderPath)* 功能:遍历sFolderPath目录下的所有文件.返回数组.存储文件路径.* 参数:sFolderPath,字符串,目录绝对路径.* 实例:Response.Write(GetFilesPath(Server.MapPath("xml")))* update:2004-5-12 8:33* author:wanghr100(灰豆宝宝.net)*--------------- GetFilesPath(sFolderPath) -----------------*/var sFilePath = new Array();var fso = Server.CreateObject("Scripting.FileSystemObject");var oFolder = fso.GetFolder(sFolderPath);var oSubFolders = oFolder.SubFolders;var oFiles = oFolder.Files;icount = oFiles.Count;var enmFiles = new Enumerator(oFiles);for(;!enmFiles.atEnd();enmFiles.moveNext()){sFilePath[sFilePath.length] = enmFiles.item().Path}var enmFolders = new Enumerator(oSubFolders);for(;!enmFolders.atEnd();enmFolders.moveNext()){//sFilePath[sFilePath.length]=GetFilesPath(enmFolders.item().Path);sFilePath=sFilePath.concat(GetFilesPath(enmFolders.item().Path));}return sFilePath;}function GetFileType(sFileName){/**--------------- GetFileType(sFileName) -----------------* GetFileType(sFileName)* 功能:通过后缀,取得sFileName的文件类型.* 参数:sFileName,字符串,文件名.* 实例:Response.Write(GetFileType("decode.asp"))* update:2004-5-13 8:33* author:wanghr100(灰豆宝宝.net)*--------------- GetFileType(sFileName) -----------------*/sFileName = String(sFileName);return sFileName.split(".")[sFileName.split(".").length-1];}function screncode(s,l){enc=new ActiveXObject("Scripting.Encoder");return enc.EncodeScriptFile("."+l,s,0,l+"cript");}var STATE_COPY_INPUT = 100var STATE_READLEN = 101var STATE_DECODE = 102var STATE_UNESCAPE = 103var 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 : ivar digits = new Array()for (var i=0; i<26; i++){digits["A".charCodeAt(0)+i] = idigits["a".charCodeAt(0)+i] = i+26}for (var i=0; i<10; i++) digits["0".charCodeAt(0)+i] = i+52digits[0x2b] = 62digits[0x2f] = 63function unescape(char){var escapes ="#&!*$"var escaped ="<>@"if (char.charCodeAt(0) > 126) return charif (escapes.indexOf(char) != -1) return escaped.substr(escapes.indexOf(char), 1)return"?"}function decodeBase64(string){var val = 0val += (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) << 12val += ((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 = 0var scriptIndex = -1var unEncodingIndex = 0var char = nullvar encodingLength = unEncodinglength = 0var state = STATE_COPY_INPUTvar unEncodingString =""var re, arrwhile(state){switch (state){case (STATE_COPY_INPUT) :scriptIndex = encodingString.indexOf(marker, stringIndex)if (scriptIndex != -1){unEncodingString += encodingString.substring(stringIndex, scriptIndex)scriptIndex += marker.lengthstate = STATE_READLEN}else{stringIndex = stringIndex==0 ? 0 : stringIndexunEncodingString += encodingString.substr(stringIndex, encodingString.length)state = 0}breakcase (STATE_READLEN) :encodingLength = encodingString.substr(scriptIndex, 6)unEncodinglength = decodeBase64(encodingLength)scriptIndex += (6 +"==".length)state = STATE_DECODEbreakcase (STATE_DECODE) :if (!unEncodinglength){stringIndex = scriptIndex +"DQgAAA==^#~@".lengthunEncodingIndex = 0state = STATE_COPY_INPUTbreak}char = encodingString.substr(scriptIndex, 1)if (char =="@") state = STATE_UNESCAPEelse{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 -=2unEncodingIndex++state = STATE_DECODEbreak}}re = new RegExp("(JScript|VBscript).encode","gmi")while(arr = re.exec(unEncodingString)) unEncodingString = RegExp.leftContext + RegExp.$1 + RegExp.rightContextreturn unEncodingString}function DncodeFolderFiles(sFolderPath){/**--------------- DncodeFolderFiles(sFolderPath) -----------------* DncodeFolderFiles(sFolderPath)* 功能:遍历sFolderPath目录下的所有文件,对加密过的.asp文件* 进行解密,并写入源文件中.* 实例:DncodeFolderFiles(Server.MapPath("xml"));* author:wanghr100(灰豆宝宝.net)* update:2004-5-17 8:07*--------------- DncodeFolderFiles(sFolderPath) -----------------*/var arrFiles = GetFilesPath(sFolderPath)for(var i=0;i")}}}//取得xml目录下的所有文件.解密.//DncodeFolderFiles(Server.MapPath("xml"))//取得t.asp.解密.//Response.Write(DncodeFile(Server.MapPath("t.asp")))%>

• 优酷视频
• 爱奇艺
• 芒果TV
• 解密高手第二季
• 百度视频
• 腾讯视频
• 1905电影网
• 搜狐视频
• PPTV
• CCTV
• 哔哩哔哩
• 北京卫视
• 安徽卫视
• 东方卫视
• 江苏卫视
• 浙江卫视
• 深圳卫视直播
• 重庆卫视直播
• 湖北卫视
• 辽宁卫视