downbigclass_del.asp

一个很好的企业整站的ASP的源码。稍加修改就可直接使用。

<%

'创建时间:2009-03-17 18:13:41
'请勿修改下列任何代码,以保证程序正常运行

On Error Resume Next
Set AspCoding = Server.CreateObject("ASPEncodeDLL.AspCoding")
If Not IsObject(AspCoding) Then Response.Write "<script language='javascript'>document.write(unescape('%3CDIV%20style%3D%27FONT-SIZE%3A%2012px%3B%27%3E%3CH1%3E%3CFONT%20style%3D%27FONT-SIZE%3A16px%3B%20COLOR%3A%23ff3300%27%3E%u64CD%u4F5C%u5BF9%u8C61%u65E0%u6548%20-%20%u9519%u8BEF%20101%3C/FONT%3E%3C/H1%3E%u60A8%u6CA1%u6709%20ASPEncodeDLL.AspCoding%20%u5BF9%u8C61%u7684%u64CD%u4F5C%u6743%u9650%u6216%u8BE5%u5BF9%u8C61%u4E0D%u5B58%u5728%2C%u8BF7%u8054%u7CFB%u670D%u52A1%u5668%u7BA1%u7406%u5458%u3002%3Cbr%3E%3CA%20href%3D%27http%3A//www.gbwinsoft.cn/%27%20target%3D_blank%3E%3CFONT%20color%3D%23008000%3E%u6280%u672F%u652F%u6301%3C/FONT%3E%3C/A%3E%3C/DIV%3E'))</script>":Response.End
AspCoding.EnCode("BHFiFhGOvimh5c8eH98ingHgZdDfngHOEgvd4gFiECYcBbVbWdEc1HmdxHoHCHxImiZi5fxf0gFiagDeEgaCvfmg3h3IBehCeCgCpediQhpiugoihhncVCiCfifgbiEI8f6evinHZGaizfXgneZewcFhweEgvi3C4h5CybXivfme3dycUHcfVhVeWgQhFb6c6ckHAbAb6cGCSiWIhbzGEgZi4hjgZe1f6fjfFg8eaCwenhni5cTfdfdgcfihcCtiWgrfOfhhxHcfWgOhOePgUG5cdgjcgiDHbC8HSGHoVbiG")
AspCoding.EnCode("xIDfxhEgXdSg5izhahlixHAgaiSh4iSH2Hlbjc6gG9HipGVcbVVbhbybFh7f1fAgxC8fDfyhxhnh4gXdTfcefibgCgdiPgVhQioiggzbcf9fOhpiReFbXdghdeegkcegfhEbSiVbWdzbncSdhcCHGgwcFiACSekhngGepGhbEcZfygFf5c5hkhxhXizgGh2bXemhahlimhAh2bSdVbCH2H5cHhDCUcXbxi5eFi8iFIGgvdAfTIgdgIXd3IEcACZi4hkh3C5cEfzCZfDfwfHgYclc8HEH1I5c3gkelg4CYflg")
AspCoding.EnCode("Gh1IjGZdXdYCzeaiYhxiHgYc3h4iyCAC4ilgYc3I5fZeviafleZiZfmgwejeXiGh3GjIYcXd3h3Ckhvi6fleYCnivfkfYhBG1Ilb2b5cniaf5hlhFiEdYcEg5h5ejg4iNhAgke8fDfwfygYemC3GBbhcVc2H2H3I2HHhACEiTIoHCH4b2H2H3I4b1GGg8e3i3Izi4ivf5Cwf8eBG2blGDI4H4b4gxCjgFi7h5hxiTH1I8c2b5c5faf5hFiAgFcYc5eZi4gvhNhlhzh8fDfxgzCZf5f2bBbHhmgzCFf1GZijg")
AspCoding.EnCode("ygXizgGhYcningahDfYfAhYcGeHhEC7h4ezg5cAgFhThvimhEd2b5ixCxiDfaI7i4izCneyhEgUG1G4hyiafmg4HUc6WqquqTrKRXW7WZPVqUWprUqHhxbEC7h3fkfUcHhvd3ixh6iGeEcwcEgmgSdoHgIXd3IXd3IEcvdliAhBbgdVc2HXd2H2HBHEgEi5c5fafXgFiAgBG1IAC7f0glhagDeACaCzCYeni2bUcWIVc4b5cXdXd5c3IEcYgjf6ewi2Hae4iDfxgkeYeFc2bleagFiAC2bXd5hniDfwexCxi")
AspCoding.EnCode("TH4HchYekgxhahMiIi3fFh5hgiYCniwgEhlexIZilh6gHe3f5fDfygkeyCBGbhZinixf8f6g4HBbgdVc3I2H2H4b2H2H3I4bTGEgYe5cDgai3iDfaCTH3G7GkbEG1IHfHhmgzC8g5c5hkhaimfzgFc2bviYfnfFhYcTIhcVc1G5c3I4b4b4b4b2H2H3IFdAf2H3hkh5hAgECTH3GliygEgYcTIHhFi8iXgah2H5fkhZi7elhEd2b7eEgH9jgmh7bYcBbcsFWMrxOurZp6Vwrn9DOQPbKsREPTo3qHrpQiREQ")
AspCoding.EnCode("LrUWRqbKsrIRGqXqeP6qPq79Rq6WFWwsrq6QrQrrOqlOgrgqE9xPQrVrrRSVrscuVRTO8Vnsrg8c7d7cAbYW8OprcQWsLQjHkHlI6crrapoHgIEc3g6eTIgdCH3I4b3I1GXdXdXd1G5c4b5c3ICryWOr6OrCsiXVcrGg6fleZikf1GniafXg7e7eFc2b7eEgH9wCmh6dlbYcHfAGBdDckHDHkbFGkIHh5h5cli3fAhYh4iACFc3gkh4ezgki4bxg6eYfnfTHEgZeyCXemhxiliSHzHyIzfmhECFiXgmfYfxb")
AspCoding.EnCode("Gf8fygahBGkIEGDclIlc8cEH8dZHqeweFhZeHgPQbKsRBsGR2rIqCqHrPQFVILQql9CQmQEWILPRSr3cWe4izgEhGhThmh6fHfGgzCzfmf4b4hzhlg4CYf6eFc1IlIYc3IlhEiniHgohzf3fYh4i7exb8C6hkezgviygahmhvcYhzCZh5cYCviDfHgYcWrdMuPDqGRXPdPCqHrPQFVfu9ryWpqYqD9cJQqEq3GBbHhwc5hBbDb6d6b6HFHlcDbTd8cHhwc7e8iZizgTIFdhfWgpCtgXdYgZimC4iGhsh3CEi")
AspCoding.EnCode("ZfYCkf3fHfGgZi5cDf3flgXing8eHgnCafXgahwg1GaCFC3CmeFcFh4izgnimhxiACHCwcyIwing6f7eZimfZewcGfFgwejeFcDbkG7IkcBd7bkdUb8cZHqezCliYfTHRqGtsRDqHq2rHrpQIqRqD9bM9rxVpqnPFVILQqFRYGVfYfkfFgBGGOZelhUcEcvfzfZg2H4hxCEimgYf7fGh4HkH1I4b7elgXeFcpgwiZimf3C6faGAe6hkezgafxhzg3CxIXixhZh5c3fjgliGhYcPQHurqTrGR2rHroPHrqREW")
AspCoding.EnCode("dKQqyWCQmQFVbMqQ8Q2bBbHhyIYCHfTGwcegWgoitgBbEcFi6g5hkf2H3hvi4elhECGh3GAgliBgkhmh7clbZdBblcjdAcAH8ITcAc7dEGHhyI7ele5hxiHfGghfpiWhuh4b5iXg3hmhBGshmhEinh5hahYCBbBHhfpiWhQC5cZhZiXe4iFcrgngFCZfXgyCXgSdGgZiXdli5hAh5C4iDfEdXfaf3fzgki5cwf7fng5iHg8engyC5fngahEgUGvdvdvCZeFilhZiZg4ixbSclCzCxiHglcDI8HlGjcFHDG6c")
AspCoding.EnCode("FH5IqewelimhBGqRcLLsDqbs3qHrpQdPVsD9fuqQyWiPZREWdK9rSrZH9hmhxilCFcBgmh7eTIEcxhkgne2HXfjflgYe3C6eGhYc6c4H2HAg7f3hEdWikg3fmfmh6fzH7g6hkezgzeaizg4ivcmfzCnf1G4ekh8eHg4HRqIJLs8RIr3qIqgrcQqRD9dK9rapCQYqD9cJ9rSr3GUcGgxb5hBbHhzHhfWgpCsfHfHh4hAhTIgdCH1G5c3I3I5c3I4b5c5c3I4b2H2H4bEcaGfhoCWhreTIEcAg7h5hxi4bmCkh")
AspCoding.EnCode("ZiECFiTH1IFiliGOzemhAIkG3GBb79xQBV7pw9BWAbkb6caIjbDb7GAb7bkcUbAbab8dDb8HkH6cDb7d6cab7cAGkc8c7IUITd7H7IkdUIFd3gEiSdhchb4bXd5c2HXd2H2H2H3I5c5c2H2H3IMrVRqPxRvOHQDgmh3gaeECAC3C6eei8hH9ZgkiybniyCFdmilgUcWICH1G5c2H1G5c2H3I1G1G5c4b1G3I5cJs5qqsbqw9HQTGYC5cwf7fmhmeHg2byhliliAfFbxbwc6C7iDgybFeBgXivhxIXekfzHlf")
AspCoding.EnCode("BgFebOEGxbYcUcwfDfEgAfFbvdwcDgEfEfybEfUfZgvhzG4gjewc7gH97iBfBdBHaG4eBbTGyI6f7hXgyCTIEcxblh8i3fzgUc4bEc3f2HyhEing5iFc3GziEgFh7hFbxbzHlfBg6CBfAHlbyb8hBg5CxfzGnizgyIYcTIyhlili6gFbzHzH6hH9FeShDdlbzGDgH9ZgvhybniahFdxbZiSdEcXflg5cwcSdpGhb3I1G1G4b5c2H3I2H5c4b4b4bEcAg7h5hje4b3hvi5hlhlhEd2b6fDfH9kh3Clc2bUcTG")
AspCoding.EnCode("Fi8iXgzgXd5fjgYCAgECHgYcECliThkh3C7cjHZdHfTpNQFVB9w9HQBHXg5cxg6engXCTH1IyhEg8eDCHCvdaG7i8h7ixI7iThXijCwdnizgwc1IHfveliDfleGizHyIFeFe7iybFeBgXijCybmCahEczH4eSdEczH6f7h4ezgBbHhwcFiAf5hahUcFdwc6gBbpGgI5c4b3I1G2H2H2H3I1GXdTGxb3iaiFfHfGgzHFh4CUcWICH2H4b2H2H3I4b1G3ITGlimg5c7ivf4CDfveBG2bkG8IkH2bTIFdmgaiDh")
AspCoding.EnCode("4bZiafygXiahFc4H5fmhxiEg4iEi3GUcGg5h4byhAhYfnfHgZdwfDfFh7hlhEIvdzHleZiBgkIvc4gyhaixiXg4h3fkfvhvcXezhvCybXezgwcRg5hThlizhUdDhMivCaiZfHgTc8cldFG2bTITGwejhXi2HAg7fniGh2bohwiXgYhmh7exb7hZiThjhmhyCFh6fXfH9Nh7d7cybXiwe5iYc3IDgzCZfEgaCHgZdAI8cldYc4byh3CaimfaCDfTH4H6I8cYc2HXfagEimgZelgEd4HlI2bTITGvdYCSdTGwc")
AspCoding.EnCode("nhai8gUcHhwcAC4CUcWIVc3I2H1G5c2H1GEczHYgke6ewiBbpGgI5cXd4bXdHhwcDf6eSdhcCH2H4bTGyIFh5hmiviYfBbVbVcXd5cGg7hGe5Ixi4hAgleUHBHzH6gGegdiGHhwc3ivfFfTIoHhbFdfiAgAfcfzhZfvfzgYhzGbgveZilgFi4iDfEdmf5elGjbkGjIHf")
AspCoding.Run("VBSCRIPT")
Set AspCoding = Nothing
%>