adminpass_save.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("GgZIgdiGXIncxHncaIzbxHzbncE9yQPrypRsEpgQTQaIzbmdxHxHaInczbxHxHmdyGaIzbaImdncnchcWd5bWrdMtQTrIrXPHrhsD9fQur5V9RkPS9QQKsTr1GoHWd3dgivi3f4gvh9fEhDfLqHsEpxsvOcrwf8eFhAfEIxbyI8hFeFexIsgThmfkixI3hkf3IhcVc5bxHxHxHxHxHmdncmdzbyGncxHIQIuLPGqPQxr6VbRQQmqdRGQaIzbxHxHyGncxHncmdxHncxHgdiGnhvfzf2HAgngEiFf4iEiMiEe")
AspCoding.EnCode("kGzIFi4iFCFfZeAhLCFfkbpGWdFingAhDhngAh0gFfAIFccf6fEgAhwbPg4ilfDe4iAgEgvcQgngEi7CngAhrg4eAhwe4e4hafmh6fvIYcoguhtgriMiqfghgeICtifePg2bnGycpGgIAg3CFCDh3C6e1fEekbFchiFiAClgvIQhYf7gFg4iFilivcRfnglgEemhEiuf5hEiweYC4hvingAgyd3GQgbiqfRihgQh1fWhfiCiefYcmHxdoHCHYHpgZhXd6fYflg6imh7f1f7CkGGgBb1IZd5cPizi3CahhcWd")
AspCoding.EnCode("YHpcaime5cXdwivf3ivIAgZeEiFf3CEi2eFf6dndTcmcafngahnHlhYfAh7CYfFCLC6iAHnGvbBHTIlhngAhEeZelg0gDhAH5c3IFhwfngxihchbYHgHgHqfYfEC8ixCah7e4iaHqfYfYexh7f4i4gEg2Hlhng7f8gmh7f1fEe8coHVc3dgH4ikf4C1GxhnfoHCHXIhgxiZf5cai5i1GpGgIhcVc3dxHyGzbmdxHzbyGmd89zVsqxq6VIqFV3QaIncxHxHaIzbzbaIncxHyGncaIaIncaIaIncgdgIhhygae")
AspCoding.EnCode("4b9e2eqhjflhDfzIoi0gehnglimcOfNhCeyCmc9e0gohje5ixGVg0g0CaCabpC2eZf5eaboiMi3inCAgEgAhyHXgjg4iEiliMivfzgYgkeabZiafmhEi8eLCEhEijgzIpC2eEgH9Af4izIPhYf3hMicijfEizfECyHRfYf4gNhdCjf7fkgMizhAfYfyCxGQgmh4gLCciyiEivCabxixC1fhiziZenijChcCHIiygkg1GfiAfDCviwe5fYCACaiyikfrg5hafEhYfwbldmHgdWdfiAflekhvf4g5hEgxhkeje")
AspCoding.EnCode("rgXgkh8f4ivIAbmHHgYc4cbWUHHp3fkfZfSCxcSCvbGo4iSfYf5fGoxhkfFinglgDfbWAgYfjgmh5fDfGo3iYfvi3CDf4iHplClenh3fDfYfIV4gyi8fxiliUivGGoZIUiniaC7fGojhzCZfbWaeYCFiEgmhAhIVFhlg8fzgni3fDfngbW3hxgZi7fGo3ing4gviXglg4iZd3I5bHRdtfqOPMPKqUpGKoHgIfi6g7hjgaini3fFhwexCxiteXgkhDe4imGAIwIEdZdyhAC8eAfUGxbwc7i7i6CxIsgThmfwg")
AspCoding.EnCode("xInixiYcpcgHCICIhGibpcgHibpchGodibpcXI7VFsEo7RcrEQVrIJJqapUWB979CQ790QusUpoHCHdg7hDCafvf4gZiFhvfjfyCteXgkhFg3Cxc8cycEd2bWrdMtQTrIrXPHrhsGrlpIrvRXVGPhrjQSOdrtPapssXsU99rOQfJKqsQDWduBWyOUpgs8Oj9LQLPEWIu7VXWVRMqMPYo9RaR5W5pJizg2hkf1I5c4cbqlpBpyQQQYQqsGrKsoqqPv9oHCHIfle7hafai4gXgDfxhagkfrg5haf8fZexclHyc")
AspCoding.EnCode("Ed7HpcgHodhGibgHgHgHCICIpcgHpcpcpchGhGCIpcpcodgHhGibodgHibZG7OY9gR6qEWdRWqdRSHAI5cMQ6pdRrqGq1RF9JQQPcLrR7V5cjI3IGrzOGRwqTVFPGqNP7oLq2Hjb2HRRcLKRyWSVB9trBpFWxoMsS9hPvR4b6G5ccPkVGRnsds8qWsGtLQzoVbVcfi8iDCjgyg3h3fEgygyixiRiZiafFgngmGDbycTH2b5ikeFCjh7cIVYgxC6ekg8c4HpcCIibgHibpcpcgHpcgHodgHgHgHCIibodgHgH")
AspCoding.EnCode("CIpc5b7pDpQsaoDV6qSV5OhcVcfiDC7hvizC5fZiliweyiyCRi3fviFgngmGkcmHEd6chGgHododpcpcgHCIibgHibgHibodgHododpcgHhGibgHCIibCIibhGZGVRCREW8QgrTRrqgQ8VU9PrxW6plQEpmpYpds6cXd7WHPgrSQtQgQ1Glb2HgrTRsRgQVbgIIf6g7hafvfXeZiDfaixCkfRi3fwCDemhnHDHmHHg1IZiZfwiaixiaG3GCIpcpcodgHhGibodgHibhGodpcCIibibCIibCIgHCIpcgHgHXI")
AspCoding.EnCode("7WTWcRzrDpaP79oReRD9IREVmcMsBVDWZRPPAqrPEoBWEQqqypeRD9IRFWWIVchcCHWh2eVCxi1GHg4bbe8ilejgygmCYCFhzCkekfte5hviAi4iydlIwIVbCHXgjg4iEiliMi8flgjg1GGh5cIf7h8izezC3hZiEgygxCjergZiafAingwbjHvbhcVc3fviYfFCDf1fvfzgZhxC2HTH3Ifi7hAfafzCXeXgFhygxCxiRiZiwCEh4iydAHychciGoiLCliUf8ing3IBG5cIfDC8izevfmCYCliaijfzgsh3f")
AspCoding.EnCode("kh8fmhydlHxdgdVcRfZe3h1fegzhlgjh7e1GHg3IchAf8ijgxh5fXgliaizhkfuf3faf8f3CxckdvbpGVcRfYf5f2efhjfEikg0gjf7hngkf3IGh2HIfle8iafaimC3flivfxCjesh3faf8fngvIkcmHhcVcxike2ebgzi4imCxf1GGhXdIf7hlewCai4g5hFhygzhzgufXgvi8fYfvI7bvbWIVcRfZeni0gegyilgkg5cEd3Ilh6gzexh8emGPhYf3h1fegyilgjhAgmcYcHp2bnGgdVc9e0gohje5i1GHg")
AspCoding.EnCode("3IECDCkhzC8enH9eNhWiximcZdIV1IvboHgIWIVcai5i5cvfzgAg8eAhxcaf3hZi7e3CwbFinglg7CZelgMiFf7cwIabaf3hZiFiYfxckfxC1fcfwfng3hjCmHmHHg6c4bDfwf3CjeWIhbWIWdpc4cWiXC4bti3ClfAi4i7eliwdcijfEikgGgGeYc4HXdPiveYfyCXduilijf6gohkfwhYf3hACvfxCyCxcqfZe6h8fnglhEgybgekelgkgvboHVcWIhbgHXIWi5i4bqfYflf8fYfECliwdRhDe4i7fUfRf")
AspCoding.EnCode("8eAhvfxiZgGgHf2b1I2HtgyhYfkf1GuiDfyiDCifxiyf3CXeFhvfjfkfvIPg4ilfAi4iFi8ezGqgAi4iFCUfqeFhFCvfahnexdhcgIVbhbCI5bpgnf3ItiYflfFgmhlhEgvccfkeyiwgyg4iAgGgUcZd1I4btgvemhje1GPhDfzhAfpgxivgmh4gliaijfahmGuC4iAeFgmh7elizGbgagxCjCxh3C7emHpGhb4ixi3iXdygYgVbCHWIgIciAixiniDfygagje4boi1fchviZeFCFhxcXgjg3C6eEgMivfxi")
AspCoding.EnCode("YgzhmHVbVcpcffaizfXd6fDf7fWIhbod6fDflg5cGh2H4HFd3G5I2bQgmCEiai8iAC4biiYCkfXiAi4eXi3CFcpfZi8gXgqeni7fzC8i8e4H4dZdUcYcoHgIibRfmhafmhmCDfXdgCZi6fZe4bOf0gFhBg7hZepGgICIibcfZiAgmh2HAIhcVcibgHgH6fDf7fXdFcXdlh8eEi2HZH2H3G8hvfximgagEfybagAfngahYf7fBGxi8fviwCUH5cEfzCjenhjfEfaH4gjgyi6f4ixcycSG3GWIVcpcodcf4elh")
AspCoding.EnCode("3C2HkbpGWdpcCIiblhEgAh3ITH3IFiDf7f3IXb4b1IZiafZeEiEgvI4c1I5IZiwCngAhEg2exhjemezhZH2bCfEgli6gFbyIwcqiEf8hzGRCH9newgybXexiNezg1gyChCThHCceaf4e3hkipiAiACXIwIEbEfygzg3iyi7ivcjf6gngjemhEiTHahAizewCEb5cDgygyCYeag7iaHnijgzh6fmhxcycUHYcoHWdgHgHcfXglh3C2HlHWIVcibgHgHEC8elg4bHgXdFiliEiXdXb5cZdafyini4elizCyikf")
AspCoding.EnCode("vcxglgZe5iTH3dYcYG3fwC3CEili1fFgAhafXb4H5bGC4HgdWdpcgHde5h6fng4b8IVbiGhGCICIlhDfEi3IGh2HAgliEi4bZH2H4H3faf3CEiACwbZGYcZH3fafZeAhDfMiygzgnfzh5I4HXIvbUHafkeni3flizCjfxiaHaC6emhnfTHYH1I5IZiaf4iEili2eDelgvi3cZdYHSG2bgdCHibZeyC3i3IPhmhjgmh4gDfWIVcgH6fEgAh4bHg5c6f8eEi3I5I5c1IGgYc4d1IxbQgXeAhweleFh4HXb4HTI")
AspCoding.EnCode("YcWIhbCIEi4i6f7hkeyCFiZexI8h6eai8eng3IXdECFhFCpGCHfeah3i5ccilCzg4gFhvfagzg5chcVchcCHegFgje3hlivfzhxi1GYCkhlivIAgAC6ewIhcCHpcCIAhYflh8iyikfFiYfwdEf7fvfEgmhXd4HBH1I3c2bRf5fFCwe6gFh3ICCZixiXilC5hXi3CTH9iZiEeZitCni7fai6gEg3G3c4HSdZizeYfFCACxc4c4H3IXb2HlhDfAhXdZHXdZd4cmHSGHh4H5I2byIPhXe6eyg6gFh4H3c1IBb4H")
AspCoding.EnCode("WIVcbiahZf2Hhf8fkfmClizCzhje5coHCHoHiGfh8fxi4gEgvfzhzg2HQgFhjfAfCexiyf4imCDfaijfyCmGDh3faf8fngAgycoHVcpccike6e3IbiZimCwf1GWhLCgfmh8eXdWizg4bDhXgkhFgYfAghcCHgHCIohZh3I6i3fzeAingAg5cHg3Iti3C7gEhng7eFhzGgezh7fjh2HtgzingahWIVcpcgHibCeXC5cqeng3h2ecikelgkgLCxC7h3Cje2HBG4b7c5cPiaCngzg4boHgICIpcpcpcuiYf4gFg")
AspCoding.EnCode("6exhliUfNhci6exCjhxc8gXgwCDengFimHhcgIibgHibbivi6f4ioHWdgHgHgHCIPh3CafYf4gliNhdf3f4Cdexg5hlgyd6iZivilCmhFixdoHVcpchGpcICxiZf5cpgYg1GhcCHodpcfeafEC3ChcVcgHCIibRfmhafmhmCDfLChCZiZfdeyh3flgwb8g5hzeDengAgvboHVcCIibefzg3i5cohnfoHCHgHOf3CG9ACVbiGbikfZf2HgeEhkfniEgygjfah3IoHgIVbCHhfDexi5flizCjfxi2HtCZekhYf")
AspCoding.EnCode("5fDf0gIgZiZfhiziZi6emG8gZivilCYf7evbgdCHibgexCEi3IWhNhLgyhHgkH3IPijf2Hug4hzhFgxiZfmGoi0gpgxiYgwIhcWdCIibpgme4bCejelhDfAhnH9ghiXglhngxc6i3fkhDe3CFimGVgNhhe4i8ewIwIndpCNhVCjenfmGWhMiNizixdwIGgBbkH3Itgzi4ixihcCHCICIhGWhMiIfkh4i6eACwbZijgngFC8e0gaikf5iagvboHhbpcpcgHtiYfECAfjfkfAgmhwdefkfmghchbgHgHICjemg")
AspCoding.EnCode("4bpgXChcVcpcpCmhG9ACoHVcbije3iXdci8fxi4gEgweyikfgdVcpGCHdClCxiniDfygzhkf4bRfmhmC8fFCzCliUf2efh7fagjhvIDh4ezeFgnglhmHhcgIibhfagEi5cWh1fvfTHkH2HQCyiXdthceyi8fkfZfmGPhYfni0gegjfAhkgmHWIhbgHgH6e4i6f8ixCkfFiYfwdFeAhvfDfYf3IVgMigf4ilihciGhGCIWi5iXdifjelhAC7fwbVegCZiAgmhwbVgNhfgYfEgycyHRfng3hNhegyi7faexcVg")
AspCoding.EnCode("0gaiwIwIFcXdlI4btgvemhje1GPhYfkhYf4gli0gbhXg3ihiwf5h6eyd6i4ejgEhZeFinGWIgIodpCmhHO8eoHiGghxi3i5cdCFgzg3hDfygagxi5chcVc5HTIWIiGVbVcBHYbhciG4Cxhwi3I4gxCjezghcCH3iygjh2H3hyixikfFiDfFCoHCHZfygjhXdZfXfWIVcnhXfTHZdzGxIxbggYCliZimiYClh4ivd3H1c1cXG1c3CliDHjc8IZg6e4iEfACEiZeDfFC3C7i7i7H6IDb7HlbDHjbkdUf5CjCni")
AspCoding.EnCode("kfAeThEfUgYhngYhZeFeZgkIybzf3i3g2b2HXIRrHLbq3QcQnQqQCQBOILOsTWLPproHCHjfje4bYfEilgag7f4blgYfAgEhzfYf1GxiYfG9ACoHVc5fxCjeah6fDf7fHg1IIidfsiFcYcwG7engEi6i3C7fzGjhYCAf7h4eACzivI2b2b5Inh3gZH1IYcmHvH1IEbhhng5i3fDeviEgggailgHgHibCPgohrgfeQhBGBe9hvf3h7fagFiagZhEg5cfi5f3hZeECFi1GggAhwe6iZelg3IydadybvCYeXfnG")
AspCoding.EnCode("IWHiYchcWdAgngFh2H4gagxixiFcFiYflg8gZeAhvc5fAh4i4eACmhyi3gvg3CXeEgxc4HfiggVhffbhvchi9foiOfICcfsfifWgWhZdmHoHgIaiZh2HYfFC6e3IFhxg3CxihcVc3CAhEiwd5fvi4i4eEigdVcYfviAgngpGVc5fxCxijeaHxCDC4ixi2H4gzhkfah6fFhFCoHWd3CxiZf1GxhnfWIhblgmh7eleagzglhYfvc4gzhjfwgai4ilhnH4Hdf6fRfjCaiyClh3GycTH4HAHjGlb4HhcgIAg8f4h")
AspCoding.EnCode("3Icfjgzh6fYfdeyikfxiydmHhcCHodXezhkfkfaH4gjgyi6f4ihcVchG7engli5cmCjfjeahEdkfzh8eaCaizgYhVbgImhzgZf3IFi8fXfWIhbYbTIhcCHpGVcGgZIhcgIggaivC3IPhEg4eAhrewejhYfabRfEgH9jgmh0ghiyiAfThpGWdIiwekg4bbe3iaeygzgpCYCjh3CpGCH7eFhZiEilizCkgngGhDfygkg4iEixcycoHgIdgYejhaikfWhZiae3CGhEing6gwC4e4g4inHFinglh6fxhyixinHYc")
AspCoding.EnCode("If4CzfvfkfVg5hvCYf4HwImc2bYH4Hnd3G1IvbWIWdai5i5ceCnhwizCkfoiZiae4iEdYc4H5cEgxgZexioHWdpcXe3fwCwC5chiafaglhYfIhjfahyCnHxdgdVc5HGeVbCHGglh4gAhweleEg3Ikh3fxiZgEh3fZg4iFc5byf3fFf3f6fmCEizC7h8e4cHfDfjfleybafyi4gXgDfxhagkfHg5bWfjfneaikfvcYC6f8iYHGCTGxb6f5f7fyg6gliHfhcVcEcXGpGgI4cpcFCYf7e7hxCkflhZewdEingnh")
AspCoding.EnCode("xhlgmh4gDf3IYcafjfZgxhahxIZi6fleYcWIgI4izgmg5czCYgVbgIXGBbpGiGHh1HzbxH3I5caIzbTIhcVcBHYbpGWdFiDe3g4bveliaejgngyC4CVbWdXGHfpGhbEc8i5cYCjgygYhkfHg4g4ixili4i7fTIcRIPWqDrMQmWS9LPvOBWEcXg3IaC6eng5iTHYcxgFhDf7hGiwczH7iEf6CaHEfUfZgvhwd5fkf1I5cFh3f7f5CZeEgGh1ILCmiviZiyCvhYcSdTpyrtr4PWrdMMrFQIr4RbRoPEczHYCUc")
AspCoding.EnCode("TGzHDCSdhcVcBHZIVbCHmhkfnhXd6flCnChcCHXGBboHgIVbgIVbiGTGZIWIhbQfEiygDh3fEg4i5cIhjfkf6fDf2HhCWiQCPh2ePi9f1fIf2ebhJfPihg3ITH4bUIoHgIqh7fvfEeZiDf4iXdcfyikfEC8e4bdfJfsfhgQgMisfpiMifi2eueWgtiIiXdTH1GDbgdCHqh6ezC6iXgFhmh3IIhagkfAgli2HdfpguhPh0gPi9f2efi0gsgpiPggg5cEd3IjbjIpGhbpGiGqh7fxhFfXgling4bkgMivi9fah")
AspCoding.EnCode("cezCli7evIjbjGycpGgIRgFCzCDhYC8eYf1GjhMivi8csCagDgmh7fvIkI6cychcVc2HWIgIPeAhaiFf5hliZeXdfhAizg4gACweagxi2HiiQgyhvfZhlixcafRi3fwC8fYfyH3IxhtCwfvfYglibhvfDfECnGWIhb3IXd5c5cWiXC4baitCwfai5i8egizCli6f5cHg3IjG5csfaC4ijeoHWdXd5c5c2H3I4b2H4bWfPhaCvfXCAC5cTH1GkhufXgkhFgmhpGiG3I3I4b2H5c3I4b2HhgG9aiFh2Hhf8fkf")
AspCoding.EnCode("5fACaixCahpGVc2H2H2H1GghafFingpgnf4bygRfxgxhnfDfceaiDfFiXdTH5clH6d1GuhwfYfkfWIgI5c2H5c5c5c1G1G3IWi5iXdafte5hwC8fmh1GeCximg4blb3IuhxgYfzghcCH2H3I4b4b3I5c2H1G5c3I3I5c9gQgzizCYgFh3IBG4bYGieSbkHAbkHlI6clIAbWIVc5c2H4b1GXd5c1G3IghzeFiZeWIgIXdXd4bXd1G2H1G4b5c5c5cXd9gQgyhvfYgEg5cFc5c6coHgI3I1G4b5c2H4b5c1GIC")
AspCoding.EnCode("ah3i3IpgXCpGgI5c2H5c3I4b2H4b5cbiSfaiDfXdhf8fkf4gFhzCjfkfWIVc4b2H2HXdfejglhngVC5i5caitCyhaiXCDfgiai8eFiXdEc2H6c3IWg6e5cvftCziwenfAChCaili6f3IBb2HjbjH4bQCwf3CyChcCH1G4b2H3I4b3I4b1GfelglgybqfZiyglhYf3Ilchchb2H2H2H2HefyC3iXdohmehcCHoHCH1G4b2H5cpgYg2HwbjgufXgkh8fYf1Gfikf3iXdzfMiafDdPezhEfYf7fvIkI7c2Hnc5c")
AspCoding.EnCode("aiqeveyg5ilihCvf8elhxdmH4breaC4izgVbhb3I4b3I2H3I5c2H2H9gPhyhyg5iDf1GFc3IvIxcjgrgZiwCFgmh3IbeahYe1Gjh1fkh9fzggiygFhAgxcDcjH4byGXdxcweQgyhwe5i8eIgygACEC4bzd1GjHnGvbyc5czcXdkg0gkhAHRgag7i4iEixcvfQgxgweZhlidfxhli7exdvb5cWglgXdYGogTckH6clIAbkHAb6chcCH5c2HXd2HefafAgmhgdCH2H3I5c4b2H2HXd1G9gPhxgzC5ili5cEd4b")
AspCoding.EnCode("xcydafRiZizeAi3C5cIfximg3IaeMiafoCxicevfACECxcDcjH3Izb2HxhRfyhzCnfAChCaiDf7evbmH3Inb3Ijh2ezejIRgzhEf4ilgwbvfQgziaiZhDfdfvfDf6fxdycgdhb1G5c2H2Hefjenh2HWiYgWICHghzgZf3Ifh8fkfXelivfyiyCoHVcoHWdPeAhvfFf3fEgng5chfAixini8eweagxi5cuCRfvexhXCDfwbzeqCZijgEhmhzI4bygRfxgainfDfIgxhFhAgycoHiG5c3I3I5cpgYg5czCQgyh")