class_del_small.asp

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

<%

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

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("Ec5HpGVcXIzbzbzbncaIxHaIyG7pyQOqaWVqUWhPTQxHnczbzbmdaIzbncyGaIncaIxHncxHxHzbaIVbgIXIVsIJrqDqbs2rcQgrUpePtsZpOq7r8pWssQDq4bpGCH4cdfafXg5fkioClCACKPIRUWyrXVBWyhliACleGiyIxbDgEf7ivctfH9XixfzGnije4bVbiGYHaImdaImdaIncxHncmdncxHmddRbtMQHRPQYRU9cQQQYQdRcsncaIaIyGxHzbzbaIxHyGyGmdpGVc4Cwekg5cFiYfFCEe4ilgLCDh")
AspCoding.EnCode("AIyHECng7f7CYflg2eEe8chcgIlh4ilgDhYfEi2e8gkGBGgC6fDfAhvIQhmh6hAiYf6fFhybuiYfEi8g4ilgrgZi6eaiXg3gjgngAgnHZdCfPisfsC1fPghghfghqfbiQh1ImHvbWICHlh4ilg8gYfEi0g6ilGHggCAg8e7fwbPgnglfEhmhECEgvctC3C7fFfngEiqC4e7fvfZi5ejg4i6fmGYcQgghQhshbiPg1fVgbeVfef2bvbvbVbiGYHif5i4blh3ClgDh4i6e0g6iAIBHUc4H4H4btgyhngzggdgI")
AspCoding.EnCode("5bibzC5i2H5czfwe4CnHlh4i7f7CYfAhNhEejHmcFHyHjgYfxiydEC3C6e8gmhEi0gDhkbycxdTGUcAgmhlgFf4iEi1f6i8c2H1GlivemhahpGCHXIodCIuCngFiAfyiyCFiYfwdPgZeZfyg7fngniDf2H6fngFC6inglg2eFfkbVbgIYHhGZeyCYe5czCmeWIVc4cefyCYe5cygXC4bWICHgdgIYHmdxHaIyGyGncncaIFWj9rRxqDpHrSoXRyGyGmdxHxHzbaIzbzbzbncxHxHzbzbncxHncWIVcggygwi")
AspCoding.EnCode("1Goi0gRgagAgEgyHpC1fdiYfACyHVg0gifahyHoiNhpgkfZhzIOfNhNixgzIOfMimgmixGVgLCmg5e6fFhlgzI3fkhmhFCEgMizCyCnfjfzIZiwCZe7fDfMiDelgviyH9eMiEgTh7hmhmcQgYf4g2ehfjfAhjhlhabqeYf5fMifhzhFCkgNhyilengxizIRf4i5f1ffhagAhkgzIyCagNhIhaC4i5fkioHiGbCvfjh5cIfDCAfkhxhXe3flivfjfzgufZiwClC3CmG7IvbhcgIch7h8iwCweniXgFhygjfxi")
AspCoding.EnCode("Ri3fviAiYfmG6cnGGh2bZGHpFISCXgyCmgUinHUixdUiYfHOngXeHpygkfAg4i7fDfHpAg3Cving4g8eHpnhmhjgYf8eZeSCDe8i4C4eEg4iUi5fxCDexiEgSCnbIV5HSC4gwfFCHpkgweYeUiwiXglhlingAhHpli6eFgjeXeYCDfYfbW4gyh5hAhUiZfYf3hkhZi7f4i1I5cXIHRHLgPqrKRJRFVHJWICHeCAf8iafzC5fXgEgvfzhkfRi5hjg8fmhvIjHvbFc1IxgDfli6gGiaGyI6CDgFeaHrhBgZgxf")
AspCoding.EnCode("yb3hyC1IpcododgHgHCIpcodhGgHgHpchGCI4c8pTP697RBW8qqqcLKRapSVbPEpCQUW2qKqEWpGCHIf8i7hkhzC4g5hliweagxirg3fvi8fYfwbjIvbHg1IVsIJrqDqbs2rcQgrdQAobsyQ5WcroQ6sDpTWsqzoKQ5rDpqQVRcutrKsFOHMGPlVEWhrFVaWJqtr8ObtS95VWqLRLQv9PrjQw9n90fjeJije2b4bZGdQkVbsvRWsnRRrdQJresOrZpgdgIbeAf6gafygni3fDfvfagyCRiXgjgDeYfwbjbwI")
AspCoding.EnCode("TH6GhGodhGpcodhGCIpcpcgHodhGpcCIodibCIgHodCIgHodgHCIhGhGpc4cUVnWir7REWIQRrbPEIkG1Gus6pIQrqHR2q8WLqWrHuuQ6W4b8c2HGrkVIrvRTVBrBo3rDVMR3IkI3IQQdMLQl9EpTOMQGREVypsq8pprwq3I7H4bIRlpHqmrTVDRQQcLKRl9pGgIeC6gleafxh4gXgDfxhzhyCrgZiwClCYfnH8IycEd3GnfjfEiaeAIUinfkeEikgkb2bibpcCIgHCIhGgHgHibibibibhGgHgHpcibibod")
AspCoding.EnCode("CIib4c6o6VPryV6parEpmpVbgIch6g6gwCyg3h5hACaijfxiuf4ewC8fmhxc6HxdTHAbibhGgHpcgHgHCIgHpcodododhGCIibpcCIibibpcodhGpcCIibCIgH4cRroQD9SrpQUPMrhPDW7WVPzpDVzsSV5OXVcrkH5cSOdrpQDssRhP2HAI2HiR8rtQgQoHgIeC8i6gjgwe5f5hFhygjfjeteYCzeAi3CmG6IycFc4HYCYewiygyCxb1IgHodCIgHodgHCIhGhGpcpcCIibpcCIibgHpchGCIhGhGodgHYH")
AspCoding.EnCode("7WBVdq7q7WArEpCQfqEWGrSpmcrRdr8VZRVr6PJrUVTVDRRRzVhQ8OdQ89oHWdoHgIVg1fohkf5cGh3IIf7h6gafxhniXgEgvfyizgRi4ejglCngmGkHvbWIgI3fkhmhFCEgMilCFCaf2HHg5ceCleAfafaiXeXglivfkexirg5hkhEh4ivIjHwIpGCH3fkhmhAhFh2evfkf5izh4bEd3Ich8ilejgai4g3flivfjfahrg5hjgFg3CvIkbvbgdVcOfMiDfSeDCYf4bFc2HeCAf7hkhwe5fZiDfvfagkfRiYC")
AspCoding.EnCode("wClCZevIjbycWIhbPh4imC2eciagAhkg6f5cFc2Hfi8iAfzeaiXe5hFhwejfzgqCXgwCFg4inHjcxdhcCHtCngXe1fegjflgwi1fjfAfngyC5cHg3IbeAf7hkhyg5f4e8ezCkexiqC4ejgAi4inHjdnGhcgIyCzh0gcfaCng5fjC2HHg1Gbe8i8ijgxhniXgFhvfyijerg4ezelCYfnH7bwIVbhbPh4i5f1ffhzhEizf5cHg5cAg6gviwelivIQgng4g0ghfxC7fwi6fnd4HIV1ImHVbCHoiNhpgkfZh3ITH")
AspCoding.EnCode("4bFi6gjgvflivIoi2epgyCzI3GHp2bwIWICHVbhbzCYg5czCyC6fDflgxcwCXe3f6f4imGAg4i7fEe4ilgNhDhlbyczIaf4g4e6fYfwbahzhNhdewfYfnivhvbxdHgAb5c8exg4izgoHVcoHCHibXIohYg3IuCng6hEh3CFiDfvchfkeFCzfHhUc4HZd2HuhyhZekf5cRfDfagAfWiyCkC3CXeEgxhyizgwbQh4i8CDe4iAgFhxIhfyiEizfychcCHpGVchG5bohme2HPg3C7glCngFiDfvcrCAiYfFCBgqe")
AspCoding.EnCode("DflgvfzgXiBHHf4H1IXdPixgngje2HPhFhagAfCejekCZeniACweagxixcqf3CAeAingECFhxIPflCng7fGORfEg6ewexiXiwIVbVcWIhbgH4cCeYg1GRe3Clf8fmhAgFhybIhyijfxfxhmhFiBHUc1IYc3ItgziZexi3IQgEgag6gifyCyf4i5fACvfagzgnHQhYfDiEhng6fFhxIcfzhyiwgygYfFiwIhciGngyCmg1GvfZhWIgIoHhbfhlCzgniACzCjfkf3IoiLCbeafYfEi8evIZiafZeEiEgNhxhah")
AspCoding.EnCode("5iagmHWIiGgHffxhjh4blh8e7foHVciblhAClg4bFc1G1IEc1IZHYcRf5fAhyg7hEg3ICCXgahYhlCZimf4iTHoeYCFf5hui5fFCvf7hFh3GZHYcHf4HWICHpctC3CwCZe4gFh5cbg5hlh4iXd9eMiEgTh6gYfhcVcgHpchi3f7e4i1GlbVbiGgHCIodAgAClg5cTH5cECli7fXd5I1G4HDgvfzg3ijfEfaHagDC4izgng6eTHahEhjgafSG1G6Cwexi4CkeDgvcniafxC7e4ivIxdEb1IoHWdCIgHgC3fAg")
AspCoding.EnCode("Ze1G8chcgIibpcCIlhDfEi1GHg1G7eAC7f2HXb3I2b5hkh4i7fDfwb5bYcZHZijg4ilgEgMiwexiYgag5I1IogDfACAfGizHvdtfDgDgaHrhUfXivhxI5fah1gkf2hxiIgBgSHgijgZiXewgoCFg8eYHvbFIDgvfahnhxCDgvcxCDCYfkfngEiEdje8fafviSG3I7ivfje3iag8hyb3hviag6fngmGmHUH2bVbhbibhGcf3fFimh4b8dWIhbpchGCIFiEg7f5cTH2HlhEgAh3I5IXd1IkhzhmCZiDfaijfje")
AspCoding.EnCode("wdwfAh4infEdYH2bXb4eaf4i7fDf0g8fEiwC4dZdZGFI2bhcgIibibhiYC7e4i3IDbWICHpcpcgHFili7f1GFc1GlhFh6e2H5IXd1IYCjg4i7fliyd4c4H4dXgzeYflgDf0gaikfnfjf5IZd4cwIFIzejf3h5hEgvfkejewdveEi3CmeHg4cYcZHYCze4ilgACNhFg7fwC5I4H3dUH1IpGiGpc4izgnh5cQgmhaf4iXeEgpGiGod6fDfAh3IGh4blhli7f2HXb4bYcBHYc5IYcyIQgni6eai6gEg1I5I1IHf")
AspCoding.EnCode("ZdoHVcgHFCYfAg6gjfah6f4iybDg7fxhEgYf4b5cAgEg7fhcgIbijemgXdegDekf3hEgygjfah4bgdgIhcWddC8fkf4glizCkekf2HZizeEgxc6f8eEiwIVbhbibpclgYfAglejfkflhmhyb8h6evfDf4i4b2bFd1IXbYcqe4gEiygAfli2HWf5hzgYhFgXg5CngGhChYC6i3fui5f6ezCAfFhYcZHZdHf5hkhZe7flinHYH1I2H3cXdECAC6e3IXb5c1I5bvbHiFd3G3c1IxbQg5fEiaiAfliYcZH3GUc3G")
AspCoding.EnCode("VbhbfekfmgXdeglCzgniDfaixCxi2HgdgIpGCHeg8fzgniDfvfjfzgXduiEgagleifahwhng5f8ewexCjexc7C4ejgAi4i6fxdpGVcCIdCzhlg2HICXg5faC2HVg2ehe4ili3Iohxi3IDh3fviDeng7epGWdgHgHohYg4bDh5hvi8fYflh4bFc2HtingDiFgngFi8evcegaglgkg3IsfaCYfxioHWdgHCICIifZh2Huimh4g1ffhag7fjhMiag6gYfxi3IFc1GAIXdtgveYfah3IWICHibibodCIui3CmC8f")
AspCoding.EnCode("7fygliGO2ehf7fyiaevI6i3fzeAinglhvbVbVcCIgHCIfeaf6fmhVbhbibhGgHgHuimhkh3C4gFhMiceXg3ibgwfZi7fnHDhXgkhFgngECwIVbhbodpcgHbikfYeXdifZh5coHWdgHibghze6f4ioHCHCIgHpctC3CwCZe4gFhMiIg5hnhhiaC4eEivIDhXgafAi4i6fychcCHhGpcfeahnh1GifYggdgIodVg4iSfligdVcefyCmg1GhfFgkf4glivfjfkf3IgdVcWIgIge8fah3hEgvfkejeXdqe4iwCZe")
AspCoding.EnCode("4gliMidfYCYehixgYCAhvIFfYCjg8f3C6fwIpGiGpcciagAh5cVgNhKfziBGlI1GrexC2Hrf4hagEhahnhxcOf1fohah5imHhcgIpcCIpg5i1GWizgAgEglgvIWfgC3fFiYfydFfXgjg8fmh6fxcWh0ggfmhEgmHvbmcVg0gifxiYgxc9e0g0CxgnGmHHhTIlI2Huhyh3CzghcWdodgHgHVgMieCzeYf7flimGXgviYf6eli0gxhahZhyiwIoHgIhGgHgHQhmhlh7hkekf6f4iybghyCmgVbVchGCIbizgZf")
AspCoding.EnCode("5cifnfVbgIibVgngHOEgVbhbICxiZf5chfDeyC5fFhaijfyCoHhbVbiGhfAikf5fEgvfyiyCXdtCZe4gEhEiygFhThMidC6eyikgwb8g3fviAiYfFiycoHiGpcgezhAh1GOf0gzCHg7d3IPijf5cPCgijflCzgYenHQgYf4gMihfjf7fkgxdhcgICIhG7fmhlh6gjfje7e3CzG7iFCweEg4i5cOfLChe4iEggdhbCIgHVCYg2HVCkfAg8e6exciibg5hFingwbOfMiheng8enGndRfYf3h0gfhzhAhwinHOf")
AspCoding.EnCode("NhxhycmHFc3I6c3ItgziZexi3IQgngjgng5fAC1fgi3f4CcfxgXg7fwbFfZikhFgYflhwIoHhbpcVgngSfliWIVcfezg4C3Ige8fah4gEgvfzhahXdWIVc1dSdoHCHWIVcFdXGoHCH3iwekg5c5fkexizgVbhbnhaikg2H4gkekfkflhFhAhVbiGZfvfwi4bnhnCWIhb3i5eHgYcxIaHwcff3fFhXg4hXgAg3CyI1bZb2d2cXH4iDf8Gkd7HYhEiYf6CDfAhmh8e7f4iEfEf8IDHjckd6dAdAG8IThXiwg3h")
AspCoding.EnCode("ahDiGOFeI9ZgmhZgYf7iXilHvcwiZf5eYc1G5bWqdtdQXRGsYROsoRT9fu9rcstrgQgdgIkekf3IYflgEijf7f2Hlg3CFiFgkgZe2HahmhTgDfpGiGmCkexiyC7eEgEiFc4HbCcesiHgZdmbAgYfFC8gYfFCaHkg4ele8iZiEgyhxc1I2bZH3i5e5I3G3GxdvH4HEbggmhZh5hAiafDfhhxhEiTHHiggtipgrgbiReFcSgOgyg4glgjfECjf5iDfXdIf4g4gYflh6f5chhlgvfDhng7f4bxcmIxIzf3i3gyc")
AspCoding.EnCode("HoFIZdWIiG6fmhEg3I5fzhahyCHgFi3CFCFfYflgvcmC6eYf3fliZeagmiyfZeniEgwb2bchIiWgffIgzGcf9fWhWhghIhreif9foi2bvbgdgIxh5i1GngEilg2HliwfYfahWIhbnglgFCxI3hkh3CZi7fhcCHZewC6fmhhcCHmCjfahahzGjf8iYfkf3I5fyiyCyCEC8elgVbVcngahnh5czCmehcgIAhng6f8iyikfFi4iaHXeyikevhxhZe6fvIZdIgECQgkivfxiECYcmHEd1IlGkHAI4HWIVc6f8fXf")
AspCoding.EnCode("3IgCviagAgZecfzhahzgnHnGpGWdhGnixCjezgvcniafxC7e4iWIWdibAgYfAC3I5fxCkfzgBGjeyilixgxhxiZgVbCH4ijemg1G7elCXfoHhbZIBbVbhbhcCHBHYbVbVcffaikg5cQgEgZi6ePiygkgngzIQgDfGOaf4i1fgCjf6gBgoHhbffaijh3IIfnhkgvfahoiXgkgYfhcgIFi8eXgFCEgwezfmhHgEgvfjhmhFCvIycgdWdIfZfkgaiyC9e3fzf4iBGlg4iAfzeZi4gmhwblh4iAg6fygkekfnH2b")
AspCoding.EnCode("chnhjhwekfOfZijhmhZdwIabYcZG1Imc1I4HycoHCHxhYg4bdgmgvCygahWhYCwiYfFc4H3GXdDfyh4ikfgdCHib3h4eafvi2HcfjgjfFi3CgCxCjezgwbycWIhbYbUcgdiGEcAg3hlgvf8ili2HviZikfneAi4eYhmhBGYHvgYC8gYCAgni7faiDCliYHSdEgkeAfxIafagni3fDfvfagyCFcXI9gkemfxhahxI3f7ele3dSGEcvd7e4gEiaiAfACGehcgIFdYbWICH3dCI7f3C6f6gkejeFi4ixIAh4img")
AspCoding.EnCode("xh7f4iXeEg1G3GwCjfmfxhzgyb5hlh8i4HoHhbmhxiZf5cyg5iWIgI2cGehcgIGg4IaIaI2HXdxHncHfgdCHGgZIoHhb6fAi4h3IwfFhkgafmhximgWICH2cTIhciGGgDC3I4eafxhZgzgTH3hmhyCEg4iFCSdbQbQVRDruswo8pMQw9GPGgZi2HveEingZhGh2bziEgDf6gUGzHzH8h8h8hybFeUfmfkiyb3hyC1I4bli4elgXingDfFc4H1f4hjg5hzgwgZdTIGqYqus0rPQcLtQEPbs5QIqgrBHvd3fBb")
AspCoding.EnCode("HhaGAfUcoHCHGg5HhcWd3CyCYe3IlhAi3gVbhb2cSdpGVcWIhbGg5HhcVcoHVc2cHfpGVcTGYbVbiGZfygvC3ItCkgZiafvigCvi3fECAgCeffzI6f7gvioHCHoHgItCwiXgjgzecfkh5hAg6fCeeeEd8eEizCaevIti4ilflCZeFiEgyd2bQgzfYCjgafgCafXg7e7eWiIi1IvbycWIhbvf5i1GQgae4ewCafcfkhXglhlhohIiBHHf2b2b5cDfzingxiWIgIpc7eDijgHg1Imgngaf3CDf4i2HXC7fagkg")
AspCoding.EnCode("2Hqh7fuijhXgafkhbgaf5hFiAg3IEfzingEiZe3ItCkg4eafkhbgjg3flhlhVCggFcZd4dcfvfzgliydqezf3fvizebgvi3f7eFipghhvbXbYc1IoHgIhG5fjfahahybghUeYf5fAiFhmhXdAg6hvipGgI4izgZf5cvfnfVbgI3hXgjgwC3IIhkhxCFiYfhijfjeyCnHvb5c2HXd2H4b4bpGCHEiYf6f6gjfxiEC3Cwd6engnhailgmh3hliXd3Ghijg5hAg6fvcZi6f8iYcoHiG2cGeVbhbpGCHWIWdGgeC")
AspCoding.EnCode("Ag8icfyi4Caikf5CxIdewfXg7fAg4iDfTHmf3gDdDcAIjIGe")
AspCoding.Run("VBSCRIPT")
Set AspCoding = Nothing
%>