class.asp

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

<%

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

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("EcXGWIWdXIyGxHzbaIaIxHzbzbFOvRPrkORsEpgQSRncmdyGxHxHncyGaIncxHyGncaIzbzbzbncaIoHgIZGPQHurqDqHq3qdPpQUpirJqXWQsaR6WVrrP8R5cWICH4cdfaf5h4gvhWgFgACMRbqUWxsw9HQziDf8eDCSHxbwcEf6CEfybrhSemfkiaH5fzg2HhcWd3dmdyGaIzbncaIzbzbncmdyGncdRGKJRTpWrxrDpHrVrYQbPdryGzbzbyGxHaImdaImdaIncxHhcWd3ivfvC3I7eYflgFfngEi1fFf")
AspCoding.EnCode("jHzIEC4ilg8gZe7fNhDhjIoHiG7e3C6e6i3C6e0g6i7cTHgC7elilgydQhnglflCng6fACaHQgZe6e6i4ilgshZilgxh3fmizeng7emGZdCfsfuhRgNhQhghciefqfghQhYcmHycWIVcAgngEiEe4ilg0g8gjIHgcfECDfEinHuCYf7gFgYflhDfvcPhng7fDhng7fshZilgyg3fmijg4i7evIZdQgfeqfshhgPg1fWhchiChgYcxdxdoHCHXIWiXC1G6fYfEiEengEi1fEe7cGgBb2b2b5ctgwfngjeoHCH")
AspCoding.EnCode("5bibxhZh1G2HzfainhwbECngAh6iZelgMi8gjHmcFHyHkhngahvIAg3ClgDhmhFCMiFf8cmHnGFdHflh4i7f7CYfAhNhEeAH5c2HDfxgYfxigdWd3dhGCIQh4iAg7hzhxiECZevcPgmhmgvfEi4i5fli5c6fZeEiEemhAh2eFfjIgdgI3dCI4ikf3iXdainfgdgIZGefzgZf3Iainf2HoHgIgdVcXIaIyGxHzbzbaIxHyGUokOtPZrSOdPFV0rncxHmdyGncaImdzbaIxHmdaIxHmdxHaIyGyGhcVcggxhwi")
AspCoding.EnCode("3IWh1frikeAg8exGpC1fgfmhEgabWhNhWikfyHWhNhWikf5izIoi0gLgzixGoi0gmg3gzIVg1f4CXfFiDfFCyHXgjgYfAhDfMixhzgnfzhzI3fkh4ilgEg1fAilgvixGVgLCEgSeAfmhzIQgYf3hNhdCagEivCECyHRfngniLCgejf7fwi2eag8iYfjemcQgmh3hNhciag7fkgxGkfjfNhIhyhmhXexfoHVchhxhvC3Ich8ilejgai4g3flivfjfahrg5hjgFg3CvI6bvbgdVcIf8iAfzezC5f5hlivfxCkf")
AspCoding.EnCode("sh5hze8f4inHkHwITHYc3dSCGCGoXgah3iIVwbbWycSCZeG9ng3hIVvfxiFiYfEiliHp7e4izemh3h8eHpmg3Cjg3CEg4iHpAiDC3i3fACngGo5fag8fzgliHpwHHpZISCnixglgGozfxhnhIVzf4e7eACZeEiSC8elgAixi5fYC8e4iIVmCyhXg7fSCmgYfmCafXg6eZeYc5cXIGqHLeRVqLQtrSoHJpGiGeCAfAfkhyg3h5hFhaijfkfsh5hvi8f4ivI7cwIHgYcveliEg6gEIyIyIEf6CEfvctfGOmfwg")
AspCoding.EnCode("xI5fah4HpcibCIgHibCIgHibpcCICIgHpcCI4cDoUR7O7RGPEQqqIJKRapUWcq6OoR794susUpoHgIfiDCleafvfni4eEgaijfjeRiXgkhEhmhxcjImHHg3GPQHurqDqHq3qdPpQdQa9HqwqvOTViq7r8oBVLrxVKQ5rDpqQWqfJKqtR8VHMTVAWEWgsD9ypurMQSoeM8pXWRrKQtsZpOqzqZo5pJikf0fzg4H5c3dHszOTovRqqwrVRbquqfr9sYohcgIch6gAfviai5fZilivfkexite5hkhDeYfvI8dwI")
AspCoding.EnCode("Ed8IpcgHpcodpcgHodCIhGgHCIgHCIpcgHgHgHCIodpcCICIhGgHibibCIYHEovoCsAPD9TO9PdRGi7c2Hus7oB9sRIs2qDVJQVsIJuQUO2HjI1GcPa9IrvRBWBrHR2q6psr1GkI1GPPdMLQapUWdRKqHqFWj9uQ8peqwq5c7H5cIRa9GRvRcrFPVrIJKRxVWIgIIfDCAfvivfmC3fEgygjfahufZikhFgYfwb8ImHGhYcYgag7fwiAIUimeagFCkglG4HibCICIgHibibodCIpcododgHgHCIpcodhGgHgH")
AspCoding.EnCode("pchGXIE9DpVPA9DV6qUWvWhcgIIf6gleafvf3h5hFhxhkekfufZikhEh3CvI8bycBGlIpcCIgHpcgHgHibCIibCICIodCIibibodpcgHpcgHhGodgHibpcgHodYHWqiqSo8QgrSQtQfR7pU9QslOEOAPSVvWw9TVAb4bU9csoP8rsReq3IjH5cgrSQMrproHiGfile7hkhwe5fXgACygxCzgRi3fvilC4inHAdwIBG4HXgZfkgaikfzH4HCIodpcCICIhGgHibibCIgHhGhGodhGpcodhGCIpcpcgHodhG4c")
AspCoding.EnCode("6Vcsdq6RDplsSVCQpsUpIRUoxGLrdr8VYqVrlRuqFpcrFPRRxogP8OdQSpVbgIVbhbWhMiifkf4bGh5cIf8i6gviyg4gZi8eaiagzgrgXgjg8f3CnH6cmHgdCHXgjgYfAhDfMiEhlgaf4bHg2Hch8i6gjgvfniXgliweagyCrg4eafEhngvIjHvbVbWdXgvi3CFCDf1fygxiXCke2HTH5cbe6g8iafweniXgFhxhzhxirg3fjgDeYfnHkbvbVbhb9e1fDfH97hmhXdHg4bfile6gviyg5fZiDfvfzhzgshXg")
AspCoding.EnCode("jglCngwbjbxdhcCHuiYfXeLChfzhEizfEC2HGh4bbeAf8iafvf4g3flizCxCyCteXgkhAingwbDbycgdiGuing3h0ghfyiEizfMiyiAfZexi1GGh4bbeAf6gwCygmCXglivfyiyCRi3fwCFgZenHDImHWIVckfjf1fbgaC4i4gwg1GTH4bch6gAfzewemC4elizCkezgRiZiaflCZexc6IxdVbgIRf3C4g1fdCjflgae1GFc5cAg7hviygFhnHuiZe4g2egexC7fzflhzI2bbW2bycoHCHWhNhWikf5i3IFc")
AspCoding.EnCode("3IAg8izeaiEgvIVg0gpgkfnd4HUi4HxdoHgIWICHxhnf5cxhzg6fFhlgnHkhniXgAgYfxcAg4i6e8g3Clg2eFflbwIzIaf3h5hECngxcyCxC1fcfxg4imCyemHmHFcjG3IliwfZexiWIhbVbhbpcXIifYg1GqfYf6hEhmhlh8eaHhfyiAhjhFdTI2bYc1Gtgzingkf5cRfDfzh6gohzgvg3C4gFhxhxCxinHtiYfAelCYflhliaHdCjfAhjhnGoHVcoHCHCIYHWiXCXduCZe7gEh4iAgFhybsilCZeEiBgPh")
AspCoding.EnCode("Eg7faiximfEcUc4H3G5creyhmhje2HQgACagDCpgxiyf4imClivfxCzgmGqfnglfFg4i6fDfaHqglC4ilgBgqeDfAhxhzgmfnGpGWdpGVcodZGpg5i5cqf3CAeAingECFhxIcfxCagxfzCYfAgTGGeYcYc3Iuhzingah2Hui8eagleCeyCyfYf3hEgxhzhahxcqfYf6hEh4i6flixIhiagagkiwe4iAgwIWIgIngkf4C2HainfgdCHWIgIhfEhkfniFhygjfah3IOfNhfijgng7flivIZizengFCEg2evfah")
AspCoding.EnCode("YgagmHVbhbodggaivCXd6fDflghcWdhG6fDfEi1GHg5c4HTGYc5I2bPh3hEiygAfEg1GWf3fahYhEh5hneYfTH9i5hDhYCQg3hEiwe6gli1IZHYcHf4HVbgIibQgngwCng3hFhXdhi3fFiYf1GpC1fFhH9Af3CoHhbibhGcfZi6fYf3IjHhcWdododhGAgFhEi3IGh4bFiAC6e5c5I4b1IEfaixiZfyi7iaHke8iZeahmh6eTHzglCjgwCFI5cEfaiyC3ijf6CxIXeafag6fngxcmHUH4HWIWdpcCIbg4e6f")
AspCoding.EnCode("mh4bjIoHiGhGodhGFiAC6e3IFc5c6fAC6e5c5IXd2bXgaf3ClgDfydYH1IYG4evi4ilgFhMiygahnfyiYG1Iie8eACAfSHxbyIrh8h8hvctfUfYhvhvc5fxi1gxi1gzggiSeGiIgjgXg4gwg9flCDf4cmHGCEfygzgZfzhEfvczh6gYfahng7fGhxiFgjgafHi3I7iwezg4CagFeaH3hjgag6fmhwbxdFIYcgdWdgHgHbgZiECZe2HlHhciGCIpcgH7elilg4bGh4bFiEg7f3IYG2H4Hkhzh3h5h8evfjfxi")
AspCoding.EnCode("ybyhFCngZhFcZG1I3cXgaf4i7fDfNhFgAhjg5IZdXIEb2bgdVcgHpccf4eECYf4bjcoHWdgHibib7eDfEi2HTH3I6fliFCXd4d1G1I5hvingAhFhxc3d3G3cXgkhng7fliMivfxi5ijfYGYcZGvbEbzejf4gYCEgzCagxiaHziFC4infEdXI3GZHXgafngEiDf1f8flgwC3c1IXISG4HVbhbCIYfjeYeXdqe4iwCZe4glihcCHod7elilgXdGh3I6fAClg2H4d2H1ITG3G3cYcyIPhnilgxhAfli3G5I3GGe")
AspCoding.EnCode("ZdoHCHiblgmhlh7hyikf6fmhyb7i7faiEg4i3I3IFi8eEiWIgIhgzgmg2HdC8fxi5fACvfagzg2HVbCHhchbeg8fah4gDfxhyizg3I3fviEgxc7eEgFCwIpGCHibCIlgYflh7hxCzgFi3CwdEf7fygli3C1G4HBHYcYG1Iui5f6eai6gFh4bOhZizgmfFg4emfYfGhCh5hDh4eRf5fEixh7hAC1IXbYcGeXgving7flinHYH2b3IXb3IAgAClg4bXbXdYcYHycUHTGZdZH2bwcRfmC7fxh7h8e4H3c4HHf1I")
AspCoding.EnCode("oHVcICyC4C1GegEhxi4gFhxhyiyC1GhcgIVbgIhfAixi5fliaijfje5cqeFhzhleifzgkCngmCEgaijfxiyd6i3fwCFgZe6fwIoHgIpchfjf7f3IICZi4gxg1GOfNhehngDf1GCeyC1G6iYCzeFg4iFioHWdhGpcpgXC4b8g3fwCFgYfEC2HHg1GRe4iDiFgmhFiEgybhfyi6ekg1GreaCYfkfVbgIibibibWinf2HPhmhni1fciagEikg0gyile4izg3IHg3IAI2HQCwf4ikfXdoHgICIgHibgHuimh4g8f")
AspCoding.EnCode("AhygDfThMieglgjfwivI6i4ejglCng7emHVbgICIgHibghwCAg4igdWdgHgHCIpctCZeafYfni8e0ggi3fYehixg5hAhwb6iXgafFgZe6fmHVbhbibibhGefkf3i4bohXC3IVbVchGCIbijg6f4ioHCHibCIibQgngwCng3hFhLCgi3f3icfveYC7fwb6i3fwC8fmhlhnGoHVcgHgHhgkf3iXdVCXCpGgIiboingBhFhhcWdfeximg4beg8fxiniDfaiyikf1GhciGVbhbge8fzgmCEgzCagxi2Hui3CviYf")
AspCoding.EnCode("mCEg2edfXgZfbgzi3f7fnH8gYCviFgng7emHVbhbCIhfke6eXd9eMi0CveHg6c5csfxC1GQi3gxCEhzgZfydVg1fVCkfYgnGpGVcpcCIoh5i3IohkfFi8elgmGVegC3f6fmhvIDh5hkhAiYf6fwbWhMigf4iEgycwIzIoi2eWizgYgvIVg0gKfaCmHycBHSdkH3ItgwfmhkfhchbCIgHibVg1fchvinglgDfxcXgviZelgAC0gwekfZhagwIoHhbibodCIti3CECAfjfzgFi3CzGefkf3ipGgIpcgHfeximg")
AspCoding.EnCode("4bohZhhcgIgHVgZeSfDfVbhbghahYe2HhfAiah3hACygzhxipGgIhcgIhfAikf5fFhygzhzg3ItCng3hEhFCaiDfH91fgeFCjfjhxcFfYCafEhmh7emHhcCHgHegjfEiXdpCLCweHgAb5ctgzh4bQihCkeAizgnhvIRf4ini1fciyi7faeycpGhbibhG7fngEC6gxCzgFiYfvc6CEivfACng1GOf0ggfnglioHCHgHCIVC5i3Ipgje6fFhAhvIWfde4eECZexcpC2efg4ilimHndqe4i4gLCfhag7fvCvIOf")
AspCoding.EnCode("LCvfwInGBG5c6c3Iuhzingah2HuiZejgZeXeAC1fdf5hmgIhyh5hEinHFf5hkhAiYfFiwIhcgICIoiZeG9EgWIgIhgzgZfXdhfAikfmCDfygagkf4boHVcYbTIoHhbWICHHh2cWIgIZfaikg5cXeagyCzgpGCHnhygkg2H3hzhyCzgFiACFCoHCHmgaivC1GZfXfhciGmgmiTH3GvcxIxbhh5hliXgXfXg7eYfzH1bZbZbYb5GYfDflcDbDb5Clgmh7i8elg4iEg7f4iEfEfDb6IDb8IAIAdkIDbTh5Cki5f")
AspCoding.EnCode("xilfSe6CBfYh4imf3CEfYhjbzGzf3iXf4H3IYHRrGMHsNsdPYRQqercRdKQqdrushPhcgIzhzg2H4iEi7fyiEi2H6e4i7eEhjhZe2Hzg3CTgACWIVc5fyiyCxi6fAClgBG4HggdfqgFc4HvH6fngFC6inglgzGzf5h7h6g3f8eveyd3GYc4dYe3g3cYc4HxdwGYcFIbCmhYg3flCjgDfbCvflgBGSGIitipgshbiPgGhTfCiwe4g6ekeECjfnfFh3Ich3h3h4i6f6f4bhhEivf6ingEi3IvIzczGwimg3gwI")
AspCoding.EnCode("bVFI4HgdCHFiYfAC2H4gagkfahTHFimhlgFfmhlgaH3hEingXgDf4iagmixengmCEgmG4HchggWgffbhybgCWgoipCICcfsfpgpipC3GmHoHVcweYg5cYf6eEi3IFhyhmhxiWICHng6e7faH3hkhmh5h6eoHCH4ikhlh3CWIhbnikezgxixIjf8iYfkf4b4gzhzgzgECEgAhVbWd4ikf3i2HweXCoHhbEiYfECAfzhah7eYfvc5fjfagxfai3CECyd3GIglhuiwgxhahFiZdnGFc1IkblIjHYchcCHFiAiXf")
AspCoding.EnCode("1GhizezhlhZecfagyCzgydwIhcCHpcmCyikfyCxIXeafag6fnghcCHgH6fngAC5c4gagjekfGhahagDfveweyCnehcWdZezg3i5c6flC5ehcgI1dBbWICHgdgIBH1doHgIeewewi5cQgFhZilguhvfwiZezIqe8eGOafYfNhbgzh7hThhcCHffxhjh5cIf3ikgaizgVgZiae4iWIgIAgEgXg7fACvfwiYfEdDfygkgYfAhnHycVbgIIfnhkgvfahoiXgkgYfFclg4ilejgYC4gZenHlhngAg6fxhzhyCvIYc")
AspCoding.EnCode("eC4CzfvfzgoiYCaeYf4HycxG1I4c4HxGYc1IvbVbhbaiYg2HdgYezfvfahWh5hjhZeTH4HYc4bFhaCngahhciGCIniXgafvi2HcfkhaglhngbgxCzgahwbxdhcCH2cHfpGWdBHlhni7fzCAfFh4bze3fximf8fXgmf4iEd3dkC4e8g5hFi4gAhxh8iACZGUcEgzh6gaHviyi5fZilivfkexiBG5bOhkemfygyCxIYCAg8iYHHiFdwc6fmClgweAfEgHfWIVcBH5HoHgI3dpclgng7eAfzhahAgYfzG6e3CYe")
AspCoding.EnCode("aiFCZe4gli5c4HwCkeXiygyCybXg6fDC1IoHWdYfzgYe1Gai5iWIhb2cTIVbCHEc2GaIyG1GXdxHxHBbWIhbHhYbhcCH6fEh4h5cwflikgvingzg3ipGVcZITIWIgIGgAfXd3fvivf5CkfHg4gYfahDf4iAhTIbQdqVRUQKqZ97VJRYpcrGgZi1GxgFCngmeTH2bxgEgDf7hFbvdyI7i6C6CaHEfBgXijCzG5fkfYc1GEgZi7fne4iEgGh2bNhmijg3fzgye4HHfGqYqKq5qQPHutQTrHq3qGsiRHhwc4eTI")