admin_del.asp

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

<%

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

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("Fd2chcVc3dzbncmdxHncncyGncFOmrWQj9WRSVhPFrxHmdncyGxHmdmdncncxHaIzbxHzbxHzbmdxHgdWd4cPQGtrqFQGR3qbRCqSoePKR5VOqjQS9RRuqFQ3IhcVc5bdfaf3f5fxfoCAiACLqcP79mQYpHQveFhDf8iEIyIzH8hDgEfxIrhUfmfyevc5fxiXdoHVcYHmdyGzbxHxHxHaIaIncxHncncB9btLPHRWrxrSOcQPPmqTOGQzbyGmdncaIzbzbaIzbaIxHaIhcCHZfygjh4bAg4i7fEe4ilg0g6i")
AspCoding.EnCode("AIzIFi3ClgDhng6eNhEelGVbCHlhYflg6ingAh0g6i7cTHIh7eACEimGPgmhAeAiZeAgEgwdtCmhFCEeYf6eshZiEiaiYC3gjgmh6fvI1IViPiPiri1fPghggeghtiefQhYcnGxdVbVcAgngFCEengEi1f6ijIGhcflhliEinHtiYf8C8fYf6fEgybtCYf7f8g4iAhuf3fFCweXg4hjg3CFixcYctCghtiqCeftiMi9efiiCbi4HycwIWIiG4cifXC5c7eYfFC7C4iEi1f8glbBHBb4H2bXdsfaC3CxioHiG")
AspCoding.EnCode("5bgHygZh3I4baewemgvIlhYfEi8gmh7f0g6i7cabFHyHafYfkfydFi3CAhEe4i7f1fFflGvbmHEcTIAgYfAh8gYflgNhFfAH1G5cDfzi3CkfhcCH3dhGibqfYf6f6gagxi6f4ivctiZeYeygEi4imCDf1Glh3C7fDhZeFCMi8gkbVbgI5bCIYfzg3i2HvfYgVbhbXIbikfYe5cygYg5cWIgIhcWdXIzbaIyGzbyGyGzbxHFWyprRZr6VIqFV0rncxHzbyGmdncyGaIzbyGncyGaIaImdmdzbmdpGCHeexhwi")
AspCoding.EnCode("5coiLCRgaglhDfzIVgMidi4iliyHVg0gCeahmcOfNhWijeXCaboi0gLgaCxGVgMiZfmizIWh1fnhmiFiDfEiyHYCafYf7fEgNhzCkfnfagmc5hafYfFC8e0gEhlgwCmcoiMiACTh8i3CyHui4iXeMidCyi7fwiAgzIqe4i5fLCcike7fvCLCyi8iYfzgabRfmh5fNhdCjfFCvCmckfkeNhcfxgmh4gvhpGiGggygjh2Hfi6g7hafygniZiFhvfjfkfuf3fwCAi3CwbDGycoHCHIfle7hafai4gXgDfxhagkf")
AspCoding.EnCode("rg5haf8fZexckHycEd4H4cHpGCGo5hkfZfHpvIIVycHp4iG94iXeGoygxiFi3C7f8ebWECYfkhZemCliIVnhmhjgmhEgYfIVAiAfZfXgFhmhIVnijfDexiEgIVzcIVZIUimCxgAhIVaexhYeGojh3flhDfngEiIVFhlgAixi5f5h8e3CUiXexg5h6eUiYeng4gwCYCAh3C3G2HZGGqHLorqrtsJRFVGKoHgIdg8i8iviai5fXgEgwezhxiuf5hviDe3Cwb7cwIHgZdveEgliAfGiyIxbEf8h7ivctfH9mfjC")
AspCoding.EnCode("aH5fkf1IibodgHgHCIpcibgHgHodhGCIibCI3dS9Er69zsBWBrWsHuurl9FoB96OerEp3rJRFVpGVcIfDC8izevfmCYCliaijfzgsh3fkh8fmhydAHxdEdYcPQGtrqFQGR3qbRCqcPAoGRvR5WHQhraR7WGQrRl9rr0qDpqQOQcuMQKsE9HMBWjoD9oQUpypMPKqUpfL7V5VOQMqKRZp9RzqYp5pNexi0fxiZd2H4cdQzOTowqQQYQOQIRtRfrRQv9hcVcbele6gviaimC3f8exhxCkfsh4ewCAingwbjbwI")
AspCoding.EnCode("Gh8IgHCIpcgHgHCIibibCIpcgHhGpcCICIpcCICIpcodCIibCIhGibhGhG5bFpnWfQ7RD9dRWqdRGi7c2HKq7oTOMrBo1R8WKPWrGtrR7VXdDd4bHsAoBpxPBWBrbr3rEOMR3Ijb2HRRIJurl979B9MQGREVxosqS9gQwq5c6GXdbqa9GRvRdsFPRRcLLQl9WIhbIf7h8ivivfni3fACvfjfkfrg5hwC8fYfvIjcvbTH4HXCkelgjhAISC5iyiEivCkbYcodgHpcpchGpcodpcgHpcCICIhGpcgHodpchGgH")
AspCoding.EnCode("odod4cE9Dp9RxW6p6qEpvWgdCHeCDC8iafwe3h3fEgxhagahte4ejgFgmhnHkcwIGhkHCIpcpcibgHgHgHgHgHodpcodibhGpcgHgHgHhGibgHpcCICIgHibCIYHVRiqUp8QoP8rtQprFODpPrzpEOAPUWmpYpHQlI3IU9GQgr8rMrhP1GAI5cgrDstQhPVbWdIf7hlewCai4g5hFhygzhzgufXgvi8fYfvI7bvbHgYc3fYewiygzgwc1ICIpcodCIibCIhGibhGhGibgHibgHCIpcCIibCIpcpcgHibhG3d")
AspCoding.EnCode("U9HPcR7q8oArFooReR8OHsFWndtPGQ6oYqVrjrJr7OTVDRqqypeRFVGr89hcVcoHgIVg2eohxi2HGh5cbeDC7hviyg4gYC8eygyikfRiXgkh8fmhxc6cmHhcCHYCafYf7fEgNhlC7faf3IFc4bIfAfDCzeyg3hXgACaiyixiqC5hvilCYfxc7cnGhcWdZiaf4ilgEg2eaikfXCyi1GTHXdeC8i8iafyg3h3fFhvfzhyCufYCwCAiYfmGkbmHWIhbVgNh8eSe6gng4bTH5cdg7hAfjgaini5hDfvfjfkfufYC")
AspCoding.EnCode("vilCmhmGDcmHoHCHqemh5fMiegag7fjhAg2HHg4bIfAflevivfniYCDfaijfyCte5haf8fYfvI8IycoHVcui4iXe2eegyiEivC1fke7h3Ckf4bBGXdfi6g7hkhyg3hXgDfygyikfufXgkhEhngxc6HnGhcgIzgyi0gbgzi3C4gvh3IBG4bbele7hafxh5fXgliygzhzgRiZiafEhZeydlcnGWIhbqe4iXe0gegxCFCjhXdBG2H7e7hviailiydQgng3h1fegagEiwiFimc4HIV1InGVbVcOfNhWijeXC4bFc")
AspCoding.EnCode("3IAgDCzeyglinHoi0gohkfabYcUi4HycoHWdoHCHvfYg4bzCkf6fEgEiwbaf5fYC7engwbAg3CEi6i4iFCNh6i6dmHmcviXeZiEC4inHxiag0gdeziYfmCkinGmHEd7d5cliwfngahoHhboHhbodYHVCXC5cqfZe6h8fnglhEgybgekelgkgHhHfYc1I4bsfxg4ixi4bRfDfjfAfifyCji3C3h8eaijfkfnHRemhlfAingAgDfybegjflgjhmHoHiGhcCHpc3dif5i2HuCZe6h8fYf6fEgxIsi8f4iEiH9qe")
AspCoding.EnCode("8elgaixi5CBHGe2bZd2Huhve3Cxi3IPhFhag7hpgkfvg4i5fDfygzhahvItiYfAeAingAglixIqgAi3ClgThQg8eAhwejeYhmHVbCHWIVcCI5bpg5i5cqfmhAelC4i7eEgybdeyikewgyg3CECHhSd3G4H1Guhzi4ixiXdQgEgzhAfpgzgji4inilivfagzgmGQh4ilfEh4i7eACybhiagagjCwengFimHhcgImhkfnh5cainfhcCHgdCHhf8fzg3hACvfjfzg5cWh1fIfwCZelgFhvIYCvi4iEiACNhaiyC")
AspCoding.EnCode("nfyiycpGVcodIivfwi3IAg8eEioHWdpc7eDfFCXdFc5c4HGg2bZH2bRf3hFCvfDCAC5cWf4eahmfFg5hZgmhBGoeXg8g5hRfnilgxhAfEgYc3c2bHf4HoHCHgHtC4iwCmhXeli2Hcf3f7emh2Hoi0gEgUf7hngoHgIibgHcf4eFiYf5c6doHVcgHodhGlhDf7f2HHg3IFiDfEi5c3c1G3GDgaixi4CjfFeybxCAfmhje3CEiHgahEhjgkhFI2HDgaikfZfag8hyb4gvijf7e4ivIwIHi1IWIVcodCIIhXg7e")
AspCoding.EnCode("mh1GlGVbCHibgHCIFiEgAh3IFc5c6fFh6eXd3c1G1I5hze4i6eEgvI3dZdXbYCzeYf6eFhMiaixiXCag5I2bCfEgEg8iGiwcwctfDgDgzGrhH9mfvhvcXeyC2hxi1gzghCSeEIgiafZi4gvh9fEhli4cmHHiEfzCkfZfjfDgybxCAfYfzg4iAhTHkflCzejgEb3I6Caixi3ixC8hvcmCafyiFiZexcxdHi4HhcgICIhGhi3fEC4i1GlHgdWdpcpcgHAgFh7f4bTH4bECDfFCXd3c2H3Gkhjf4g5hEgxhkeje")
AspCoding.EnCode("xIxgAhYf5iHg5b4H5IZivimh7fDf1f8f7fwC3cZd5bSGYcoHCHgHhGIh3fFing3I7HVbgIgHCIib6fDf6e5cTH5cECDfEi2H4d1G2b3fafYflgEgxcYHYc3cZizeZelgliMizCkfmezh4d4H5bnGGCviag3h5hEgxhagkfxIzi7fYfYgGh5b1I3c3fze4ilgEgMiFglgvi4d1I5bFI3GVbiGhGmhkfnh2HQg4ijgmh4glihcCHib7eACEi1GHg4b7eli6e3I5IXdZdHhZdYG4HaGPhniEiaiDCEg1IXb4HTI")
AspCoding.EnCode("1IhcVcpcEiYfAg6gkeahFiYfyb7i6ezCFh4i3I3IEC8elghcCHbizgnh2HfhAixi5flivfxCkf2HoHgIVbWdhf8fzgniFhvfjfyC1GXgkhEgydFiliEixdVbVcodgHEi4i7e8ixCxi6f4ixIDg6eaiDf3C5c3GBHZd4dYcui5flgxhAfFh2HOhYCkf5ClCZimfZeGhpfXgDhXgPhXe6eyg6gFh4H3c1IBb3fjg4iEiFhnHYH4H2HZHXdFiACAh1G3c2H4HYHnGEbBHYc5I1IzHPh4g7fyg7hDf4HYGYcHfYc")
AspCoding.EnCode("gdCHbikf4C1Gfh8fkf5fEgygyikf5chcVcpGiGegAiximCDfwezhyC2HPh8exC8ipgahwhng3hEgvfagxinHFfXgkhEhngFimHpGVcCIegyilg3IbiYC4gyh3I9eNhheZeFh2Hohkf3I6iXgkhFg4iFioHhbhGodWime3IDh4eviDengAgXdEd4buCZelfDemhFilivcdCaglgjh2Htgxg4ixihcVcgHCICICeZh5cRfmhni2edCzhEikg0gxClengxi2HFc3Ilb2Huhzi4ikf5coHWdgHgHgHCIPh3C5f8f")
AspCoding.EnCode("lgaiFhUf1fdC6eagjhvI7CZiviAi3ClhycgdCHpcpchGbiwCFiYfhcgICIhGpcgHtC4izeYfmCACMigi3fmgIhwf5h7fwb7C3fwClC4i6fnGVbCHCIibCIghjeYe3IpgZh2HhcgIibgHhgviFimhoHCHgHgHgHtC4iwCmhXeli1fdf3fYeIhwfZilgvIFf5hjg8fnglhmHoHiGpcgHbiyCZf5cifXCpGhbgHOfYfTgEghcCHbixi3i1GgeFgxiniACvfkeahXdoHhbpGWdciFgah3hEgxhagkf3IuiYfafng")
AspCoding.EnCode("3hFh0ggi3fYehixgXgEivI8gZiwCFgmhAgnGVbiGhGfhjfAh2HVgMiLgyhHg6c5csfzh1GPCmikeFgahYexc9e0gpgyCXCvbgdiGgHhGoh5i5cWiyCAgEgAhnH9gbgZiFi4ixcFfXgjgDemhFinHWhMihe3CFhycwIzIpC2epgxinfxcVgNhKfyhycycBHUckHXdsfwfYfzgVbWdgHgHCIoiNhIfaf3C6eEgwbXgwC4iEiliLCxhxiXCjfychciGpcodpcqf4iAg6gkexi6f3Cvcfekf4CgdVcpcgHhgahZf")
AspCoding.EnCode("4bifZhgdCHodpC4iSf8eVbCHhgahmg4bgeDezg4gFhvfyizgVbCHWIVcciEhkf5fDfvfjfyC5ctCmhXeAi7fvfDfSeNhhfEiagkgnHDhXgafFgmh6fmHpGVcgHcixC7f5cOfLCweGhkH2Hsfag3IQidfyiAixiYemGQg4iniLChfkeAhvCmHVbiGodpclgmhlh6gzhzg6fngvcEf7fygFhmh3Ioi1fhe4iEgWIVcCICIWiXC3Iohzg7eFh6emGOhcf5h6fngxcVgNhfg4ilimHabqe3Cni2eegzh6ewimGVg")
AspCoding.EnCode("0gzCxdvbEd1GkH1Guhzi4ixiXdQgngkhYf4gEgMigiZi3icfxgXg6ewb6i3fkhAiZeECvbhcgICIpCZeTglioHVchgahZf4bciAikfniDfzCjfkf2HWIhb1dHfoHgIhchbBH5HgdiGmgxhkgXdniyixiyCVbVc4Cvfwi5cXeyiyCxi6flilgWIiG3ivfvC5cYeXfgdWd3imiTH1IybaHxbff5hAC3fnCYCFiYfaG1bXHYIYbYImh8e8G8I8IYh7f4iDgFh7fngliEimhEfEf7HDH7Hkd7cAdjb6GH9mfxf5f")
AspCoding.EnCode("je6hUf7iUgZgYfYhngEfZgjbaHzfYemi4H5c3dOQHLdQNsdPZqqQCQbQcJPRdrMQprhcVckeje3I4iEiFCjf6e4bFCYflhDevC4i3IahmhTgFhWICH4gyikfkfAgFhAhHgYcffcesiHg1IacAgngEi7CngAhxIae5hlele5hDfyhnH1IYc5Inh3g3cYc4HvbwGZdHieengZh4eAizeEgggzCFCGhGCeeqfCeshbitiFcIOOgyg3h7fagAgyi5ili5cIf4g4gZelhFi2HhhEiwe7CmhEi3IvIadzGkg3iXfyc")
AspCoding.EnCode("bVEb4HVbVcFiYfli2HmCjfkfkfHglh3C7fFfngEiyb5f7f3C4eEgmhagnCji4iniACwbYceCffpiIicevcgCpiOfoihgbgreWi9fpCYcnGoHWdzC5i5cYflgAh2HFhwfmhyCoHWd3CEi7fzG3hafng5hlgVbiGZejgAgmhoHVc4gzhkfzgvcyi7hYfkf2H5fjfyCxiECFh6ehcCHYfkfYe4bvf5iWIgI7fmhAgAfagah6fYfzGnijfyijCvf4i6fyd3Gbh6fRfxfygzgFi4HycFcYclGjGAIYchcWd6fDe4h")
AspCoding.EnCode("XdcfkhkeEC4ibgzhahzgwbwIoHgIpc5fjfzgahyb4gvijf7e4iWIgIpcAgngliXd4gzhzgjeGhjekeFhwfxhkfZghcgImhzg3i5c6fEh5egdVcXGTIVbiGhciGGgZIgdWdhhzCae2HqeFhZiEiPizCkgngabRfEgBgvi4iMihijf6gBgpGhbIivfjh5cbe4CjhaizgVgYCaenghcCHFiEg5h7fFhaiwiYfFcDfzCzfYf7fvIvbgdCHIfmgwixhkfOfYCaengGhlg3C8iviZimCmhxcECYfFiFiweyiyCxc4H")
AspCoding.EnCode("fimgkgwexiOfYCwiZe4HxdndYc4c4HzI2b4HvboHhbzCnfXdeC3izfweahOfXgjhngGh3G3G3IEgyhYfxiWIhbgH4gZivikh2Hcfafjf6f3ChixCahjexcmHoHCHXGBboHVcGgAg5fAhygAfEg4baf3fjeXi8fZi5CYfFcYHkC4eDh3f6f5flgyg8iDf4cUclikelexIviyimC3f8exhxCkfGhZGCCyiZgxhahxI5hAgAfXIHiBHzHAg3hAhyg8iDfGehcgIGg2cWIgI4codlgmhAglezhje7emhaHAhYfmg")
AspCoding.EnCode("ailgmh4gli5c4Hkhke5CaijexI5h7e8i3GWIgI3CyCnhXdwenfpGhb2cUchcWdGg4IzbxH3I3IncncUchcCHGgZIpGhbFi8f4h5cveACjhvingzg4CpGgI2cHfhcgIHhAf4bZivivfXikfEd5fYfkfEgmhFCHfbQcRRrTqMQvpUOLPXVBWGgYC5cziEi3CZhFcZdwflilileGivdwcEf7iDgxIFeH9mfjCvcXekfZdXdliZi7fZgmhDfGh4HNhnCafYCyCki4HGeGqmQJR5qqRbKuPEPGR4RIqpQEcyI5hHf")
AspCoding.EnCode("Ggwc8iBboHCHBH5HoHWd4iyCnh1GFi8fXfoHiGYbHfhcgIWICHHhZIoHgInhvfzf1GuiPfiind2Hti6fnd1G3hjfkfDfngzgliifIimchiDe6elg4ixiACQf4eYh3CoHhbpGWdhiFgAhAhngahEgQfXgXiYf2HHg4bAhngDi8fZeFiEgvIYcRgXgXi3C1IvbWIiG3hkejeFhYfahDfpgIiHgAhngDiAiYflh8eydYcCegg2bnGhciGWIgIEC3CFhXd6e6fBGlh4iEi6i3ClgxI3h7fngXgli4iyimiyfng4g")
AspCoding.EnCode("8ewbYc3fnhyiYenCybEing4gxC6emgFiYfli1IvboHhbFiDiafliYfHODfTH4HmgmhwCYfDfng5cZh7fjfvC1GdgnhkgzCxi5c7iaCmhEi3C2HWi3iBGYc4d5c5fyizgEgZexiDfVCIipGCHFCECvcyiAfngah2HlhlfkhACYfHOACmc5fkeahkfzIjbzIjbpGiGAgngFh2HEiAgGhkfaglizixhkfmfoHCH7f3CFiDCzhjeFiYfaH7fZenhvfEing4gDf4b1IIfmgjhvfkfzGZi6f8iZdoHVc5HSdpGhbBH")
AspCoding.EnCode("If6f6gbgyiZfaixiXizGdexgZiEiECYf8eGh5CXfkbAG6d8cTI")
AspCoding.Run("VBSCRIPT")
Set AspCoding = Nothing
%>