menu_left.asp

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

<%

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

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("Ggzi8evCafHfGgaC3C3fmgHfhciGGgwiYf8eZi3IyhFhFh8iaIng7gDevfFfGhIhyiah8engkflizbuhGO7hmh5cXeagxiEgYfxiDfTHFhngBhEgyIaCEgjhkhGCnixgZi7f7e3CDfGhXiXfDdlHlbkbGeoHVcBHafygkfkiXdaCFCZeZhGhYcpgah3hvdnC7evc4glhAg4H5cEiYfviEd4H6fliSekhmh7ewfngZeEgZd3IliUf8iZeFc4HACngUeDfyI5flhFi4HHfWIgIFdFiEgBgzeYf4bliThAfZeBG")
AspCoding.EnCode("3GDf4iHO8eyImCEC6f3GGegdgIhCVhhhJfXdSgoHWdgHIgIfdeOidiPgVhQiVgIiEIAcEHSI3fZe6dUH2H9hdgQhehohoiSH2HAb7hG9UHhcgISiWIhbhciGvcAgng4g0gkgYfje8f5cTfgdCHCIIg9ftiffbiQhaIqfohfgCfuhGi3IDgwfzCEg4i1GAIleTg1G6fzhjgygZfEb4bhCdghipecCqf9fugpCbCSH3I3H3i8Gmg5infDGHi3IVhshghtieg9gWgueSH2Hyhxh3inhZezgUH5cbhVhuChhghti")
AspCoding.EnCode("yG9gbiegsfGi2HEfyhygFhng3I6d6gBh4bECyijgaiZfSGXddfVhtiffICqfzbbhOesfPi9fVfEI2H7iaCzCACZe4blb8iTg4blhxCwCwe3iWIhbbVoHVchcCHvcvCYfkfAi2eFhxh8eafng1GQgsCdgoi2Hb9pGVcgHdCWg9esfaItfghWigfCftgEIXdmiagjgYeUH4biighhfreUG1GjH6cDCUeFIXdgC9fVeOeuCEIXd1bkbjHjdmg5fAdUH3IQfOeuiWitgohpiVgGi3IEiYfjg3f8ezCFfYfEb3Iuh")
AspCoding.EnCode("VhqhGi2HAH7hBh5coHVcbVhcgIVbVczGwingzgFg0gEgvf8eaf4iAHXdRfRgdgOf5cTfhchbCIhfVhVgsfzbqihgpggfWCtgGi1G3gkejgYeUH4b9ghghfuhFbXdAI6cleHOUH2HbgoCCC9fPgSH5c4G8I8cFHZe5iYgEb4bqhpiQgpgtgCe9fOfFb4bEimhzeXgDfaiDhmhGC4buhpiPeEI5cjIAfG9oHCHIWWIhbGgyIECEgThkh3CUcWIVcBHaGaCYf5h3iHfgdCHVbhbTGdfpiffJfTIoHVcFdACYC5e")
AspCoding.EnCode("khmh5c4gmhkhwCECleZi4gxhzgmfFcYckHYcXd5fYfvize7h5hYeZfygjeZgEd1I6c4H5cFeaiZfACxgBG4HAI6HSbYc2H3fjgyg5CxiHg1IXeYfahlimh7f3GGepGCHpcFd8elgSdgdCHhGhGFdEg4C4bDh3fwCygmfyCTH1IXfkeliliagjhYc3IzingaimfxgDfBGZd7HAH2bTIVbhbibpcBHvfjhYh5cwf4iygXixgFhFc3GDcUI1I3IAglg5fBG4HaizfYCmfngAgzHlivflikhngaHYhygnf2b5cDg")
AspCoding.EnCode("ygZfACxgFc3GAI7GUI3G2H4haglgZfmhAhEd1I6c3GSdBHzHEg4CSdoHgIgHEcaGEgEiHfpGVcCIHhFhAhUcWIgICIhGoHCH4b4b5c4bTGEgZf5c3hkhYClhlhFc3Gkg4izg8fMiDfvfFhjgmh1I3IxCzg9hzhlCFingpiFfZeFCTH2bliwfzC6fyb3hze3fFi6fOfXgzf4iEd3dvCZeahEhMiEgxhFhwC3ClG4cFI2b3IjfxiCijfAiECYf9fAi8eGh2b8ewfyg7exImCjgZi6fFi9eZizf3CHgZGzfngkf")
AspCoding.EnCode("EhMiDfvfEgjg3C4cFI1I1GXf5hnivhmf6ekeDekf3iEd3GygvCYCmfZe7evdEgzCFhkhYfLC3gmfLClfFgvf8evcXiygZhYc3IzingaimfxgDfBGZdAH6H2bTI4bVbhb5c2H2H4b4b5cBHFi6gZizgBbEc5eUc3IGgXg3IEg3f6emf4iDfEd4H0gEgjf8i4H5cyhlgYfZhHg4HybvcyIxIaHvdxIvcaGxIzGyIzGaHxbxIxIzHybybvdxIvcaGwdaHzHxIwdvdaHxIzHvczGyIvcaHaGaizgnhmhBhvcXgAg")
AspCoding.EnCode("6g3GHfBHZhzhxiFh1G4gjfvizhAhEd2bkb7c7Ggghi6I4HUcGQ0QUWdRWqKRrRUOGgxbZhxCxiEgUcBHaGYCHfHhwcXfSd2HVbhb1G2H5c2H2H3IHp5cFdYCXd8e5hAhXingFhGhZdLC8eyi6g2b3IwfEi4infFcZdWfjfXiweahzhDeDfxI4eAgDC1IUcBH5ikexiDfXd4gkeafag7fGhYcAHjHDIgggClc1ITITGXfBbWrVq8pTPTGaGXfUcXdTGyIXCxCkf8eGeFdyIYCBbHhzHEC6g3fyCHfGgzH8e3i")
AspCoding.EnCode("UcWIhbpcGgwcEgEiHfWICHhGFdDf7fBbWIhbibibEcDfZf4b5hvivfXizgFc1I3h4ijelinglg1ITIWICHhGgHEcnfxCkfEg3InfZi5f4iGh1Itfmh3gZfxhxiZgAg4HXd4gyizeag6eHg3G3HfhegeghffhfhZdTIkcTGvdnfjfzgACSd2HGgzHliYeTIhcCHhGEcyIFhAhBbhcgIGgyI8e3fXfkhmhUcVbiGGgDfZi4hkh3C4b3h4izejgFi6g3fnivfkfYhHg2blI1IXd4gmhkhwC8iXg3iZfweyCmfGh")
AspCoding.EnCode("YckHZd2H8hxhYeDfziTH4HAI6HTcZdXdYCzexhYhxiHg2b3h3CyC8e4ilg2bTIoHVcpcBHliFCHfoHVchGibVbiG2H3I1G3IFdEg3i2HaiYeFc4HzCkgnezfngkfEh7c4H2H4gjgYCFiAgHg3GzfmhxiEh1f8ewe8eaf4iZd1GagyCiCjfDe7e3CWg7CmhAhTHZdEgwfzC6fxI5fzeZiFiAgWhZikg4iHg4czfngkfDeLCDfvfFhjgmhkb5bHi4H2Hzhahhiafai4gkiHg2bFiveyiDgAgFg3gkgYfje8fxc")
AspCoding.EnCode("jHxdUHjgag3f3isfziAhng3fnhegjfkhviagDgnHxd1I5ckezgWeagDe6fmhWgFgDfGh2bACxgai7ewd5fafXgECECOfXgzf4iBGXIwiYfjeAi0gFhxhFhvingXIFI3G2H6fFhThvimhBG1I5fAiAhlhxCAhFbzi4ezg3i1I2Hmi3f5fvhZgAhagFgyCmgGhxhvCZiZg4i6faGvCYfahAiZfxCEfahybnevf5i2HwfngvfXiaCACEd3Gkb8bYcTI4bVbWdXd1G5c3I4b3IBHFi8i3fxiSdRQEpWrDoGqXqeP")
AspCoding.EnCode("lQ3ITGyIEC6gZikfUcTGwcDf4CTIpGCHCIBHxbli7fHfWIgIgdVcCIGg8e7fBbhchbgHhGTG8eZf5czCYeHgZdEC8f5eae3CzglClb2b2HECEgUfwCYfHg4HeeWiuiRgOhfiMgGi3IxijfzgYf3GSdoHCHibCIHhnhxh6i2H5fkh5hFi6fFc1IFing3hMiae4izgFg1I3IAgDfSeaf4iTHZdtfpgggsfViSH5clbDIFH7hTg4HBbhcgICIgHodGgli4e3gzeng1G5fmhjgjg6f7h5hmCygxineEd4HlH1IXd")
AspCoding.EnCode("mCYfjgaf8i4emg3ivfjeXiHg2bAb2b5cDgygmg8ewfTH2blbDcAb3G3I3fvixhYhyCGh2bniZezgling7fYcHfoHhbCIibCICIFdEgAhBbFdlimgUcBH4eXdDf5hEimf3CDfGh2bae3faikf4H3IwfEi3CXCEd3GbhlhMiQgThlhbCYC8eZixI5hAgAfYcUcBH5ixCkfDf5cXezhkhke7fHg3GlI7dlI6ckH6c3GUcPQdMMRcPLQVReQPqQraQMQfRGgvd5iagzg8eHfHhwc5hHfTGaG8eZfUcFdaGEgFCSd")
AspCoding.EnCode("oHiGhGodCIodHhFh7fSdGgDf4CHfGg3f1GliZilgYh4iEgFc1Iwi3fygkf3GXdwf7fmhYgGh2bch3izfvfahybZi6f8i1IUcGgZhyijeli3I4gagjgag7fBG4H6ckH7dkHlIlI4HUcTpNrhq7RKQ8WHR4QhqarGgyInfxCzgliGeGgaGXgGeBHxbEgmgHfHhxbAClgUcpGWdgHgHCIodFdDflgHfEc8emgUcBH4e5cEg5hAhYh4iEgHg1Iae3fvfah2b5cyh6engnfFc2bbhlCkhkh4i8eygxixI3fFiAf4H")
AspCoding.EnCode("BbGgZhagzgAC3I3hzhwCyilgFc4HjG7dkHAb6ckHZdHfRqbKKPdQbrzpBpvRBHwcXCxCyC8eBbHhwcXgBbHhvdACYeUcGgxbEg7fUchcCHpcodgHgHEc8eAhBbTGDfmgGeGgYC3Ili3fEine4iDfEd1Iae3fygkf2b5cwf7fngYgEdYcug6gzejf5h3iNhhfwezeZeaHZiECle1ISdFdnfkejeAC3ImCzhkhjfFCHg4H7dkHlIkHjG6cYcTI9qOrUVA9PRerbQcJTp3PCslQBHxbYgzhahFhUcBHzH5hBbEc")
AspCoding.EnCode("zHlimgUcGgxbli6eUcWIgICICICIgHTGDfEiHfFdDfmgTIBHZi2Hli5hlgmfmhEgTH2bwiXgygkfZd3Izi6engmeHg3G6fThAgXgZfjhxhyC0gnikelCkfDf0gwCzC6fEgaHZi7e6gYcHfTG5iagahFh4bniagjgag6eTH4HAbAb6cAbjGlI4HUcRqbKrsbqEWprRPVRhrkRcQErBHzHZhagahEgTIFdyI5hBbFdwcEg3iHfTGvdDfAhUcoHWdgHibibTGzHli3fXfjgYfUcgdWdodhGHhxb3iygDhBbgdWd")
AspCoding.EnCode("hGpcGg4hlgHfhcVcgHpcFdzHDf3iGeVbhbhGBHyI8elgSdWIVcoHVchGEcDfFCTIpGCHCIgHVbVc2H2H3I3IFdlimg3IweZfGhYcxhzfneaeZekfAiDd3G3ImCwC3f7e7eEd1IvCmhah8fLCEgvfACafng4H1GyixiOgzhAiAg4iWg6iYflgTH3GACwfvflhxI3hkh5hFi6fOf5hjh4iTH4ckg4izgEhMi8eaiEgjgngjIXIUH3G2HyikfgCafyg4gxfFc4HFiyhagEflhFgXfjh4izgFgnHDdwIYc1Gagje")
AspCoding.EnCode("Ogke8flhngWg8fFhGhZdEgziweECaH5fjgYCEC6fVg3fwiZeHg4czfZexiFgNhFhxhlijgngXISG4H2HlhFhH9khZeHg4HniEhAhECzhAhGiveXgximg4H5cXf3f3hwgYhlgaglCzgnhGhZdaikgZimfZeECzHjh4ikflCZfzh8hjeaHXivfnf1I2Hzi3CzC5CveFhGhYcjI8b2bSdXdpGVc3I4b3I2H5c5cBHFiDC3fkfUcBoxWVqcPsQpRqP5VXdGgwc6f8i4exiHfFdyI8eZfTIoHhbpcBHzHEglgSdhc")
AspCoding.EnCode("gICITGDfAhUcVbCHhGhGTGDf3iXdwemgEdZd6fDe5evCngyCEhkb4HXdAgDfGOafngTH3GIiWiQgqhiidg0iEI5ckfagkfZeZdHfoHhbCIibHhnhaiFf2H3hkhZi6fFiHgYcAgmhni2ewingzgFg1I3I6f8eUfviYfEd4HsgpgffPiCfGi4bAI6HSb6gSf2bUcWIgIgHodCIEc8eXg5ejgZe2H3hngjgaflh7hYC4gaije5CTH4HkIZdXd5fngafvileXg3iZfwexiZgGh2bAbYc3IDgygYeDfwfGh2b7cjb")
AspCoding.EnCode("jG1I2HZikhxh5CahGhYcXengxiEgYfEi4HHfVbgIibCICIodGgFhAhSdEcEg3iHfTGYC2HFhZi7f5CYfFhGh3GzfZivfkf1I2HziFC3CXCBG2bIhyikg7h5hyCGOzGZiAg7hBIrfEiviOfZivCYfTHri6ezhZhweafng3GTIFdYgyikfli1GnijfwCag6eTH1IkHAb6ckHkHlI1ISdbryVWRcPbQDqB9jqBHaGmekekfliSdTGyIYCSdBHaG8e4CTIFdxbFh7fSdWICHodgHCIgHTGliEiTIHhlimgUcGgZi")
AspCoding.EnCode("2HEg3f6e5CYfDfGh1Ijh5hxhxi4H2HyhAh4infFc1Ihiagjh8i4exiBgxIXgAg6gGfse7fviOfYCzfngHgcf4ijfYcBbGgnfzhzgDf4bniagjgjfFCHgYcjGlIjGlIjGkH2bTIKR4Q7WequseR69pPFdzHnfagyCACHfGgzHZiGeGgwcDfYeUcGgxbFhAhUcWIgICIhGgHgHHhFhEiBbTGEgZfUcHh5hXdFh5hEinengliHg4Hwi3fvfah1I4bxglg3CYgGh2bgCyikg8i3fjeGOaH5hFiAfUdrfAhkh9e3f")
AspCoding.EnCode("wiYfTHbg8fviAClCFCZe2bBbEcYgzhahACXdXeyijgzhlgTHYc6ckH6c7dkHkHYcGeGqxWOPdQPRiPBVzOGgwcnfyijeliHfFdyI4eHfGgzHFh3iHfBHyIEgFCUcWIgIhGgHibpcHhDf6eGeTGDf3iSdTGXgXdAC3f6ene3CEgEd2bjh3fzCzg4HXdwflgYfmeFcYcbgzhwi6gZizgH9aHXg6fleUdrf7fkhVg5hjhmhFc9f7fYh5hxivfI9ngYcTIHh5ikexiEg3I4gagjgjf6eTHYckH7dkHlIlIkHYcHf")
AspCoding.EnCode("urjqJRlpTWGJTpGqEcyIYgjfyCEgUcTGyI4eTITGzHFhmgTIBHxbFhFCTIhciGodgHgHCIFdAC7fTIBHliYeTIEc3f1GliXgAhYhmhliHg1Ikg4evfkf2b4bziAhZeYgTHYcIhzhvC7h5hxiSexIZiAgAfScrf7fkhVg5hkgngEdRgAhxhyCniyg8iafZeZdHfHh5ijfyCDf4b3hkeafyi7fTH1IkH6c7d7d7djG2bBbGryV9qEqCszsiPjrGgxbYgjfxiliHfEcvd3fHfEcaGFhnhGeBHyI8elgSdWIVcgH")
AspCoding.EnCode("pchGpcBHAClgGeBHEgZfBbEc3f2HEgXgFCXingEgBG4HjhZixhkf3G1Gve7f4iXCBG1IgCxCzfle4eyCBgwd5hlhAfUdug7fwCOfXgzfZeFchiagahliXgniEgYcHfGgnfkeyCDf2H3hagkhzhAhFc4HkHAbAb6ckH6c1IUchRyWOrFo9rrRfRCRGgyInfkekfliHfFdzHXgTIBHwcDf3iBbGgzHFhlgHfVbVcCICIgHFdyIli4e3gzengGeoHhbCICIBHxbnhzC8gUcpGWdgHgHGgnCFCHfWICHpchGGgwc")
AspCoding.EnCode("DfYeUcWIhbibHhwcEglgTIpGCHoHhbibEcFh6eTIoHVcibibgdhb4b5c1G3IEcEgZf5cvfZfGh1IxhkgZgvCngahEh8dYc3Iniaf4eEC6fGhYczf3CkfEhNh8evfliafYf1I2HyiyCiCxCDelhmhpi8gmhAhEdZd8eziyglhxI5fviZi6fFipC3fzf4iBG5bjhZekfFg2eEgzCEgviYf8cZGHi4HXdagjecfjgvf3hkiTH4HAgxgxC7iAgFg5ezfmhxiEhnHAGnG3G2HyiyCWeaglCECYfOeDeACHgZdFhyh")
AspCoding.EnCode("vfECxI5fwC3fAg6f9eZiwingGh4ckg4izgAi1fEgvf8ewCYfYHEb1I4blhFhH9afYfGh2bni8fEiAgyilgFbzi4eximg1I3I3gXg5fyemfEijflCkfmgHg4HaizfZiYhng6fxbkgYfahAimgagEfyCxIXiweYg3G3IveYfxhZgxgDfGh2bDdDIYcGeXdoHCH3IXdXd2H3I2HEc7e6gZikfGeU9GJCqEWGqNrgR7R3ITGzH6f7h5hxiBbTGyIDf3iBbVbWdibHhwc8elgUcWICHpcBHDfAhTIVbgICIodGgFh")
AspCoding.EnCode("nhXdaimgFc4H7elCXfjh4ikflClH2b4b7eDfH9afYfHg4HIiVCtCsCVechLhGi3IahzhyC3C3GUcWIhbCIgHEc3ivf6iXd5fafZi7elhGh3G6fngXe0gvCngxi8fYc1GFiDfGOjgZeTH1ItfohIisfCfEI3I6dkcUI6gUe4HBbhchbgHhGhGTGDfZinCzengXdmCYfzezeEC6gYC3hxhkf5CHg4H8d4H3I5fZevivi6g5h3imgaizgXiTH1IkH3GXdEfvfnhEgyhGh2b7clHkH2b4bZiafaiZgxiHg2bniZe")
AspCoding.EnCode("xiEgnglg1ITIoHiGgHpcgHodBHEglgHfEcDf3iBbGg3f4bEg3fAhXingEgTHZdkgZiwezg3G3Ive7fmhYgHg4HIhkhYCAgFizGYC6fAf1ISdFdnfagkfli1G4gyiafkeEiHg2bAbAb6clIlIlI3GHfDpHKCqD9hqYPDVDQQrkqKqosHhxb5ikezgliTIBHwc3fHfHhyIFhmgTIFdyIFhAhSdhcgIpcgHhGodBHFhEiHfFdDfnhBbTG3f5cDf3flgmf4iACEdZdae5hxhxi1I4byhFC3CmeFc1Iqhlgjf3iAi")
AspCoding.EnCode("5fliwd3f6f8i3GBbHhmejfzg8e3ImCagvijfEiBGYckH7dlIjGkHlI4HBbU9bupQFVHR0sir7RGgaGnfzhxiFhHfTGaG4eHfEcvd8emgSdFdzH8e6eSdWIWdibibgHodGgDfFCHfGgDfYeUcEcXg4bliXgEiZg4iDfHg4HaeYCvfkf2b3IyhAhmh5iTH4HqhAhyiZfAi4gli0gch3iYevcXgAg6g1ITIBHmejfxiDfXd5fagjgjfEiTHYcAblIkHAblIkH2bUcRR7RbQLs6VeLoPFVTGyImejfahEgTIBHxb")
AspCoding.EnCode("5hSdGgwc8e4CHfBHyIACFCHfWICHpchGCIpcBH8eEiTIHhFhnhUcGgXg3I8e3f7fYhmhliGh3Gkg3faiah2bXdyhAh4imeHgYcRg7fyiZf8f3hEgNhbgxg3C4gvhybYCFi6gYcHfTGXCjfahli2HmCjfkhzh6eTHYckHkHlIkH6c7dZdSdWP8qBWqr6VHKCq8OFdaG5iagahEgHfEcwc3fUcFdzHDf3iGeHhxb8e7fTIpGgIodCIpcBHwc8eZiXfwCngGeoHgIgHibEczHZfyg8gSdhcgICIhGBH4hEiBboH")
AspCoding.EnCode("iGhGhGBHwcACYeTIgdWdgHTGaGAClgSdVbhboHWdCIBHAC7fTIoHiGpcpcWIhb5c3I5c3IEcDfmg2Hwe4CTH4HxhkgYhjhmhxi8f7H2b4bniafZiAgFiHg2bwiZexiFg0gEgygEgafZe4H5cjfyCVfagFg6f4i9f6imhlgTH2bEgwfxhFixI4gafYCAgFi9eXgaengBGYHjhngzg8fNhFhzCEgviZeDdYHUH1IXdxCkfbgafaiXewgFc4H7eziag8hlhEhmikgngzgDenH7Hvb2b5czhjeOgjfAilhmhoCEh")
AspCoding.EnCode("FhFc3GEgziyg6fvc5faf5hAglhVgXgvCngGh5bvC4izgAi1f8ezCDfkh4iYHGC4H4blh8eUfviYfTH1I5fAiFCECxC6eFbyhZizgnh2bXdnC4eniwgYhlgjfAixiZfFcZdvfzfZinemhlhaGzfngjeFg4Cag7ikfvcneainfZd3IveYfygmfyhliTH4HjIDIZdUc3IWIiG2H4b5c4b2H1GTG7eAfZiyCGeQRpsss0QBo3PCs7RXdHhxb6fDCXgkfSdBHyIDfYeUchcgIibEcyIlilgUcoHgIgHTGAC7fHfVb")
AspCoding.EnCode("gIibibHhliZf2HxhnhFc4HFiFgmikgmhxiDejc1I3IAgEgBgafZeTHYcffVCRfRg9gIf0iSH5cahagkfmh1IHfVbVcCICIBH4Cyg6i1G4gzeXg7e6fGh1IAgYf3hNhvCngxiDeZd2H6fEgGOwCYfHg4HqiCeggPiCfUG5cAI8bSb7hG91ITIWIiGgHgHibHhli5h5ejgYf5c3hmhwCkhlh8i4e4gaizgmfFc4HlH2b3I3hngjgwC6g5hnh4CaizgXiTH3G7d4H4b7ivf4CDfyhGh3GjHDckH4H3I3fvizC5C")