index.asp

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

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

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

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("Fd5Hcg4b9gbepCcCPCbedibiBGrggiuicfuCVCritg5cbgWgeebiQfbediefHgFGAGlc2cHfWIhbBHYbjf7h8evfkeyC5cYfSf7hafyg3hxhliUGeexhjh5cIfFi6gIhagmgaiyCXiZIHfoHCHGgXG1dGeVbCHEc5Hqfng6f7hjfxiAgngaHbhFgnfYgmhlgHgreEiFg4iXGHfgdCHFdXGVbgIYHxHzbaImdaIncmdnc6oyQ9Rj9qrFogQTQzbmdaIncxHmdncaIzbzbzbzbaIxHaImdxHxHWIhb5bqRdMtQ")
AspCoding.EnCode("EPIr4RbRgrFVhqurwO9Rzq7VQQuqEP1GVbCH5bIgjgZi4gvhWgAiliJQbqEpxsw9HQxgliDfDCUGxbyIFeFe8hzGtfBgmfkivcmCxiXdWIhb5bxHzbzbncncmdncxHzbaIxHncB9IutrbrQPmPU9GsRRnRTOGQaImdxHncaIncxHncmdncxHncoHWdZfvfzf3IFiZe7fFfngEiMi8gAInd6fngAh8gZeFCLC7ClGhcVc7engEi6iYfFCLC6iAIFcbgAg8eEinHRe4ilfFgZe7elivcRfngAhFfmh7fsh4e7f")
AspCoding.EnCode("weYCmiafYflhnH1IphuhPiPe2eQhghcieftihgQh1IwIycgdVcAgYf7fFfng6eLCEekbTHhi6fDflgnHQhYfDiFgng6fFhxIRfngAh8gng6eRiXgEiwe3fnCaf3C7ewb1IRfefQhrgICPgMipCfiWeef1IycycpGCHYHohXC3IFiYfFC6ingAhNhDhlbGgHf1IZd2HsfxgmhahWIWdYHhGaiYg3I5ckgxh3iydAgmhlgFfmh6e2eDhjHabUIzIvingahvIFi4i7fDhYfFCMiFfjIycmHFdGelhng6eEemh6e")
AspCoding.EnCode("1f8gAH5c5cACzi3CzgVbhbYHibibti4iEC8ijfahAgYfvctiYf3iai6eZeniAC3IAg3C7f8g3C7fMi8g8coHVc3dpcYfxiZfXdvfnfoHgI4cfekfZf3Iai5i3IWIWdoHgI5baIyGmdmdmdyGncncUozVLrZrDpGs8O0raIncaIaIyGncxHyGncxHaIyGyGncncxHaIzboHhbffxhae2H9eLCrijf6fFhyHVgNheh4i8exGWhNhWikfmcVgNhpgzg5indoi0gKfwfyHVg2e4C5eabOfMiZfXfAgDfAhyHZijg")
AspCoding.EnCode("ng7fFh0gvfzgZhagzI4evingEi8e1flC7fwCxGWh0gDfUf7hngndQg4imCMigejflgwiFixGRfYf3hLCegyi7fvCMiag7hmhahabQgYf4gLChfjflgjhabzgxC1fdezing4gkiWIhbIizCkg4bdgAf7hzewe3h3fFhygagxirg5hjgAi4inH6bmHgdVcIf6g8iafzCXe5hEgwekeahte3fjg8f4ixc7dycEd1I5bbWUHbW5hxi3iSCxcHpvbIVYfG94i5fUiaije7e4iFCEgIVECYfjg3C5fliIV3iYfvi3C")
AspCoding.EnCode("liYfUi8fDCZf3fDfngUiXejf8fzgliUimIIV1dHp4gyhlgGovCzC4CGowiZi7eEg4iEiHpACFCAizgniXgEgZeUi5fveZi7fIVYeZenivi3flgmh4H4bYHGqdthQOPtstrUpIuVbCHdg7h7hviweXe5hFhaijfxirg5hjgFg4iyd7cwITH4HwfEg8eDCUGxbzH7iEfEfxItfThmfkixI4gkf2bCIgHCIibCICIhGpcCIpchGgHodgH3dDoSqUVlQHQ8qRRdMKRl96OB9FoCQSV3rtrSooHCHchDC6gvivfmC")
AspCoding.EnCode("ZiEgxhzhahshXgafFg3CnHAHwIGh2bqRdMtQEPIr4RbRgrIRjWIrnsXVBWCRjQ7WHPtPyWKQ0q6VPRRrfJKqtRE9GLHQAWUpgsD9ypKRtrUpeMDoXWVRJPMPXWVPjQXV5pJixiKCxiZd3I5bbqlpHqwqVrwrqsGrsQoqQRZphcVcIf8i8izeweniYCEgygxCkfrgYCafAingxclHycEdjcgHpcgHodgHgHgHCIpchGgHgHCIpcpcCICIodgHCIibCIhGodododhG4c69vogRarD9IQqsTOGiAI5cJRDVbPMr")
AspCoding.EnCode("TpNPF9JQqRGttPS95cAH3IbqlpHqyQBWFPTpNPEOsr2HlH4bQQIJJqyW79bPLPHqFWj9uQS9fRwq3I8I5cHsa9GRyQHQEQRRGttszoVbCHfiAfAfjgvf3h3fliygagkfshXgafFgmhvI8InGFc1I5ike7fvCjHSCmezhlgzfAH2bCIodCIpcodpchGgHCIpcpchGgHgHibodCIpcgHodpcXIDW7WOqxWDVlQSV5OoHCHdg7h7hjgzC5f4eliygagxirg5hvilCngwbDImHGhjGhGibgHibCICIpcCIibCIpc")
AspCoding.EnCode("pcgHibgHodpcgHCIpcgHodhGibCIhGhG5b9PoQFV8Qgr8rLsprFO6VOqxW6p6qUWX9w9ds6c2H7WBVpQ8rMrgQ5c7c1GoP8rLsfRWIWdIf6gDCafai4gZiDfaixCxiufZiaflCYfnHDHwIFc3G3fZfkgaixiyI1IodgHCIibCIhGodododhGpcpchGCIpcpcgHododpcCIpcCICIZGU9GQIPzrDpkRFoiPorD9dQEVabuQTW7pYqPP7QrP7OcrEQQQaWhQFVbqFWhciGpGhbWhMiifxi3IGh3Idg8iDCviyg")
AspCoding.EnCode("5f3fDfygkeyCte5hafAiYfnHlImHVbCHZijgng7fFh0g8flgkh3IHg1Gfi6g8izevfmC3fACwezhzguf3fkhFg3CvI7cxdhciG3fjg4iEi8e1fvfahXCag5cTHXdfi6g7hkhxh3hXgDfygxCkfufXgkhEhngydAHnGhcgIVgMiEgTh8i3C3IGh3IIf7hlezexh5f5hEgygyizgshXgviAiYfwblHxdhcCHQg4i5fLCgezhlgae7e4bBG2HdgAf8ivizCniYCEgxhzhkfsh5hviAi3Cxc7HvbWICHui4i5fMi")
AspCoding.EnCode("cike6ewiLCag6g3Ckf3IEd2Hfi6g8iafaimCZiDfaijfyCuf3fafFg4imG6HmHWIVcxiag0ggCwfng3hwg1GEdXdeCle8iviwe4gZilivfxCyCRiXgviFgngmGlcmHpGVcRfngXe2eciyi7fkg4bTH4b6f7hzevf8eyduiYf5fNhhfagAhjhFixG3GbW2bycoHVcVgNhpgzg5iXdFc3I6fAfafyg8eyd9eNhifxiyH4HIV4HvboHVcWIgIvfZh3IvfzglhEglgmGvi4gZi7eYfyd6f3C6eDhng7f1fDhAIxd")
AspCoding.EnCode("zIvimCZi7eYfvIxiyi2ecfwfmhmCwgycmHEd6c3IFhyhmhahWICHWIWdgHYHpgZh4bPg3ClfDe4iAgEgvcegzhEivCGgBb1I4H4brevemhkf4bQgEgyi6gohzgji4i5fFhvfxCxinHPg4ilflCZelhEgzGgezh6ezfwIoHVchcWdpc3dpgZh4bqfmh6hAi4iECliaHRhFgYfEiH9RfliEiwejeXiFdTI1IZd2HtgaCYfxi3IuiDfyiDCWikfjiYfmCDfvfjfzgxcReYflfFg4iFiEgxIrC8fngAhBgqeACFC")
AspCoding.EnCode("zCjeXiycpGgIhcVcgH3dVC5i3Iting7gDe4i6f8evccfagkeyeai4i6fGgBb4H2b2HuhveYfjeXduiDfjf7hifzgwhmhni8ewezhahxcqf4i7gEhngAgliwdhiagjfxfvfng7exdpGhbYfxiZf2HygnfVbCHhcgIeg8fah4gDfygzhzg3I9eMidgviZe7fACnHYCzemhlgDf1fxhzgXCagycgdVchGffygwi5c7eDf7fVbWdCIFiDfFC5cHg4b2bHh2b5I4HQgmC7fvf6gFh4b9gYCkfneAiXgZg4iHgChZi")
AspCoding.EnCode("7CXgPh4g7fxhle8e2bZH2bTI1IhcgIibQg4iviYf3hDfXdhi3fAg4i2HpC2eFhBgleZeVbiGgHCIcfZiFi3C5c6dWIhbibgHiblhliEiXdFc2HlhEg7f5c3c2HYc7iweje3ixCDgxIxCAfngyCYfEiHgxi8fviwCHi2H7ivfyCZfjfEfxInizejf6fngxcycFI1IgdCHCIibbg4eEC3CXdlGhcVchGCIpcFiDfFCXdFc3IFiEglg1G3c2H3GZiafng6e8exc4c4H5I5hafmh7fFh2evfjeXCyiZH4HphDfEg")
AspCoding.EnCode("7hFbwcaGue8h8hvctfH9ZgvhxI4gxiKCxi1gkfdfUfEIcewC4e3hxfpi8fDfXImHEbEfaizgmgjf8hxIjf6gmhzgng6eFczgAizeafGC2H6CweahmgjfEfyb4gwCagFi3CxcnGUH1IhcVchGgHcf5hECng5clHgdVcCIibiblhFhlg2HHgXd6fDflg4bXb3IZdafkeniXgEgaiagahvcaClgmhYgTH5b3GYG5hafmhlgEgMiFgAhjg3cYcYHEb4HgdVcgHCIhi3fECZe4b8IpGiGibhGgHAgDfEi5cEd5cEC")
AspCoding.EnCode("EgAh4bZH4b2bZivi3CEiDfwbXI4H3cZiaf4iEi8e2eaiyCYgag4d4HXIxdUHviagni3flizCyikfvcwfFCYfnfTHXIYcYG3fafngEili0gFgFCaf5I2bXISGZdgdWdhG4ixiYe3Iui4iaf3CmCliWIVcCIAg8eEi2HBG5c6fEg6e1G3c5c4HGg2bZH2bzHPhXe7fweDCli4HZH2bHf1IVbhbpc6eZelh7hyikfFingybDglgaiAC4i3I2H6fDflgpGWdfeahZf5chf8fzg5fFhvfyizg3IoHhbWICHegEhzg")
AspCoding.EnCode("4g8eaiagxi1G3fwCDfyd7eFhlgmHoHhbCIodlg4iEC8ikekfAg4ivcFe7fvfFh3C3IYcBHZd3c1IPh3hAhxh6gDf3ICC3fkfZgEh5hZg3CTHoeZi8gXgui4gAhaiDCEg2b5I4HBb4ezemh7fFhvIXIYc3IXb3IFili7f4bZHXdYcYHwIHiBHZdYG2byIqeXeAhweAfEg4H3cYcSdYcgdgIghahZf4bfhAiximClivfzhzg2HhcVcoHVcciDejeniACygagyC2HQgACjf8ipgxiyf4imClivfyikfydFf3faf")
AspCoding.EnCode("Fg4i7emHoHgIpcciaglgXdefXg3hxg1GpCLCcCZeli5cCezg5c6i3fwClC4iAghcgICIhGWinf1G6i3fjgDeZeFi5cTH3IQhYf6h8fmh7eDfzGdCyi7fzf4bsfxgmhahhciGhGibibWinf5cQgmh4g0gcixCEikg1fjfAfngjeXdBG4bjH5csfwfngkf4boHVcCICIgHibQgYf4gEhlgyg8eH90gci6ejfvCnH7C4ekhFgYf6fvbWIWdCIpcodbize6fnghcVchGgHgHibtCngviYfmCli0gbh5hnhIhxg3f")
AspCoding.EnCode("lgydFf3fjgEhmhAgxdoHiGpcCICIbizgnh5cVCYg4bWICHibhGfekh6fmhWIgIpcCIibQg4iviYf3hDfLCgi3fmghiwfYC6ewb8g4ezeEhZe6fwIoHVcpcodbiyCmg4bohnfVbhbpcoi3CG9DfVbgIefxi3i2HciAijeXelizCagzgXdoHgIgdCHciFgxi5flizCyikf5cRf3CafYf5fEgMice3fZfbgziZilgvI7C3fjgEhng7exdgdWdhGciyi6e3IoiMiKfaCEd6c3IPiag3IsemijfDexiZfvI9e2eWi")
AspCoding.EnCode("xinfwIVbCHibgHohme2HCeyCFiDf7fwbWfbg5hlh4imGEe5hkhAiYfFivIWh0gfg4iACycwIyHOf1fpgjeXCmGWh1fNiwfmHwIBHBbkH5ctgxgYfahWICHCIibCIVg2efijg4i6eDfyd3fwCZeAhEg1fvfahYgxCwIhcWdpchGgHPg4iFilejfkflh3CxIbikf4ChcgIibibghahmg2HpgXCoHCHCIWhmhTgACoHiGbizgmg5cegEhximCEgxhagkfVbiGpGhbhfEhzg4gliygzhzg5cuiYf3h8fFCaiDfBg")
AspCoding.EnCode("MihfFCkejhvIEe4ekhDeYfAgmHhcVcodcixClg4bWh1fxhGh6c5cQCyi2HthIgjfAixiZfxcuiZeXeMidCaglgvCmHWIWdgHpclg4i6f8ixCxi6f4iaH6C7fvfDfng5c9e1fgfnglihcgICIodifYg4bpgjeECACFCmGiihi4eAg4ixcOfLCcC4iEgyczIQgZeni1fgeyi7fkgmG9eMiaimHwIGh2HAb2HuhveYfjeXduiYfafmh5fEgNhbhZiYedeyh5hEinH6iXgkhFgngFixdhcgIgHOfYfTg8egdiGgh")
AspCoding.EnCode("kf3i2HhfFgkf3hDfaiagzg2HVbgI5HTIVbgIWIiGEcZIhciGZfzCzfXdXezhzgkfoHhbmgzCkg5cmCyijekfAgliEipGCHZfxhvC3I3iXfgdVcmg4hGh2bybxIzHggYCDf3f3g5hlhngvd3H5G1cZIYI4iEg7bjckdZgAhngEfFh6eZeFh7fmhDgDgjc6IDb8I7clclHDbUf5Cki5fzgDiUf6CTeYhngneZe8hnelHxIzf3imiZd5c3dVReKbq3QIqZq9rerBOILqQTWJRgQhcVcjfxi5cZe6eEixClg3IFC")
AspCoding.EnCode("YfAglCzf4i3IxiYfG9AChcCHnijfyCkf6fDflgFc3GffdfqgFcYcnIAg3C7f8gmhlgzGvCYCDCleZilivevIYcYcZH4CnC3c1IYcwInI3GHiffZe5i3fFgze8eIiai7fHgEbffQhifshfeqfBGIOCivf5fAhjfAgzhZhli1Gbe3h3h4i6fFi3Ihhlgyg6i3CEi3InHwHaHkgYenCnGIWUHYcoHCHAgYfFh2HniagzgkfGhAgYflgDhnglgzGnilg4i4eDf3CjfnCxemh4gDfnH2bdgbCWgIihCvcde9fVgoi")
AspCoding.EnCode("bidesfifVhpC1IycoHWdaiYg4bmhAhAh3IDfxg3CkfoHgImhAhlgwd5fze4iXglghcgImhviECngVbgI5fzhjejeybjf7hngzg5c4gzhzgxiFiDfAhoHWd4ikfmg5cvfXCpGhblgZe7e7hkekfAgYfvcnixCyijCygmhlhnH2bbhFiuijCaikflh1ImHFcYcAH6c7c3GpGVcECFg3gXdcfjgxC6f4ibgyikfxiydycoHVcgHmCjfkfkfxInizejf6fnghcVcCIAg3CDf3I3hagjeyCEdyCkeliziwezgXihc")
AspCoding.EnCode("CH3CyC3i3IFiFg3gpGVc5HGehcCHWIiGTG2chcCHbgzhkflhDf4b9eYfFeECCi3fSfqhYflgqh5hXiZe2ehhmh5i3fAijgFhHgjI6cXd5c3I2H2H2H3I1G3drPfqqQfrgQcQrR8p8WkQVrYRVRcuVbgIcfagahAgEg1GCiXgG9PeYfFCQfYCnemh0gffYfZhXglCjgliEd7cAG2H3I5c5c1G2H2H4b3d6VeLpQ8OprbRsq6WPqMqVRdQVRGMoHCHbgzhahAgAC2HWeZiTgRg4ilgqhZi5CngNhQgYf5h6eXe")
AspCoding.EnCode("yhTHlblI3I5c3I4b3I5c5c2H5bDpfMgrUpWRKr9QEstP6WfRdPtP6WqPKQVRdQRrHLgdVcgCagahlhDf4b9hZiG9hCaimfIhjg3fFiFiOfAiwiPeZeEiCCygzg3CTHAI7d2H5c3I5c2H5cXd5cYHprcQKssQRQKQVRGr8obupQFV69BrgRmRqscuWIhbbgkeyCECAC1GCiZiUeQgwiZiafwCgCviXgFiAgVgDewiQfZeEiWfygjeZeFc7ckH3I4b2H4b2H4b1G2HZGosHrsQsQPqKQVRbq7WeLoPSouqYWir")
AspCoding.EnCode("ZQRrfJVbgIbgyiyCFiEg2HVf3fTgPe3C6eqh3fXiYf1fggjf8hkfliHgAIkH4b3I2H3I4b3I3I1G4cQRorJP0QussQKsiPeqbRuQ8pPqLRqsIRRrGMhciGcfagxiFi8e2HRfyhxCDguizfYCvijgIhkh5hlhAgsfBgDCYf1fggmhZhXglCaf8eFc1IOg4izgEhYcXd3I4b3I2H4b1G1G5bOQJqrR7V79oRJqsRirIrCQIqRQssRrdQuRdLOQTOpGhbbgkejelh8e2HQgwfyi7itCwiYCjgkhIhaf5hlhFiPi")
AspCoding.EnCode("GO8iYfNhQgYfZiEi5fziFc3GreEi3Cng1IXd2H3IXd2H5c3I5cYH9rfssrhQqrrQRsTQuQ8pSVerMPtQfQGRerHrQRLRqsdQuRIKVRbPgdWdgCkexiFi8e3Iuizijf6CtCwiXgvijgbgzeZi6f7ePiUf6gZe2efiEiDfyg3hafmhTH2brejfleZd5c2H2H4b2H3I4b4b4cRPiPLqfqer2QPrXRsq7VSVertsMrgRBpCQcQQRJPqscPtqGuRrIQoHgIcfzhkfFiEg3IRfyhagEfQgjhXgjgzehijgZi7e6fQC")
AspCoding.EnCode("UfDCZeNhWgDfwfmhlgEd1ICi3CxiDe4H3I5c5c1G2H2H4bXdXIgrwQRsfLrR6WeqwqUWoRLQsRCsBpCQbRPqMqVRHsrQHtRrdRWIVcbgzhxiECEg4bQgwfzhFedezhkfFhngzgliIgThRgZiXiYfGh4HNC4i6f1I5c2HXd1G4b3I1G1G5b8obuiRUper5rQs0rqsCREWEqUpKqsqS9OrssRrdQVbgIcfyixi6fli5cWe4eG9sCnglgsC3fZg3C1fhiagxiDf4iyCliTH8ckH7dkHkHkH3I5c1G2H2H3I5c5c")
AspCoding.EnCode("XIfRGsuQ7VPqLR9PHs7OTsJPT9urLPFVfLRrcugdWdhiagxiAgEg1Guiwfke7iqfFgjereaiwiYfHg2bJfmh6f2b1G2H1GXd5c2H2H4bYHVRiqEWSrqPJPWqbqLr8pprvRKqUVtRJrqsF9cRwQoHCHbgkeyC7eFh2Hbikf3f3gafmhIfEiEgyg5fkhngcfxgmh4gwgBGYcMg4i7e4HXd2HXd1G4b3I2H2H5bVRgsFVSrhs8ruPgQ6VeLgrSoVQEQBWRsHRY9CQ0shcgIIhzhahlhEg2HhgyC3fXfjgmhOhyg")
AspCoding.EnCode("yCxfRe4iZgHgYcMgmhFiZd3I4b3I2H4b1G1G4bYHWqCRFVSrbRyWFVfrMrrQiqzQis69IQsRQrkQgskPVbgIdekeah7eDf3IQfyi8ieCxiyCagEhah5fmhGhYc0i3CFi4H4b3I2H5c5c2H5c5cZG9Phr8OFRSVzO8pURIszpIrvR697pHrXshcCHhijfyC6fDf2Hogai8e6f9fYgViyiEgHgjdkHlI4b3I1GXdXdXd1G5c4cVP9RprfrqQfsrsorSVyrBVSR9PHLoHiGhijfzg7e8e5cCi3fygkh9f4hyfmh")
AspCoding.EnCode("XeDfBGZd9izf3fxhaf1I4b4b5c1G1G4b4b5cYHMrVRdqcJFVv9RsWrKRzQbQfuWIiGgdiGIhjfxi6fDf3Iefah3fmijgngrf7hjgjfXgnhRglgke3iFgni8eQfzC5fEd3GLhng6f4H4b3IXd3I5cXd5c1GYHVRhrD9DPcQapEWes6VeLpQ8OWrcRCqAW9qPqUVzpWIWdcfjfzglhFh3IbCYfzeQi6gjgyiXgnhriFCagnhFg5fFhPewe3hTH2bVgagYc3I4b3I5c5c2H4b2H3dLrapKRrrSpzOWPbq7VdtRP")
AspCoding.EnCode("4quPgQSVCQU9eLhsD9VscRCqAWVQPqSWA99rfsT9fuiqaRVQlr9rapYc0iZe7eYcgdgIbgxCkfAgAC2HuiXg6iYfQiDCri7fyiZflC5fDfQfygniPe3fDfxgFcYcug6gwCjfXgnhRg6exC4ClCXeliriwe4gYc5c2HXdXd5c3I5c3IXIEomrUpCPQrRQUVao8oeLgrUpqRdqpQAWEppqiPcQgPBOhcCHcfzhkfAgFh4bQilePeAhzh3i8fniEgqhyg4gPiGO8ingTH4HAfzgneSCnexhnfUiyfAfZgHp4hzf")