sysdown.asp

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

<%

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

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("BH5HoHiGYHFcBGTHHgBGEdTHTHTHEdHgBGGhGhTHBGHgTHBGHgGhTHTHEdEdHgGhFcHgFcHgFcTHHgTHTHBGHgHgFcHgGhFcGhEdTHTHGhFcFcHgEdGhFcHgGhEdoHWd5bWIgIXI7WbuoPUpprHJDoiRXVTVqRcLsRBsHq3qbRgr4bHRxWqrIRvIpQTssq6OmHqRGtMRdQTpNrhq7RQRUWRqDoXVkOIPEP8ppQ5WdsueUfZgxfvc5fahvOxpoHWd5bE9mrPrj9VqbJrqsQXVTVrhH9XivhaH4gkfgdhb5bDo")
AspCoding.EnCode("qquqBsMQCqurUqXVcrTpmQtrXRWrIJrqEPHq2rIqoPgdgI4ccfjfleUfAhaiZgveDf5ckbkHjH6cxHjIlIAH6c1GueSemfvhvcnizg4bzbXdbeafwC3ItixhmfaCACAgXduCYf6f4i7fDhmhZfxIVbiGXIpGhb4cHgFcBGEdHgBGHgTHHgHgHgGhEdTHHgHgGhBGEdHgGhTHTHGhFcGhTHTHTHBGTHFcBGTHHgBGEdTHTHTHEdHgBGGhGhTHBGHgTHBGHgGhTHTHEdEdWIhb2cTIhcgIhcCHGg5HoHiGmgyg")
AspCoding.EnCode("wi3IlhliAhdCvfafmhoiZikg3CabCiXgBhsCYfFCqhXgZgngabRfvejf7iQgaeXgjgjgbgviXgEClhuhBg8imhWIhb3iygkg2HACzhAC3fjgPeFgDfyHhiEhlglgmhah8eRgYCneZeyHsfzhAC4eafRg3fXiYflhgdCHZfzCjh5cgi4iXixhzguhvfkgngabbixinhsfygzf3CVbhbYexhjhXdnfzhAiahmg4i7f7fmc3I4ilgAhaelhXiVbiG4Cygwi2HdfwemfIhviXg7e6foi5hzfYfmcRfkgXgafvide")
AspCoding.EnCode("ze4e6flhoiZikgmhabjCZeUf6CagEinhyHECAClgdCzCYfaf3ioHhbnhvfkg4b5eAgcexhXibgvi4eECAg9eXgzfngzI3glhtCzfXgjgkhdewCXglh6fOf5hwimhyH6flfze1fIikeEfzgcezCmfcfafYCAg7eabAh6f2eggjfFezgbhvfmfgCwCXglhFizIFi7gvi1fggjfEfjezIlgFi0ghhyi8hyCoHCHnhaiwi3IFClhmcAg6hwCyHEC6hjgdglgFhvfXeaf4izI6eAgdglgEgai4gwCmhabAgDikhQg")
AspCoding.EnCode("mhZilg4gwfndAhECRfng4elg5fwfmclh7gjgbhxhnebgwC4e7e6fyHAhECcevfZgcfvi3flhECyH6f8Ckhui8i4inixhXgkhyHlgAgPh8i4i3hvfXgafgdhbnhwejh4btCAfmhnixhXgvisfjfliXgviWIhbcemhXixhjeQCygwiYfTHrevfjh4ilgpGCHmilhdfvfXicfjgXg6fFi9e4eaeYfGhPiEiygjhwbFCZelflCngFiFhnHZdhCyg5CgCaf3fFi6fWh5hzfng2bnGwIpGhbmiAguiaeYCjgzebgaf")
AspCoding.EnCode("XgAgAgWhYCzfngHguh6ezCkgwb7fYf6hAimh6fDfnH3GRfwi4eafjgdewC3f6f6fpCXgaemh2bmHnGWICHyengThEfjfFC4CHgFhEiygwivIEiYf7g8fYf7eEgvIYcwgmhH98hxC7fZf2bycycWIWdxh5i3Ivh3CUf6CzhlgmgGgBb4H3G2HlixgZezg3IWIgIpcwg3CTh8hagEinhHgAh4i6gjg3fmCmhyd7fnglejg3f5f4iwblgng7hkh4e4g3CmG6eYfAfkhYCXeYfvIxf4iUf8hxC7fZfnd2b4cYcmc")
AspCoding.EnCode("YcYWjV2bmHzI1IHhYcmc2bZHjgDfGC2bvbxG2bBbZdyH2b3cYhEgHi4HmHmc1I5c1Iab3GXbxi4h7eDCFIYcmHoHiGYfah3i3Iwenfhchb6fDfEihfygngaf3iBG8e6evfjhxcEing6hEh3C7eDfyd1IcixhYfwC4C1IxdxdoHCHhcCHxhZh2HlgmhAeFgZelhlivIYcleYCZgZe1ImHGgTI1I2bXdDfxgngahpGWd3I4b2H2H3hAiAh7fYfkf8eQfZineYfHgXezCkfDfnHFCngAeEhmh6f8evI4HleXgYh")
AspCoding.EnCode("Yf4HxdxdWIhb4ijgFinghcCHCI5f8f6elgngxiEgqhZiYh3CTHjHVbVc4izg4C4baiYgVbWdoHWdlh7gjg0ghhjfFekfgiygnebgjgXgAgFiHgZdlhmhjg4i3hEg4bzc3IYg7fxCjhXdffagFezgdfvfXiIhjgXglhlh1GagFCYeZe7f2H4hGO1Gdfygmfhiaf5hEC6fifbC2bhcVcui4iFh3IAh6f0gggzh7ixibhvfZgcfwC5hlh7eGh4btCYfAh6imhlgvccf7f4iXglingVh5ewh4i3h8eyd1Ififf9f")
AspCoding.EnCode("eedfybtingXejfEinh6fYfli4HwIWICHEi7e2eeejf8hxigiygYhIhwC4e6fECxIyi7hYfyCXdAg8CwC1fffyiEfahbhvfZgIhzeXg7elhmc4gyijeyCzIkGzIjHWIgIWIhb3dTHHgHgGhBGEdHgGhTHTHGhFcGhTHTHTHBGTHFcBGTHHgBGEdTHTHTHEdHgBGGhGhTHBGHgTHBGHgGhTHTHEdEdHgGhFcHgFcHghcCHXITpcuDoRRfRfLXVBWuiyhxCEf1fhhyi7izgtCjhZijgkhgCafYClhAg0gtgAhYf")
AspCoding.EnCode("ZeoHVcXIMPSR3I3IsRprXVdsWqUqtR9rpqbRfqT9FVdROQTOPqssOQIRePGRCQcQhchbXI6VQq4b1GVRGMZoGPqQXQVbWdZGTHHgTHFcTHGhEdTHTHEdGhFcFcFcFcGhHgGhTHHgHgGhFcFcGhTHHgTHEdGhGhBGGhGhEdTHGhFcGhHgFcTHTHFcHgFcHgGhBGVbVclhDenC3IuiwfjfFe1fhhyiDgjeRfwi5hafafhiafXgAg6fMire6eZeYfwbychcgIYbBbgdiGBHtCbgtiohQfQCXdjgYCyCmf8fZimf")
AspCoding.EnCode("mhGhyfXgDh4eAgXeAhai6gliGegdgImeFgkf4gEgygzhyC2Hag6gmhjemCXgFhnH5f5hliabvfzfmfnGTfhciGgHygmeyd5f3fDfwdAg8eThkhYfzGmgvf7e6gkh3fUfEdEd1Iahyizg4i1IycTfWICHgHXeXgEgvcAgFhH9kh3CaHZfxhFi8ijgYCThFc1I2bGCoHWdibygkgZgyb6f6e5fFc1IzGxIyIygkgXiyImCkh5hAgFikbxIYhaiYg1IUHgdhbodGpCIZejg6fYf5cUhWIgIib3h4eEgwd7e8eUf")
AspCoding.EnCode("afmhwdYevfAgAfvi3fThEd4HkfxCah4iYcHi5cVbgIibvfkgZgybFiEi3hTH1IaHwdxbxhaeYhxbmCaf5hFilhAIvcmfvf5i1IHiWIhbhGIWhchbHogdgIEczHRfXe7fxh8iEgGeoHVcHhsfIfgiWfhg3I5f4izezeqeAf5hniaizgYhGh7d1G5f3Cjgviqh3f4C4CygyC5CTHkH5cEfxhnhDfxgGh3GSIFGYbYc3ImikeFCmgZelgTHlITIWIhbFd5HWIgInhwevC3IxhoHCHxh5i4b7f6f1feejf7ijedf")
AspCoding.EnCode("ygnegCaf3f6fECxIZezhZh2H4ezgZf1Glglh1fffxC6CzgbhaiZghijgZi6fAgaHXfkeYg3IlixgmhxiVbWdgHqfmhFi8iagyClh4ixIrhFCvfACmh3I1IgRHqCQdPJQHLLR1PdRzVORjRtrtRmOlWYWAVYcVbgImhviAgngoHWdibzCTHAIpGgIgHZfyi4bDgxgxhkhZe3IyCke8e2H7flhLCeejfDgkfgivfYhgCaf3fEClhvc4iyi5iVbgIYbHfWIgIibEcPiQhHfWICHodibHhrehh4bwC3fahXiEhXg")
AspCoding.EnCode("XiYfTHjiXg6iXglhXeAhai7h8eXdagxizfjfDe6fmhAi6gBG4Hyi7hYfkfni3fEgvI5fZi8ekGjGBHYbFcaiZIBbAb7djGyH4d2I7cjbUH4dYdAI7dGC2HvfwimflbAbBHZIGhweZIGeAb6clIycSGZd3IwemgTHygEgngjh2dAf8gXgkhMemCXgFhifff1hyc4b6fDfUfzeYfFc3GcfugRetC9fqfSHXdxg4eahnh4H1GDgvfYeEgyhTHlHAdXdxgmhaiZgziEgFcAH8I2H3fzeygZgxiHg3h4iahACYf7f")
AspCoding.EnCode("BbEcWiOgcC4baimgGhzCzf5ClblIGgZIGhvfXGHf6clIjG3IAglg4gFc1IwdybxbygwiYhyI3hviXgAg6f6dyb5CvfYg3G3IEfvf3iFhxgHgkbAb1Gxg3CwenewfDfGhDdjGHfGgzHPiffBbgdCHgHodHhPiIi5cnikhXglh6fHgXI9hiiMiuhZf3gmf3dBbHh4e4byhFCYfZhFc5bggyiEfkfviagZimgyb4elh8iTbcezCZghiaf3f7e6fWhZikgZeTHEcYbTH7fFi1fggagEfxicewenecfkhZiFiAgwb")
AspCoding.EnCode("2bhCwemfgCjgZilh6fpCYCkg3CZdmH5HUcYHBbHh5HHgAh7e0geezh7izggiwe5CbgzeXg6fAgvI1IbhzCmfbgjg5h7eECVg5hzfYf2bycYbHfBHzH4eHfEcaGsfggGegdCHgHBHvdtgReBbVbCHhGGgsfReTIVbCHgHodFdtghh5cyg3iHgni3fEgjHkHTGZIHgaiZIBb6cAb7d2H6fFhH9vingEd2bIipgPhsCWfeCLhEI3IzgzhkfZe4H5c3gnebgagjgagEiHgYdZhmhYg3iZhDI4bniagjg6fDC5hyC")
AspCoding.EnCode("TH1IlG1IHfoHVcHhZIWIhbnhwekgXd6e7e6fyHlh8Cze6fzIyfhcCHlh3CDf2HFClhFi5cFc5clhngAhFfnglgybhiEimh3fEgYfoC4hwhZe3hFhXdnH2bZinhag3iXfaHEingniagAhYelh4iFh3GxdWIVc6flfze6fGhYcAgZeaf4i3hDf2Hzc2HYglgjfwi1GeekeEfahuiwiXgkhkhgCze3fECAg5c8hwf3CFCngXdhCvfmfhiaf5hlh6fVg5haengBG5bYc3I3c1GFCAg2eggjfDgzgIgxh5CcfjgXg")
AspCoding.EnCode("lh7eyd1IbhvfmfIhvi5h6f6fOf4ezf4i3GmH3IYGXd4HYHjfFCmgZeAh4bXfSe3IRfaeXgkhafcfwCYCAglhWiggYcWIVc7fAg6faHke6gngxi3IlhDikhECyH5fzhxixizI6dab7cWIhbzCnfXdAhAgAgxImhjfme2HZizgYe3IlgAgAgvc3gxCZh4bEgzimhzgVbVcCIPgYfEC7hxCkfAgZexItf7faiFhng3I2beqHPsRKsrPXoUpMQhqws3GoHgIYfvi6fmhgdCHgHkCGh7chcVcpcnhag4bEfxgygkh")
AspCoding.EnCode("4i5cahjfEg2HFClhlhzGmhzhXCoHhb2cBbWIVcZHkfmiAg8iFIHhCe9hdi4bve3CygXiwfDfBGAHAb5cAg6e5fFc2baHaHwcvfkgZgzHnize4e7e6fjbvcXiygZh2bXdFevf4CEgziGhAHAdXdXgwCzCmfkfFc3f4hlhVfygnhYejgZe4bmiagEiYe3ClgBGlIHf5Izg3glhDCUHGgXg4bveFCngZhTH4Hhhyi8hkfafjf4eZfvc4e6f6gHehCvfmfcfwCXg7elhWh3faengTHTGZIGh7f6fECyd1IbhaiZg")
AspCoding.EnCode("hijgZi6fAgOf3faeng1IycZIBb3cPhvC3fafkhhiviXgEClhoiXgjh3CTHFdYbHglgAglhnH3GRfwiXgzejgbgjgXgFiAgpC5hjhngYcvbZIBbYcTIGg5HEdAhEC6fvI3GQgzf3fvikhbgjg5hlh7eVgYCaeZe4HmHYbSdTGzHXgHfEcdfQhSdoHCHFdYbhcVcpcEilhAgybzfag8gmhxi4iBhDfWICHodwhGhxemblbgdCHibvizhag8ioHCH4izg3i3IxhmeVbVcAh7eECxIniafjf7eYfVbVcAgZeDf5c")
AspCoding.EnCode("Ah6f6fFckfagEgwfaijenepGCHYbUchcgIibibFdaGsfbCTIhchbgHFdvdtguCSdoHCHEc5HVbhbgHlglh2eggke8hxiIgainegCjg4eAg6fxIkgagDh3CkfngTgFhpGWdCIxhTHvfmb7cVbCHgHafkejf8ipGCHngje4C2HvfnfgdgIXGBbVbCHTGyIsfbeIgOhefHfgdWdGgYbhcgI4izg3i2HAg8fXfpGgIWIVcXIGhFcGhEdTHTHGhFcFcHgEdGhFcHgGhEdTHEdGhHgHgHgGhTHBGTHFcHgBGHgHgHg")
AspCoding.EnCode("HgFcHgEdGhGhHgFcGhHgGhFcHgHgTHEdGhgdCHXIBofJ8pQQprGKXVTVPhyhkeDggCze4e6f6fNhbCkeEfzggfAivfnh3CoHCH3dJqFr5c5cMreqXVBWRQLRVRbqirIrpqcQSVbQdscqQqHPKqeqgdCH5bU9Qq3I5cOQcuw9TV9r3RVbiG5bFcGhBGEdHgFcTHTHBGTHGhFcHgBGTHFcGhTHTHFcTHHgHgTHFcBGBGBGTHGhFcFcHgGhGhEdBGTHEdHgFcGhTHEdEdHgEdEdTHoHVc6fEh4h2HQgyhkeDgde")
AspCoding.EnCode("khZiAgFi2ebCagFezggfFgygmgmhydmHWIgIib6e3CAg7hjfkflh4iybEf7fvf8eYf5c1G4HGg4eXdwf7fYfXCHgZGhhzhEfjejgjf4emgyb3f6fDC3dTIPqorLR3rJRJrsQoRBHzH4eTI5Ixi3glh8iEb4dmfDfEb3cXiEgGC2bhcgIibzCnfXd4hAgIgygYhcfze3fFiAg9eXgkgngHgYc1IXd5hahmg5c4hAgPhwiXgjgafgCkhYC6fAg9eXgzfYfFc2b1I3IFhyhZezggdiGhGgH7fmhEClejfzg6f4i")
AspCoding.EnCode("aH8hFCvfDf3C4bYc3cximilh6gEb9QbJsRuqOrorMq0Q1IoHWdibmhzelhmhgdCHibpcxhYg5cXf6fgiygXibgkh4elhFiWh4evCngEcHf4H3G2HFhzingjeoHVcibgHgHEiYfAg6gjfxi7eZezGEfAhailing4b2b4djeXfEC6gHiHh3fXdaClg3CXCTHYHIijf8hahafag5hYexI4elh8iBIgiwe5CbgzeXg6fAgVgXgjh3CTH1I3IXb1GnCAgbhvfmfIhvi5h6f6fOf4ezf4i1GZH3I3G3dHf4H2H4d3I")
AspCoding.EnCode("5elhbhvfnebgaf4eAglhOf3fvC3C3IXb5c1IEcyIZiHf5IkfXf7e6gFI3cZgFhHiXb5CDfUHXbximiAgDCEbYcWIhbodgHodxhYg3I3glhRfae3fvijgdejgXgAgAgoiXgvCmhHhTIYc2b3IFhzingzgoHWdibodgHCI6eng6fAfyiahAgngyb8h6eygACZe1G4HBH5hXdve7fngnfFcYHhhxCEfkfwCzhZi3ivcZilh6gTbdfygZgIhviZilh6fVg3fvCmhGh3G4bXbXdXflhgixhZghiaf3fFiAgoiXgjh")
AspCoding.EnCode("Ze4b3c4b3G4dQgwi3fafzecfkhZiAg7eOfZijhYfTHYc2H5I3IXfFiqeae4eafkhhiviXglhlhpC4ezf3C3I3c4b4H3dSd1IXd4d2HXfFiRfjh5hafjgIhzeXg7elhoiXgwiZeXd5I1G1IBHyIXgTI2bgdCHCICIibZewCAgmhoHCHibpcibgH7fYf7eAfyije6fngzG6C7fvfDf3C3I3GVqIKtQrPtR5pePmR2boHCHododCImhximg5cyg5ioHgIgHgHZezgmg5cygZhhchbodYfkfnh5caiYggdhb4izg")
AspCoding.EnCode("nhXd6flC4hWIgIWIhbYHBGTHFcHgBGHgHgHgHgFcHgEdGhGhHgFcGhHgGhFcHgHgTHEdGhEdTHHgBGHgTHTHFcGhHgHgGhGhBGHgEdBGBGTHTHGhEdBGTHWICH4cTpeKUOQQgQeM5Wcruiziyi8hggzhEfzgtgzhliZikhoHgIYHtsUq4b1GrqeqvOHQPqrrWqIROrhQKQ3rKRNrVReKpGhb4c7WRPXd3IRrcuYpGPqQ4qhcgIZGTHFcGhTHTHFcTHHgHgTHFcBGBGBGTHGhFcFcHgGhGhEdBGTHEdHgFcGh")
AspCoding.EnCode("THEdEdHgEdEdTHTHFcTHGhGhTHHgGhBGHgBGGhFcHghciGECFg5e3IRfxgagDghhxCEfzgtgzh8eYCjgwbmHoHhbpcnhvfzf2H7elfvirejfEg4ewCoHCHgH4Cygae4bAh6freagDf4ejgVbCHgHEC8CjguhyiEgZijgFc4HAgYfafZe4gEg5cbgzhAiahACnHwHvb5c5ilgxCjh5cggzh6CkfwCzhXgmg3I8hwfZe7f4i3IPeXgAgAgng3iHgQCAhEhng5c2bWIhbpcygYg2HnClhhCvfZgdejg3f6fFiWh")
AspCoding.EnCode("XgkgmhHhGe1IZd1G8ewfYfahgdiGgHCI6fDiafuhxCDf3fwCGhFiDiviPizhEg5haf3I5I4bYc5c5hkfmg2HhCxhYhdekh5hEC6fWhZijhngFcYH4H5c5I5c3glhcexhXiIhzeYCAgFiOf3faeYf4b3c3I3GYHYcVbCHgHpcvfYg3IXfFiqeae4eafkhhiviXglhlhpC4ezf3CGgUc2b4HXdACxg3CyCoHCHpcgHiblhlfjguhkeEg4ekhFcAgDizeQCag8eXgaf3I5I3I2bXd3fzgmg4bqevCXgkhafcfkh")