manage.asp

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

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

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

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("Gg2cbf1GiidgWhehthchfgefHgqCdfRfIhQhohRgQC2HcfpigghgridgehbiEdSIjb6I5HBboHiGHh5Hzh6gEgzCagah4b4iG9AfkhvfmCzCDfEIIivfvC2HchAgledezhYevfzgmf2cSdgdVcFdZIYbUcoHhbHh2cuC3CFiAfzhzg6f4ivcdfAi5infZeEiEdtglglCYfZISdWIWdGg2coHVc3dncxHncxHmdxHaIxH8VmrVPyp9QSVprFraIaIyGxHaIzbaIyGmdmdmdyGncncyGaIncncoHWdZGWrIJMr")
AspCoding.EnCode("8RGRXPHrpQSoirLQ5VVPkPS9VrtR8R5coHhbYHbhze3fXejCpi8fDfLqdQUWYq5WcrveDfFh7hGizHwcDg8hDgxIqiGOXiwgaH5fkf3IpGWdZGzbxHncxHxHaIxHzbxHncaIaIIQGKJRTpqRZq6VbRPPwrdRdryGaImdxHyGyGzbaIaIxHzbaIgdgI3izCwi1G6fngEi6iZe7f1f6ikGzIFiYf6e6ingAhNhDhkbWICHAg3C7fFfmhAhNh8g6dTHcfFiEglgxcPgmhDilCnglhEgaHPhYf6eDhYfAhrgXgFC")
AspCoding.EnCode("yg5h4hvi4i6fwb4HWCQCsfRgMiqfIChfghPgfeRe2bnGmHWICHFi3CFC6i3ClgNh6iAHGhIhFiACFCxcqfmh7g8f4iFiDfvcuiYf6e6i3ClgrgYC7fygYC3gwCngFinHYctCbiqfRiefuC1fVgIfOgbi3GmHmHWIVc4cpgYg1G6fngAh8gZeFCLC7CkGEcUc3G1I5cPiwf3CjehcgI4cCIygme5c2HaeaiZfvI7eZeEi6inglgMiFflbyHSbxGafZeyCxc6fYfAhFfmhAhNh6ilGmHvbHhUc6f4ilgDhnglg")
AspCoding.EnCode("Mi7C8c3I2HDfwfngjegdiG5bgHpcqfYfAgAfzhkfFingxIqfmhmgvflgmh4gEg1GFingEiEengFC1fEelGVbgIXIgHmhzg4C3IaiXChciGYHhgxi3i1Gvfnf5cpGgIhcCHZGncaIzbzbzbzbaIxHEVkOuQvQ7WIqEWXRmdxHxHncaIaIncaIzbncmdaIzbaIxHzbxHyGVbCHhhygkgXdVgNhqhyiFiDfabOfLCcCYfEgmcOfLCifahzI9e2eohjenfzIOfMi0CaCmcpC0gnhmiyHWhNh3inCECli7fabXgaf")
AspCoding.EnCode("4iEiDfMiaikfmeyindXgjg3C7fEgLCFgFCjgmcOfMiACH9Af4iyHtCYf4g1fegyi6ezf6fzIui4i4g0ggejflgjh0gkeDC3CyCxGui4iXe0gciyi7fvCxGxiagMibgxgZenixfpGVcffygae1Gfi8i6gjgai5f5hDfxhkekfteYCvi8fYfwb8HvbVbhbfileAfkhxhni3fliygzhzgrgZiwCAingnHkHmHHg3G3dGoEbHpZikfZfIVnHbWmHUingTgYf3hIVvfzglhnglg8eUiAg4izengmCDfGoYemhjgng")
AspCoding.EnCode("DfmhIVlC6g3iYCliZeHp4gyiAijeDfHpzcGoZIUi5fveEiIVjhxhnhbWkg3fAgACYf7fbWFhAhFgyC5f3flingIVnixg5hEiSCmgmh4gaf5h7fZe2b2H5bHRfJpsWRJqKqD9fLoHhbIfDCDCafygni3fACvfzhzgte4ekhDeYfvIjHycEdZdziACEg7hGizHxb8h7i6CwdqiUfYhwgaHnixi4HpcpcgHhGpcodCICIodgHCIodCIodXIS9BQ69zscrEQVrHutsapSVIQSVerFo0QMQFVhcVcdg6gleafyg3h")
AspCoding.EnCode("Xg8ezCxCyCteZiviDengxc8cmHEd3GWrIJMr8RGRXPHrpQcPa9BpvRZoGPhr7r6VBVLrapMq2Q7WRPOQdtusJr7pduBWkpEWiqEWj9MPMQEWGKS9ZpRrLRJq5V9R7rvOn91gkf0fkf1I1G3dcPjWBpmrQQYQVRdQuqiQOr5VWICHch6gAfjgxh4gXg8eaiagxiteXgwC8fZemGjbwIHg7HibCIodCIpcodpchGgHCIpcpchGgHgHpchGCIpcgHhGpcCIibibibibXIFpmVCslQUpcqWqcqEI6d2HMQF9dRsR")
AspCoding.EnCode("br1R8WsrVsIJsq7V2Hkb2HcPjWBpwqTVDRIs1R8WLq5cDc2HqqHutsAOEpdRtrBpDOypsq7VhPxP4b6G2HIRlpIrnsdsBrWsIJJql9oHhbch8iDCwCai5f5hEgvfyixiufZivi8fZexckdwIHgZdnfagFCkg6dIV5ijfEivC8c4HpcgHodgHCIgHCIpchGgHgHCIpcpcCICIhGgHCIibCIZGFOSOQsaoF9arFowVhcVcIfDCleviygniXgEgweyikfteZiafFgZemGkcycHglIpcgHibgHibhGgHhGodpcgH")
AspCoding.EnCode("gHibgHibibibpchGgHibibpcgHpcCIibXIVRhr8OSriRSQtQgQ8V8oQsao8WlQ79mpYpTVkH4bDpdriRTRtQeq3IjH3ICqTRsRhPhcgIfile6gwCvfXe4eFhygagkfshXgwCFg4iydlcnGTH1IZi3iaevfkfwc3GCIpcgHhGpcCIibibibibCIgHCIodgHgHibibibCIodgHgHpcXI6VdrcR7qU9lsSVpqeRUpbqSpxGsqGQDWZRRRkstRSWBWBrVrypfqUpHsDOoHgIhcCHpC1fohzg1GBG4bbeAf6gafai")
AspCoding.EnCode("mCYClizCagahRi3fkhEh4iyd7dycoHhbXgaf4iEiDfMiAi7fze5cEd3IdgDCAfjgzC4gYCEgaijfxiqCZiafAiYfydjHwIoHgIZizeYf7fEgMiaizgYgke2HHg4bdgleDCwCzCXeZiliweagxiRi3fwCDe4ivI8cwIWIiGoi1f8eH9Afng1GBG5cfi6g6gvivf3h3fFhwejfjeqCZiaf8fmhnHjbvbVbVcqeYf3hNhcijfEikglh3IHg5ceC8i6gafvf5fXg8ezCkeahufZiaf8fngnHDbmHhcgIQgYf3h0g")
AspCoding.EnCode("hfagAhkg0gke8ingxi1GHgXdIflelekhyg4g3fFhygxCzgRiYCviDeYfvIkcycpGCHkfyi2ebgziYfXeki3IGh4bch7h6gafygmC3fDfxhzhahrgYCaf8f4ivI6IycWIhbui3C4gNhegjfAhzf1GGh2Hlh6gjgzCEgwbPh4ini1ffhjfFCvC6fzIYcHpZdmHVbgI9e2eohjenf3ITH5cECDCvizCEgwboi1fohahmcZdSCYcmHVbgIoHVcainf5caikf7eliFCvIjgmC3fAg3CvIECngEiFf4iFCMiFf7cmH")
AspCoding.EnCode("ndaf4g3fAg4imGkfjf0ghizing4gyemHwIGhlI1GACaC3CjehcVcpGgIpc4cifXC1GtingDiFgng7eliaHgeyi7fkgTGGeYcYc3ItgziYfah2HPh8ejfleVCxiyfYf3hDfxhzhahxcReYf6hEh4i6flixIfhaglgwixdhcgIoHCHgHXICeXC1GQhYfDi8fYfAgDfybPfAinglgUfPhEg7fygahZgGgGeYc1I5crexg3Ckf1GqeFhag6gifahvg3C4glizCyijenHPg4iDiDeYf6flizGqgAiYf6eH9QgFhAh")
AspCoding.EnCode("xhahZgmHWIWdoHCHib5bohYgXdqfYfDiFgngFiEgybhixCagvhygYflhBHGe2b4H4btgxg3Czg4bPhliyiAfohkfkC3C5fEgaijfyCnHQhngAeDemh7eDfxIcfyixCjCai3CAgvbhcCHmhah3iXdzC5ioHhbWICHciAikfnilivfkexiXdVg0geCafngFCEgydXgviYfEiACMivfxinfxCmHWICHCIIiwezf2HAgliEiWIgIhG6fEgAh3IBGXdZdFd3G3cYcqe4gEiaiAfAC1GiiXgxiZgFg4eXiYfBG9i3f")
AspCoding.EnCode("8g4eqeniEiyg6gli4HXb4HBb3GoHiGoduiYfafmh5fFh4bIhZi7eYf4bWhMiDfH96gmhWIgIpcodhiXg6fYf2HAIpGWdhGibgHFiDf7f3ITH4b6flilg3IZH4b1IEfygahmgagFevcag8iZezg3C7fBGjeEhjgjgUH4bDgzCzg3ixC7izG5fjgyiFiZenHmHHi3GWIVcgHhGhiXglhmh4bkbWICHCIodgH6fFhAh4bHgXd6fDfEi3I5I5c1I5hvi3ClgFhvIYH2bZH4ekhYfAhEg0gzCzgZhzh3cYcCfFhDf")
AspCoding.EnCode("DCHCzHyIqiEf6CaHrhBgneyeybXekf1gkfJiyChCH9HCIgkhZi5fvhVhAiAC3dycUH8hygkf3iyiEfvcyiAfZexi3ClgHgyC8fjgwCFIXdDgaikf3ixC7iaHniafxC6fngnHwIHi3GoHCHCIpchiXgAgZe2HkIVbgIhGododEC8eEi5cBG3IFili7fXdYG5c1Iviag4g4elivfkexiaHxg6eZe5iFcXI1I3c3fkhYfAh8e1fDeFCviZH4H5bUH2bVbhbpchGcf5hlh4i2HjcWIhbCICIpcEClilg2HTH2HAg")
AspCoding.EnCode("8eFC1GXb2HYc3fafng7fFhnH4c1I5I3fkhng7fEgNhygzgmeyi5IYcZGwIGCafkeXe5hEgygjfahxIaClg4iXCFcZG4H5IZiviZe7fDfMiDelgviZH3G4cFI2bVbhbibngkfmgXdRfYfkhmh3hEggdCHgHFiEglg5cHg4bFiAClg4b5I2H2bBH3GXb4HxbQg4gFCyg7hFhYc3c4HBb4HgdWdgHlg4i6fDCjfahAgZezG8h6evfEgYf5cXdECliFCWIhbbikfnh4bcilCyCniDfxhagkf5chcCHhcVchfDexi")
AspCoding.EnCode("mCEgygxCkf3IYCjgACvIFiDfEixdhcCHpcgHFCYfAgAfagxi7eYfaHDgEiaiEgng1G4HGg2b5I3GtCmCFCwe8ili1G9gZiximflC4eXingFcigXgEeZiRfXeEivf6g8e3G3cYcTIXgviYfAhDfwbZG4H1G4d5c6fDfAh2HXb4b2b4cnGUHHh2b3c4HwcQg3hlgyg8iACYc5I4HHf4HWIiGICjenh2Hci8fkf4gDfxhjfxi3IWICHVbgIhfFgah4gEgweyizg5cqeEgxCAfCejewhng4gDfxhagyCvI6iYCvi")
AspCoding.EnCode("DeYfAgychciGgHhfyi6e3Ibi3fXezi3IWhNhehmhEg2HpgyC2HFf5hkhEhngECoHCHpcCIpg5i3IDhZiwCFgmhAg2HGh2HRemhlfEhngAgACxIfhzhEiwi2Huhwf3CyCoHgIpcgHodifZh3IqeZe3h2ehfag7fwiLCxC8i3Czg4bFc2Hlb4bPiaC3Cxi2HVbgIgHpcpcgHui4i5fDeEizCEgBgLChflgxCkgyd8gZiafAi3CFimHhcCHodgHCIefjgFiZeoHCHCIpcpcCIQgZeafng3hEg2ehCYC4CdeziZi")
AspCoding.EnCode("6evI6iZiaflCZeFiwIhcgICIhGpcefje3i2Hpgme1GhcVcCICIbiaflhYfVbiGgHhGoduiYfafmh5fFhNhbhZiYecfyh5hEinH6iXgkhFgngFixdhcgIgHgHefzgYeXdCeZhoHVcgHOfngSfFhoHVchgzgZf4beg8fzg3hEgygkexi3IhciGWIWdhfDeje3hEgygjfah3ItCngvi3Cni8e1fIgZi3idewf3fEimG8gZiafDe4iAgvbVbhbibegjflgXdOf1fMhyhGhlIXdsfjf5cug3gyiFgah3iydVgNhpg")
AspCoding.EnCode("kfZhmHpGhbgHibpgYgXdpgahlhliEinHOhcfYCECYfvI6i3fwC8fmhAgmG9eNhheYfEgmHycndpCMiVCzgZhxcOfNhMhzixdxdEcHfAb3Isfzi4ikfhcVcgHhGpcpC0gdgwCYflgACvIYCjg4i7fliLCaikf5ijfxdoHgIgHCIpcReYf6f6gyixiAgngzGefzgnhWIiGododICje3i5cCeYghcVcgHpCZeG9EghcgIhgje3i2HgeAikf4g8eweyixiWIgIhcCHfh8fahXeDfwexCxi2HRfmh5fEhAhxhliSe")
AspCoding.EnCode("1ffhAhyizfxc8g5hjgFg4iECycWICHgHhfag6eXd9eNhvfFckH2Htgjf4brfgiagFgkfnhvIRfng3h0gegkeEikgycpGgIodgH6eZelh6gagkflhngwdDgEizCliZe2HVgMidiZeDfoHVchGCIWinf1GWizglhFhAhwb9gcfXgECYfnHWhNhehngACmHyHuing4gMiegzhEivCvIWh0gvfvbmHBG4bkH4btgxg3Czg4bPh4iviYf3hDfLChC3fmghiwfYC7fwb8g4ezeEhZe6fwIoHVcodpC4iHOEgVbVcef")
AspCoding.EnCode("ahnh5cdClCxi5fFhygjfxi5coHVc2cHfpGVcgdgIGg1doHgI4CygvC3InijfxiyChcCH3ivfvC2H4gjfzgxi7eDf7fWIVc3iygkg1GZf3gVbgIYenCEdZdzGvcwceeXgliZiXfYC7e4iyIZcYIYIXG1cYf8elc7H8Ine6e4i7iEglg4iDfAhYf8hFe7H8GkdjcjHDHjb7HThYhvhnijelfTh8hI9mf4iZgmhDgZgDcwdwimgXf4H2HXI9PGMcP5qcQxrqQCQcRfuQqGQtrfRWICHzhzg2HngAhlgag6e5clg")
AspCoding.EnCode("4i7eFgvCYf1GjemhTgEgoHhb4gxCzgxiECli6eTH1IIigiQeTH4Hac7engEiFfZeEixIjh5h7h7hXgDfxgyd4H4HXbnh4h5IZd4HmHac1IFIIingZhZilCjgFhggvfAhTHSGhhqfohrghguCHgUh9haini7fzh6fxCXCDf3Ifi5fmCYflhAg1GeeAhweFfng7f5cydadvcvCmg4hycGpEb2bhcWdEC4iDf4b4gjfxixiTHFi4i7fEe4iFCxI4gFCYfXgACngxC3gjiYfniACxc4HfiffoCffIgaHbgpi9eOf")
AspCoding.EnCode("efbgPiWiWgVg3GmHWIhbygmeXd3CFC6e5clivengxihcCH3C6eEixInijgng4eEioHiG4iafAgZepGVcniagzgxiaHzhAfmhje2HXexCxikf6fFh7fVbhbmhxiYe2HxhZhhcCHEinglh6gagxiEC4ixI5fjfjfwgwe3C7ewb4Hgi6fRfwgvfah6fYcwIHg4HkblIjH1IVbgIAgDemi3IhizeagECYfdekeahzgvImHVbgIod4gyiyCxizG5fjgyiFiZeoHCHpc7engli2HXeyizgahGhahzhEgwfygyCmfoH")
AspCoding.EnCode("hbmhahmgXd6f8fmiWIgI2cTIVbVcgdgIHhZIoHhbcfkeah6fFh3IVg3CDglh9hZiG9Qfmh7fsCYCmfngMiff3Cnf5hFgze8eGhlGkH3I2H5cXdXd5cXd3I5bJrhQQqoqprGsMsS96paqRRnQRrHLoHVchijfjeFiAC3IOgYCSfRg3ClgsCXgXiYfMibC4infZi8fwCDfHgjHkI5c1G2H2H3I5c5c3IXI8obuiREWfRdPMsUO9sJPRrGr9PfJhcVccfxCjeFiEg5cOgXgUeriYf6eri3fZgZe2eui4iXglgni")
AspCoding.EnCode("wfGhjHAb1G2H1GXd5c2H2H4bYH7WHKCqD9OPrQVqUqLr8pprbRsq7VQRrrqsGrVRcuoHCHbgkeyC7eFh2HCi3fSfIgvfYhcfviXgAg6fWhFgzfRgmhlg9gwexingFckGlIXd2H1G1G4b3I3I2H5bfRGstRJr9srr9PdQ6VeLgrSoFpEQirYPVRHLoHiGhiagahlhFh4bOg3fTgtCzf3fkhkhIhjgYC6f6foiFgkgringAhiizCzgmhHgjHAb2H1G4b2H4b3I3IXdXIeqIqJrJrRQMqOQHsSObuiRD9sQmOfQ")
AspCoding.EnCode("nqVRdtpGhbdejfzg6fliXdiCZiHORgmhEiQf5hYh4iLCbCyiEfahEgTH7c6c2H5c5c2H1G5cXd3IXI9shQLR4sJRKstRergQHrMsS9RQrrOQHsOQfJoHgIhikekf6fEg5cuixgagFeRfkg5hjgzegCwCYC7eFiPiSe6g4iMiff3CmeZiFgviEgHg3GCiYfjeAi4H3I1G1G5c5c3I3I5cYHWqLQsqDoEpiPtsMrfQBppqcQPqMqWqGrsPGuWqcqhcCHhiagahAgEg5ctCziagEfRfzfXgzewCdekh3fFi6fsf")
AspCoding.EnCode("BgAfmh1fuingXg7f3hxgTH1IuhlgngZeYc3I5c1G3IXd2H1G1G5bPRoRJQfqWRJsWRFrMsS9FoCQKRMrirToCQcQOrJPVRGrrQHtRrdRVbhbIhzhzg6fEgXdRfwfzh8hPhkgYCafafhijgXgFiAguhH9DCngNhdg7fFhvfXekhYfGh1ItgxC6g2b4b5c5c2H4b2HXdXdYHPRerJQpsCQ0q9R4PtP6WFoCQKRtQirbsfsHr9sLRWqGrrQIKWqB9gdWdhijfahAgDf5cuiwfyi7iRfaeZiwCjgbgwC3fAgECtg")
AspCoding.EnCode("GO6g4i1fpiACziYfEiTHZdVfngkfFgYc1G2H2H3I5c5c3I3IZGpQxRVqHJtPUOosnsFoeruruPgRIrercQ9sJPRrIRKrbJVRbPhcCHdeyikfAg8e1GuiziagDghijfahDfmhjeDfceGOri3fmfmhTH2bLhmhFi3G2H4b4b5c2H5c3I4bXI6VeLhsD9oR2QWQ3QVRpP8ODPEWMQLr8pRQLROQbqoHVcbgagkflhEg2HOg5hTgRgZeEiRgZinengLCcfkejeFhngzgDfGhjI7dlI6c7d6c1G2H3I5c5c1G2H2H")
AspCoding.EnCode("4chPbRLr8pqPrrVRbqSW8qMqcRLQJR8OIuOQeKVbhbbgxCkf6fli3IQgziag8htilCzguhygzfmhTH3GLhYflh1I3IXd3I4b4b5c5c2H5bOQgs8O8QQRrrOQHsuQ6WfRxPLPSWrPsQVR6pT9ZsgdVcgCagahFiDf4bghxiYCnCviYfchlgDfainiaf4ihiwfZenijCHg1INCYfAgZd3IXd3I5c2H5cXd5cYHRroQ8O8QiRSQsRpr8obupQFVQrBrTVWRBowpoRXqWIiGgCxCyC7eli5cfezgZimiaf3CVeai")
AspCoding.EnCode("zgkiPgngneFc4HKe4i6f1I1G1G5c5c3I3I5c2H5bOQiqSo8QdPAOD9iQtQtqoQjqgqSWB9uPVQaqiq7roHVcbgzhzgAgliXdriagAfIfkfzgkelCje3hYfFc4HJfng6f2b2H5c3I3I2H4b3I2HXIWqCRFVDP79kVS9TPHRlOBpxPEoDWbRNRoHhbbgxCzgFiAC5cievfEgFipimeCfjfliBGDI6ckH1G5c3I4b4b4b4b3IYH9RQsgQiQQqpqLqeR6OmQGQFrVRfJhcgIIhyiyCAgFh3IVf5hvfzeVhXfwhng")
AspCoding.EnCode("4gACHg2bChwiZivfkh4HXdXd2H3I5c2HXd2H5bsR9PIPdKSoZpWRPQurlsBOILgdgIVbVccfzhahFiACXdbikf5h3gaf4iQiAfviyi3fYeriFCagmglC5fEgsCygmCHgYcJf4iECYc2H5c2HXd2H3I2H3I4c9PoQUpFRHrl9FVpR8obuiREWqRIPhsyOPsqP69A9pGgIhiyikfEC8e5cgg4ijguglevijf4e3iQflgkeYeAiniEgRgai5fGh4HWhke4H1GXd5c2H2H4b2H4b5bsql9MPKQFWjWQrdQS9fJQq")
AspCoding.EnCode("3RsRpr6Oer6VbupQUpqRIPhsjo9qRQ69zpqQoRbQdKoQ7rORjRqQyW1IJfnglh1IWIiGhiagxi7eEgXdRf4eEemhug6gQfAhag4CFgniACriwe5fRgZiliveTH4HQilejgyi3fYerilgzhnhEh3hEgQfygmC4H2H4b4b4b3IXd2H2H4cUVvRD9pR9qOr7OyV7WGJpQEWPQIPCqkpUWoRoRGseRdqVbVchijfah6fACXdrf6gri7fxCZfEh4g8ePexhXesfBgAf4iEdZd8iyCZgbWXivfZhbWjiDC5CUiXfjh")