en_managepwd.asp

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

<%@ LANGUAGE=VBSCRIPT CODEPAGE=936%>
<%

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

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("Ec5Hcg5cCCfiVgcCugdgcCghEdshgiRfhiuCWiQfsf4bgCWgffefRgfihehgTHSIDclcZITIgdgIGgYbagleDfvfjfkf5c4iUe7hviai5fvfDfSHhhaiwi3Ibe6f7hdejfmgygjemf2cUcWIgIEc5HYbHfVbiGHhXGqfYfAgAfzhkfAgmhybgiDeYgZhmhEiTHreAhEhngZIUcgdVcGg5HoHCHXIyGxHaIzbxHxHaIxH8VyQOqypqr79fRTQzbaIxHaIzbaIaIyGyGzbncyGzbmdzbyGaIzbWIgIYHRqIJLs")
AspCoding.EnCode("DqIr1sHroPFVgRurv9VPaR8pqqrPDq5coHCHZGbhkh5h3hvhWg8fEgrsIREpYq5WBWxgACFhAfGiwcyI7i7i8hvcRCThYhwgaH3hje3IVbCH5baIaInczbzbzbncncxHzbxHxHIQHJJRbrPQnQ6VIqRRZPdRTWyGaIaIxHncmdmdncmdzbzbzboHhbnhaiwiXdFiYfAh8gYfEiMiFf7cmc6fngEi7C4ilgLC8gjIgdhbECmhEiFf4iFCMiFfjHGhgCAgDf7fvItiZe7g8fngFilixIQg3Clg8gmhlgte3f7f")
AspCoding.EnCode("vf3fmiviZelhxcYcCfsfsfQfNhtibiegfeqfghRe4HwIwIpGCHFi4ilg8g4i7fNhFfkbBGIh7eDf7fvIqfmhlfFgmhlhlizGQgmhAh6iYf6esh5hlgygZinCving6fnH4HQgfeqfrgghqf1fVgIfOgef2bmHychcgIYHohYg2HAgmhlg8gZe6eNh6ikGHhSd2b3G3IuhxgngkfVbgI3dibaiXC5c1Gkgyg3ixc7eng7fDhZeAhMiFfjHxGSbabkhmhahvI6fngFC8gYfAhNhDhjIxdvbBHUcFingEi6imhEi")
AspCoding.EnCode("LCDhkb3I2HFhvengahoHhbXICIpcQhmhlh8iyikflhYfaHqfngmgai7fYf4gFh3I7engAhEenglg1f6iDdgdVc3dibmhahZf4bxh5ihcWd4cefahmg2Hai5i2HhcVcoHgI4cmdncaImdaIaImdzbDOaWLrvQU9GsD93QxHzbmdaIxHxHaIncyGaIxHaIncncaIaImdaIWIhbggwezf2HOf1friyi7eFhmcoi1fgfYfDfaboiMipgjeyHWh2eifzgYgxGOfMiNixgzIoi1fnhXfab9eNhYeXf6fEg7fab3fjg")
AspCoding.EnCode("mhAhli2eygahZhyiyH4ekhmhlgEgMilCEijgyHOf1fEgSeAfngabRfYf4g1fegjfAhzfFimcQgYf3h0ghfagAhkg0gkelemhxixGPh3C3h2eegzhlgkgyHahagLCIhzi3CniyeWIgIIiaiae3IIf7hlekhai5f3f8exhzhahsh5hjg8fngyd7ImHVbhbch6gDCkhvfniZiEgaiyiahRiYCkhEhngnHAbnGHg2bYHbWFIIVZiahnhbWxcUimHbWYfSfYf4gIVaikf6fngAhEgGoAgmhzeng4gDfUi4C3Cvi3C")
AspCoding.EnCode("FhmhbW8f7hnhZili3CUi5fzhFgkfliUiwHUi2cHp4gziFCUikgzCmgIVvC5hECFh4i7fUiACEi8fkf3hYCEgYfHp4gzi4elgHpmg4inijgXgFCng1I4bXIBocuhQ9QLQtrD9btVbVcfiAfAfafvf3hZiliygkekfsh4eafFgngmGjHycFc1IxgliDf7hSHxbaG8hFeEfaHsgUfYhxfxI3hahYchGCIibibpcgHhGibibCICIpcodpcXI8pBQFp7RGPEQRRbKLQapSVIQSVCQUW0QtrD9WICHch6gAfjgxh4g")
AspCoding.EnCode("Xg8ewezhxite5hwCEhZevIkbwIHg4HRqIJLsDqIr1sHroPIRkVIrmrZoTVoQzq8oTWLrapKQ1P7WQqWqeKKqtR7peJdslVUpiqEWaWKRusEWIuS9v9VRrrurXWPr6s5WYW1gkf2hje1I4bYHbqkVGRmrqqmqWqGrJriQPqZpoHCHdg6g8iafvf4g5hEgweagahteXgjg8f4iyd8dycEdDbibibgHibibpcpcodpcgHibCIgHpcpcgHpcpcgHCIpcodpcCIodCICI3dSWZOhqarUpB9qsB9SHjH4busDVIQtQ")
AspCoding.EnCode("HR3r7oMRPQIJLrS93IjIXdIRkVHqvRGPEQTp0Q6psr5cAG4bVrcLLQapEpIQKqIr89zVtP8peqxP2H8I3IcPlpIrmrTVDRVrHuJqapVbiGchleAfafyg5f5hDfygzhahRi4ejgEhmhxc7HnGGh2bYgagEivC7cIVnfjf7fkglG4HCIibgHgHCIgHCIgHibgHpcpcCIgHibCIgHCIibCICIZG6o7WPrao8WzsUWnoWIhbdg6gAfkhygmC5hlizCyijergXgviAiZevI6HvbBGAbpcgHgHhGibibibibibCIgH")
AspCoding.EnCode("CIodCIgHibibibCIodibgHpcpcCIpcpc5bRrgsEWEqiRSQrqhP8V7WWQxWDV7R79vW5WBW6c5cDpTWpQSQtQfR3I7c2HpQTRrqfRpGgIchle6gjgvfniYCACaixCahsh5hafEhmhxclcxdFc4H5hmgzfaixizHYcpcgHCIpcodpcCIodCICIodibodibpcgHpcodpcgHgHibodCIYHDpBVT9lP6VzQSVerorFVIRDOzIrRTW8VnPQQ7QsQFpcrBrPPaWorD9dQSpoHCHVbVcoi0gCekf4bBG2Hdg6gleafai")
AspCoding.EnCode("niXgEgaijfahuf5hzeEhZenHkHwIoHhb3fjgmhAhli2eFgAhkh5cTH1Gch7h6gjgaimCZiEgvfjfkfrg4eafFgmhnHjHwIoHgI3fkhYfEili0gvfahYgjf3IGh3IdglelekhaiXe5hACxhkezgshXgjg8fmhvIDdvbhcWdoi2eEgBg8i4i1GHg2Hchle7hvivf5f4eFhxhzhahshXgafFg3CvIlHvbVbhbQg3C3h1fciyilgwiFi4bFcXdch7h6gafxhXeXgFhvfzhzgrgZikhEhmhxcjcmHVbCHRfYf4g0g")
AspCoding.EnCode("cijf7fkgNhaglengah1GHg3IIf8iDCwCaimC5hFhxhjfahshZivilC4inH8bwIoHVcxijfMihiwfngnijC5cHgXddg6gDCkhzC3hZiDfaixCxiuf3fkhlCngnHDHwIhciGQgYf4gMiciaglgvC3IHg4bAgleafvfDfnHui4iXeNhciyi7fzf6fyH2bUiYcwIpGCHWh2eifzgYg1GTH5cFi6gjgaiDfwbOfNhCeahxG4HHp1ImHVbCHWIhbxh5i1Gygahlhli7fmGkh3hXgAg4iydFing7fFfYflg2eFfAIvb")
AspCoding.EnCode("yHaf4g3fAgYfwbkfyiMibgwfmh4gxfwIvbHglI1G8eyh4ijeVbWdVbiGCI5bpgYg2HQhng8CEh4iEClizGegagEiwiTGTI4H2b1GuhziYfkf1GPhFhzh7hohzgyfngmCEgvfzhahwbPg3C6h8f4iFiEgvccizhEivCvbVbgIoHhbhGXIohnf4bPgngDiEhmhlhlivcPfEhYf7fUfQgEgEivfkfZgHhTI3G1I4brexgngkf5ctCACyiDCohahwhYf3hFhaiyiyCxcqfmh7g8f4iFiDfvcsi8fngEiGOuiEgFC")
AspCoding.EnCode("ygzg5CvbgdhbhcCHpc3dWinf2HQh3C7g8fYfAglizGbgjfagkiaingAgFdTI1I2b3IrewfYfkf2Huilike7hWixiyfYf5fDfxhyixivIReYf6hDeYfAgEgzGcfyiyiwgyg4i6fvboHhbZeahYe2HvfYgoHhboHgIfhEhxiXeEgxhzhxi2H9eNhchjgngEiACxcXgafYf7fEg2evfzgZhjfmHWICHCIffxhzf5cFiEg7fVbgIgHAgFhlg3IBG1G2bEc3GXbZdPhXelgxh6gEg2HOhXgyCYhAiYCXiZeHgigZi")
AspCoding.EnCode("6i4eQg5fAhwe7hli4HZH3GBb2bVbhbibQgYfjg3C4gDf4bIh5hAg3C4bOfMiliBg8i4iVbVcodibIhXg6fmh1GAIVbCHibCICIFiFhAh4bFc5c6fFh7f2HZH3I1I7ivfkfmgzhDgzGag7hZezgng7fFcyClCviwCEb4b8hvfahnhyi7iwdniafzhAgYfxcycUHYchcCHCIpcgCZiAg3C3IjIgdhbodibpc6fliFC5cTH2HlhAClg2HZH3IYc4ejgYflglixcXI1I4dXgjgmhlg8e1fvfkfnfyi3c3Gphlili")
AspCoding.EnCode("AfSHzHzHrh7i7ixIueUfYhyeaH4gzgNekfJixiIgBgGidfkh3f3hyeVhDeDfYHwIUH8hvfzgnhzh7izGag7hmhxiYf6eGhahFgjgviGC5cDgvfkfZfagFeaH4gkhjf6fngnHwIUH2boHVcpcCIcf5hAgYf3IjbWIgIhGhGibFi8eAhXdGh1GAgFhlg3IZH4b1IwCzhniYCliweagzgvczi6engnfGhZG2b3c3fafZeAhFhNhEhAhjgZH1I3dFI4HVbhbibCIgC5h6f4i5c8IhcVcibpcodlhFhlg2HGh1GAg")
AspCoding.EnCode("Fh7f4b5I3IYc5hkhmhEilinH5b4HZH3fjgngEiDf1fygahYgke5I2bZGwIFIafyimCYClizCzhahybwfAhmh5iFc3dYcZH5hjgYfEili1fAiEiaf5IYc3dHi1IgdgICI3Cah4C4buiYfvi3CniDfoHhbodAgDf7f3IFc1GAgDflg5c3c3I1IFd1I5I2byIqe5f7fvfAfliYcYG2bUcYcoHCHgH7fmhFi8iagje6fmhzGEflgyg8eYf5c5cAgEgEioHhbefahYe4bge8fkf4gDfxhjfzg4bVbVcpGgIfhEhxi")
AspCoding.EnCode("5f8exhzhzg3IZiwClivI6fDf7fwIpGCHCIib7fYfAgAfagkflhYfvc7ilgvfFhng2H1IHh1I5I3Gqe3hEiwe7hAC4bVeXgahZgFg3fYhngEdChZi7CZiqe4glgai8i8e1IZH2bGe5hviYf7f8ewb5b2b4bXb3I6fEgFC3IZH4b2b5bwIGCHh4H3cYcyIuiniAhaiDCFh2b5I4HBb3GWIhbefahmg3IciEhah3hliaijfah2HoHCHWIgIci8fkf4gFhygkezg4bqeEgagAfWiyCkC4imCFhxhzhkfwbDhZivi")
AspCoding.EnCode("lC4i6fvbWICHpccijfEi5cefXgniaC5cVgLCfgngAC4bVCah5cFfZiwCAiYf6fVbWdCIgHifYg5cEeXgafFg4iFi3IHgXdPgng6hFgZe6fDfaHhfyiEiae4bPiziYfkfoHCHibpcpcpgme2HPhZe5f0gegke7fwiMiag6g4ikf4bTH4bkG4brewfYfzg2HVbCHCIibibpcqeng3hEhEivf8eThNheglgyivCxc8g3faf8fng7emHWIhbgHgHCIefjg6fmhoHVcpcCIgHibQgYfjgmh4gEg2ece5h3ideyhYC")
AspCoding.EnCode("AhmG8g5hjgFgYflhwIgdhbpcodpcfezgmg5cWime3IoHhbhGibbiaf6fZeVbhbibibibQgYfjg3C4gDfNhbh5hmggCyh3fEixc8gZiviEh4iECvbVbgIgHibfezgnh2HohYgWIVcibWhmhG9lioHhbefkfZf3IegAikf5fEgxhagje3IVbiGWIgIhfAiyCmClizCzhah4bRfmhkh4iniACMidf5hmgcfziZi7fxc6i3fjgAi3CFiwIgdgICIdCzhFC4boi1fNiaCFckH2HuhxC3IrfXfagAijemgnHVgMiWi")
AspCoding.EnCode("zgYgxdWIgIibCICenf2HifkfFili6ewbiihi3f6fYfnHDhZiviFgZe6fwb9e1ffgng8emHycmcVg0gWikfZhnHWh2eMhvemHmHGgHfAb2HtgyhmhxipGgIibibpcOf2echkhnglgliydZijgYf7fDf0gwekfYgzhmHoHgIgHCIgHQhYfFi8iagkflhngaHhgahmgWIiGhGibbijenhXdohmeWIhbCIVgYfBhEggdhbbiyC3i1GegFgxini8eygjfahpGhbhcCHhfDeah3hFhxhzhzg2HQg3C4g8fAhxhFhBg")
AspCoding.EnCode("LCfh7fyiwivI6iZikhAi3ClhvbWICHibgeagAh2HWh0gygFcAb4buhyi5crfbhjf8fkfmgvIuiYf5f0gfhag6ekgvbpGgICIgHEi3CEC8ixCahlhmhaH8hAhaili3C5cOfNhfgYflihcCHpcpcifYg5cVCxiAgAClgvICCIhYClh4inHoiLCdiYfDfvbndQgYf5f0gcikelgzfvIoiMiygwIxdHg3IAb3IrewfYfkf2Hui4izemhnili1fdf3fZfIhziZilgmGFf5hze8fngAgnGoHVcpcVgngG9DfVbCHgh")
AspCoding.EnCode("jenh1Ghf8fzg5fFhvfagah4bhciGZIBbVbVcoHiGHhYbWIgI3izCwi3I5fjfkfzgpGCHmgxhzf2H4gjfzgkflhDfEihcgIZfxhkg2Hmg4hWIgIYe5eGhYczGybvdhh4eEg5h3gXg6fmhyIYdZb1c1d1cZeEg6IjcjcnelgYf8h8eAh4iDf7fZe8h8hDb7bDb8IjH6I8d8IUfYhvh3hzg8CThEfI9XingXi4i8hXi8dybjhmgXf2b1GXIWqcubqXRbRxrQqpqdqIL9rGQKqgQoHCHagzg5cYf7flgzhlg1Glg")
AspCoding.EnCode("mh7eFgkgYf5cyC3CG9ACVbhb3hjfahahFiliFCFc4HhhIgPfFcYcvHFi4i7f8g4iFCvckgYC6g6gYCFhaCwbYc4H3c4CmiZH4H2bxdnI4HUHgg4imeXg8fjgliIiyglgEdFIggQhpgteefqfTHTfCiaiXeAhyiFijfnfDf2Hchnining7e6f4bee7fyg8gZe7f5cxcmIxIwiZf4hmHIWSG2bpGCH6fngDf4b5fagahahFc7engAhDh4i7fzG3hAhngXgli3Cyi3gyfYf5fEgmG4Hdghh9fffIgaHbg9fWhOf")
AspCoding.EnCode("bihitgifVhVg4HwIVbgIygme1GmhEi6e4bACyhZezgVbgIng7fAhxImCkh4iYCEipGgIngviFiZeWICH3hkeahxiaHjflemhah4b3hzhzgkfAgAClgoHhbmhahmgXdxhnfhcVclg4iFi7hyiyClhmhxI5fzhkewgxhYflhvI1IgilhPhvhaixi6f2bmHTH4HjIlI7c4HoHgIlhFg5e3IIhzeagAgYfhixCyCxiydvbVbhbgH3hzhxixiwdniafzhAgYfhcVcgHFi4iDf3InixCxizgEdzgagACyhzCahXioH")
AspCoding.EnCode("Vc3CxiZf2HlhlC3goHCHZIUcpGgIoHgIEc2cWIgIgCagzglhEg1GOfYfEf6fCiZiUeqh4iEiQf3fmfYfNhIi4iYg4e8fkh8eTHjIlI1G2H5c5c3I3I5c2H5bsQfqRPoqhPcQuQ7V6paqQQYRWqeKhciGbgzhahFiDf1G9h5hTgRg4iFCriXgmfYf1fggZenfXgEhafDfHgjHkI2H4b2H5c5c3I2H4bXIDpGJCqFVfRdPtP6WOrJPWqHsWqdtWIhbbgagkflhEgXd9hZiHOriZelgRgZiXiZe0gRfmh4eAhni")
AspCoding.EnCode("wfTHkGAb4b4b4b4b3I2H3IXdXIDpHKCqEWWRJsVqTQLrS9fRHrLr6WOrssWqbqVRcuVbiGbgzhkflhEg3ICi5hBhbhaiXicfkh3f6f6fVgFgwiQfYflgOhygjengGhkGlI3I2H5cXdXd5cXd4b5beqcQuquqOrrrqsGrDpHKiRUp69BrfQvrRrcuWIVcgCyizgECEg3IiC5hHOPhwi3fviwChiaf3flhECVg8fzfRg4i6e9gvfzg4iFcAIlIXd3I3I4b3I1G2H2HYHgQHrJrrPPqrrRrdQDpbupQEWJrn9gR")
AspCoding.EnCode("YPOQeKpGCHbgagje6fli5cOgXgG9Qfmh7fqh4eYhZe1fffagEfahDfHglbAb5c1G3I4b4b5c2H1G5bPqeRLR3rusJrtRCQgQcQrRDoRQLRWqdQOQfJoHgIcfzhkfFili3IRfyhagEfQgjhXgjgzedekhZi7elhQCThlengNhggngnf5hFgwCFhFcZdCiZezgFgYc5c1G3I2H4b1G4b5cYHOQMPsq6WUWpqJqsRfQGRfsbRRQMqWqbquRcMWqIQhcVcbgyixilhliXdPhyhagEfPhaeXgkhafIhjgXgFilhuh")
AspCoding.EnCode("Th8i4i1fPhYf3f7f4gxgFc4Hsflgmhng3G3I4b1G3I3I2H5cXd3d9rfsLqfqVqrQVqUqLrS96OerLQrqgRBperHrRQrrRrdQuRdLqsB9WIWdbgagyClhAC4buiwfyi6Cuizf3fkhwCbgaf3fAgFireBgAfngMifilgEgzC4gjgmhHg3GsfjfAf4H5c5c1G4b5c5c2H2HYHqQpqsroroR1PWQ5qtP8pSVoRMPtQirIroRbROrKQWqdQtqHtWqbPoHCHbgjfah6fEg4bPhzikeDgPhjhZiafzeIhkhXgAgFiQC")
AspCoding.EnCode("H96gYf1f9fEgveYflgGh4HVfngkfFg4H4b2H5c5c3I2H4b3IYHiRyqWRHJtPDoeqmrFopqtsrqePGRpqbRQRKQWqIRJsIKRrTOhciGbgagxiFi8e3IRfyhke8hhijfkf8emhahFhbhThRg3fZg3CHg4HLhmhlh1IXd4b2H5c5c3I5c5c5bU9fMCqEWoR2QOq4PVRiqUpEqFVJRLr6WPqMqRrGroHhbcfjfkfAgEg5cVf3fTgqhng6eRg5hneng0gcfyiyCAC4iyCFhGhkbkHAbAb6c6cXd5c2H4b3I2H5c5c")
AspCoding.EnCode("YHprHruQ7VOrssRrIR7ODRLRBOJqusEWfLOQHLgdVccfjfahECEg2HRfxgyiFePg8fzgPiaikgngEd1IMgmhAg3G2H2H2H2H5c5c1G4b4cRroQUp8QRQMqRrGrrRDogQwqLPFptRtR9P6pT9YrWIgIhijfah6fFh1Gghje3fXfjgYfch7fEgxh3hviZebgyhmhnixfBG2bLhngAgYcXd5c3I2H2H2H3I1GYHVRiqUp8QiRSQsRgQ7WbugrD9OREQBWWRTpmVpq5RWIiGdezhxi7eFhXdghjeXg4hjgngWfxh")
AspCoding.EnCode("zgjCQh4i5CFc3GMgngFiYc1G3I2H4b1G4b5c2HYH9PiqEWEqIqyWFViQsRJsCRzQgqSWcqsRPsaqoQ7rhcgIhiyiahFiAC4bqhagAfchjezgzh8fah4gngFc2bLhmhFiYc2H4b2H2H2H3I3I5cYHOQCREWFRFokV6WTPHRyVBpmr7OFOHrXsVbhbIhjfahlhli5cWCaiDflhWgnfViyiDfFckckHlI5cXd5c3IXd3I3IXd5bQsOqpriQ9rfssrhQEpYqcsSROQcuWIVcdeagkfAgli5cOgXgzCjgWg4hvgZe")
AspCoding.EnCode("5fDfTH4H9iwi4exhviYc2H2H2H2H4b5c5c3IZGtQWqIPfuFV5VOPPQurArcRcJhcCHVbCHIhkeah7eDf2Hhgkf5hXfjgmhth8izeag5hnhri7fkenhEh4gEgrizCniHg4HJfYfAg3G2H3I4b2H2H3I2H3IYHWqoQD9SrbRapEWpRDpGJCqFVqRIPoPAWQrqPSWlOVbiGbgzhzgAgDf4bgg3CkhQiDCvikeXgmgriEikemg8f3h8eqhai5fTH3GWhzh2b4b4b3I2H3IXd3I2H5bsqyWKRssFWlpQrGr7VHL9r")
AspCoding.EnCode("4qMrosUWpq6VbuCqSoqRdqpQAWORQR69xWQqpqT9ILoQzqVQaQqQxV1I0iYf6f1IVbgIdeagah7eEg3IRfZi7C3CQiDCqhAhzhZfEh3hlirizCniQf5hEgwfFcYcrf8ivijfXg3isCEiag4CFg4gACqhzC3hYc2H5cXd5c2H2H4bXdXIFpyQFVfrWPQRFpyVU9eLiRFVVscRiRAWSViPCQcQhQbQhcVcdezhxiFiDf2HrfAfqhEiyimgDe5fFhPevf4gtgSeAf4iFc1I6gximfbWmfxhmebWxeAfmfIVXfjh")