en_ment3.asp

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

<%

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

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("FdYbhcCH4cmdncxHxHzbmdaIxH7pvRPrxoWREpfRFrncaIaImdaIaIzbaIyGxHxHxHxHncncyGzbnchcCHYHPQHurqTrIr4RdPpQEWePLQ5V9RkP8pVrJr8R3IhcCH5bdfkh4e3hye9f8fEgJQbqEpZR5WBWzi8eEg7hFbwczHFe8h8hxIsgH95CkixI5fkf2HWIiGYHaIzbxHxHaIxHaIxHzbxHncncdRIuKqHRPQYR7WbRRRZPbPTWncyGzbmdzbyGaIzbaIaIxHzbWIWdnhaivC5c7englg6i4i6e0gFf")
AspCoding.EnCode("lbxGlh4i7fFfZeAhNhDhkbVbgI6fngFC8gYfAhNhDhAIEdIh6fliEivIti4i6hAi3ClhFhxIRfmh6e8gmh7fshXglgai5h4hkh4iFinH2bCfsfsfRg0gtiefhfhgQhhgRe1IvbnGWIgI6f4iFC7C4iFCNhDhkbTHIhlhliEiydtiYf6hFgYfFiliaHui4i7f8g4iFCRiXgFCygXgnCkh3Clhxc4HuiICtiufefQhLCVgIfVfhgYcnGwIoHgI4cWiYg3IECnglgDhng6e1fFfjHBHUcYc3G4bPiziYfkfoHCH")
AspCoding.EnCode("5bpcaiYg1G2HjhweZfvIAgZe7f6i4ilg0g6ijHabFHabzemhjenH6fng7fDhYflgNhDh8cnGwIHhBbFiYf6eDhmhlg0g6iDd5c3IDfwfYfzgpGCHXIibgHqfng6f6gjfah6f4ivcPgYfnhyg7fng3hEg3I7eZeAh6iZeAhLCDhlGWIhbXICIYfahmgXdxh5igdVcZGhgzg3i5cweYg2HVbiGVbVcYHxHyGzbzbzbzbzbaISpzVMsyRDpIqEW5qaImdzbxHncncaIncnczbncmdzbzbaIxHzbyGWIhbffxhkg")
AspCoding.EnCode("3IoiNhqhzhFiliyHWh1fgfYfEgzIoi1fifzgabVg2epgahmezIVg1fNiaCndoiLCnh4habOfNhnhmiFiACEiyH5hjgYfEili1faixinfagmcYCvingFCEg0glCAhwCaboi1fliGO8iYfyHPh3C4g1fhfagEiaeAgyHQg4ini0gegxClgkgNhagleYfkfyHRf4ini2efhyiEizfyHkfjfNhhizingXexfVbiGffygkg1GIf8i8ijgygni3fFhvfzhjesh4eaf8fngnH6bmHWIhbch8ilejgxh3hZiDfwezhah")
AspCoding.EnCode("rgXgvilC4ivIkHmHTH1IZGHpFIbW3fkfmgHpvIHpvbHp4iG9ng5fbWygkfAgmhlgEgGo7emhviZe3hACbWYengkhngEgYfbWFgDCnhZiAC4iGo4gagAixi8eIVwHbWXGbWniwf7fGojhxhnhbWjhXg6fEg3ClgHpFhAhEhzgmC5hDf4iUi4gziZiAhUi4Cmh3hjg3fAhZe1I4bYHGqfJeRqrJqKqEWfLhcCHchAfAfafyg4gZiDfvfagahrg4ejgEhZevIAImHFcZdaCliAC7hFbxbzH8h8h7ivcRCH9mfvh")
AspCoding.EnCode("xI5fxiYcgHpcpcgHCIpcodpcCIodCICIodib3d6WErFpardsBrQQHuJqAOSVIQEpoR79NPJRUpWIVcfi6g6gwCyg4g5hEgwejfkfuf3fviAiZewb8cycTH4HPQHurqTrIr4RdPpQbqAoBpvRXVGPoQ7rU9BVrRl9KQ0qDpQq9PeKLPsQ7peJHQAWUpCREWaWurLPFVGK6Wv9OQJPJqXW9RaRw9mOJizg0fkf4H3IZGdQkVHqyQQQnROQIRsQoqRQv9hcgIIf7h6gafyg3hXgEgwekeahRi4ekhlCmhmGkIvb")
AspCoding.EnCode("Hg8IgHibCIodibpcodpchGCICIpcpchGCIgHibhGibpcgHgHhGibibibib5bUVwpgRzsFVIQWqcqFbAIXdKq6pB9MrHR3rF9LqWrdMsq6W3IAH4bcPkVHqyQBWDRHR3r8WLq4bDc5cQQbKLQapEpdRJRIrSpyprR6WfRxP3IDb1GIRkVBpmrdsTsVrdMJqyWVbCHch7h8ivizCni3fFhygjfxiRi3fviAiYfvIjcxdFc1IXCaglgvClbSCZhyi7fwiDdYcgHgHibodCIgHgHCIpchGCIgHCIpcpcCICIodCI")
AspCoding.EnCode("CIibXI6oDpWQzp6par79noVbVcfiAfAfafvf3hZiliygkekfsh4eafFgngmG6HycFclICIpcgHibgHibhGibhGgHgHCIgHibgHCIibibpchGCIibibpcgHhGib5bVRCRD9UsgrTRtQgQ7p6VVPzpDV6qEpmpXVHQlI2H7WGQgr8rsRgQ4bAI2HiRBqsRfRpGiGch8ilekhzC3h4eEgxhagzguf5hjglCmhxcAdycBG1IXg3iwiwezgzH2bhGibpcgHgHhGibibibibibCIgHCIodCIgHibibibCIodibgH4c")
AspCoding.EnCode("U9BVT9zr7WAr6OpqfqFVdQFWxGrRTW7pYqRRlRJrSWBW8qVrj9hQEWdQSpoHgIWIVcOf1fpgah3IBG3Ichle6gjgvfniYCACaixCahsh5hafEhmhxc6cxdhcCH5hjgYfEili1fAiEiaf3IFcXdfi6gDCjgygmC5hACxhyikfRiYCvi8fYfwb6dwIoHCHXgviZelgDf0gaixiYgagXdHg3Ich6gleafvf5f3fliaikeahRiZiaf8fYfnHkbychcgI9e1fFhSeAfng3IBG2Hfi8i6gjgai5f5hDfxhkeahte3f")
AspCoding.EnCode("afFgYfwblHwIVbhbuiZe4gNhfhyi7faelh4bHg3IfiDC8ijgvf5f3fEgwejfzgsh3fafFgYfvI7HvboHVcuing5fNhegjflgjh0gagleZeah5cBG4beC7hlejgxh4gXgDfxhagyCshZiwCAiZevIDIychciGzgjfNhdeyh4i5fxf1GGh4bch7h7hjgvf4gYCEgvfzhahshXgwCEhYfxclcwIhcVcPh4imCNhfhag7fjh1GHg4b6f7hjgygliwbPhmhniMihfzh7fzf6fzI1IUi4HmHWIhbVg2epgahme3IHg")
AspCoding.EnCode("2HFiDCwCaiACwbWhNhifahabYcUiZdycoHhbWICHai5i2Haixi6fEgEiydvi4gYCAgngydlh3CAh6iYfEiLC6ijHmHabwC4g3f6fngxcjeag1fbgzi4i4gwgxdwIHgAb3I8ewfYfkfoHVchciGib4cWinf2HqfYf6hAi4iAg8eaHfhke7fkgGgGe4HYc5ctgxg4ikf4bRfFhke7hCekfyfng5fFhvfagahwbtiZe7gEhmhFiDfzGfhzhlgkgycgdVcWICHgHYHpgme2HPgmhlf8fng6fEgaHRh8f4iEiBgRf")
AspCoding.EnCode("FhlgvfzgYhGgTI3G3G4bPivemhyC4bqeEgzh6gpgkfwhngmCFhaixCximGPgngDiAiZeAgDfybQeEh4i7fUfqeFhAhxhahYhwIoHgIgdgIgH5bohZh3IuCmhlfAi4iAglivcIhyixCvhxhng6fHhGe1I2b2Huhxgngxi4bPhFhyi8iifahyfYf5fEgygyikfnHPgmh7gDenglh8exIbgjfyijCzC4iECvbVbhbYfahnh5caiXChcCHVbgIhfAixi5fliaijfzg5cpCMidgwCnglgACwbYCkh4i7fliLCaikf")
AspCoding.EnCode("nfzhxdWICHgHggaiae3I6fEgEihcgICIECEglg4bHg1G4HBH4HZHYcuiXeAhai8iDf2HWf3fahXiAiXgneYfGhoe3f8gXgqe5fEiai6gEgYcZH2bHf2bpGhbhGRfYfjgYf3hDf3IIh5hFiZe3IWhNhliUflemhVbgICIpcgCZiAgYf2HjHWIiGgHCIib6fDflg2HHg2HlhDfEi5c5I2H2bDgvfzgnhagDgzGke7h4ijemhFCGhjeFgkhjgFI2H8hygyCnhyi6CvcXejgagFi4imGwIUH2bpGhbpcgHcf4elh")
AspCoding.EnCode("mh4bkbVbgIgHCIodAgDfAh4bGh3IECFh7f5c3c3IYcZikh4iFCFhwbXI4HXb4ejgmh7fFh0gygxiZhzhXbYcViDfFhAfSHzHyIsg7iEfaHsgThZgyexI3hje1gzg0fxihCGOGihCkh5h3hxfVhEhli4cxdHiEfxhzgZfyi7iaHyi8iYfzg4iFCFczglCjgjgGC4b6CxhxiZfyi6Cvc5fafzhECngnHmHFIYcpGgIgHCIhiZiAgngXdkIWIhbCIhGgH6fDf7f5cFc1GlhliEi2HZH2H4HkhyiniXg8evfzhje")
AspCoding.EnCode("aHxglgZenfFc4c1I5IZiafmh7fFh2eEh6eafZH1IYHEb4HWIhbibpcdeXglhmh5c7HpGhbibCICIFiACEi3ITH2H6fEg6e2H5I4b4H3fjgYflgDfwbYHYc3cXgafmhlgDf0gxhzgYgkeYG2b4cnGEbwCzhXeXgFhygagkfybxgFCmh5iEd4c3G5IXgvi4i6eEg1fEh6ekh3c4HYHSG2bVbhbibmhzgZf3ItCngafmh3hFhWIWdib6fliEi3IFc5clhliFC4bXb3I4HHh3G5I2bzHPh4glgai7hFh2b3cYcHf")
AspCoding.EnCode("2boHCHgHlgngFiAfjfzglhngzGDgAhweEgng2H5cECACEigdhbghahZf4bfhAiximClivfzhzg2HhcVcoHVcci8fzgniACaiagyC3IXgwCFhydlhli7fycgdVcgHgHAh3CAgAfjfzgFiZexIEflgailing3IZdGg1IXb1Iqe5f7fvfAfli5cVe5hxiXi8f3fmfYfGh9iZi8g4eRf3h6evf6gEg3GZHYcUcXgjg4i7fFhnH5b3G4bYG2H6fEg7f4bZH3I2b5bycSGGg2bXbYczHqe3hAhyg6gliZd3c1IHf4H")
AspCoding.EnCode("oHgIfekfmg4bhf8fzg5fEgvfzhkf5chcgIoHhbeg8fzg3hEgygkeje4bui8ezhDCohjevgmh4gEgvfzhzgydDhZiwCAiZeAgwIhcVchGegjfAh1GghZi5fwf1GWhNhehmhFh3IifzgXd8g3fkhEhmhAggdhbgHpcWiYg5c6i5hvilCmhlh3ITH4bReng6h8fmhAgEgvcfhzhAhwi5csfyhYfkfoHgICIpcgHifYg4bQgZe4gNhgeaglgzfMixCDC4iyC4bGh4bjH4buhzi4iyC5coHhbCIgHpcpcRf4ini8f")
AspCoding.EnCode("lgaiACH90gdClgagvCwb7C5hvi8f4iECycoHCHibodCIefafAg4ipGgIgHCIpcpcQgngwCng4gFh0gce3fZfcfwfZiEimGDhZivi8fYf6fmHVbVcpcCIhGefahYe2HpgYg1GoHVcpcCIhgvi6fmhoHhbhGibhGRfYfjgYf3hDf0gbh5h3idexg5hAhxcFf4ekhEhngAgycgdVcCIgHefkfmg1GifYgVbCHgHVgYfTgDfVbCHbiximg2HfhFgkf4gFhygagje1GVbVcpGhbdCEhje4gFhygagkf4bQg3Ckh4i")
AspCoding.EnCode("mCli2eIgXg3ihiveXg7fwbEe5hvi8fYf7evbVbhbibfhag7f3IpC0gKfyhGhAb3IQCzh2HQimiagAixinhxcpCNhohzgnfvbpGgIibgHohYg3IWiahlhFhEixcWfIh3f6fYfvI8gZiaf8fnglhvI9e0gehZeEgwImHmcpCLCWiyCZhwbWh1fMhyhycycFdUckH4btgwf4ixioHVcpcgHCIoiLCfijg3ClgEgyd5hwCmhEiDfMizCxinfjfvbgdgIgHgHCItiZeAgAfagxiFingxIICzgmgVbgIhGgHefkfZf")
AspCoding.EnCode("5cWimeVbVcpcOfYfSfDfVbVcbizgYe2HfhDekf4gEgwejfxihcgIWIVchfEhkf3h8exhkekf2HQgYf3h8flgxhFhH92eegAhzhwinHEe5hkhFgngFixdhcgIgHhfjflg1GOf0gxhTHkH3Isfag2HthdfyiAizgZfwbQgYf4gNhegag6eaevbhciGibodAhZeAg7hagzg6fmhxI6CAhaiAC4i1GVg0gdi4i8eWICHibhGoh5i2HifjelhFhAhwbOhbg3fAg3CvIOfNhehmhEgxdabRf4ini0gciyiAhwiydWh")
AspCoding.EnCode("NhygmHvbBG3IAb2Huhxgngxi4bPhmhvi4i5fFh1fdf3fmgbgzi3f7fvIDhXgzeFgmh7ewIWICHpcpC3CG9ACVbhbghkfnh4bciAiyCniDfxhagkf5chcCH2cUcoHgIhcWdEcZIgdgImgzCjhXd3hyikfxigdVcZfvfjhXd4gjfkfzgFi8elgoHgI3iaikg3I4C3gWIhbmg5eTH4HaHaHwcIi4eFhZimi3f6fYfzH1b1c1cZI5GYfFh8G7H8IZg6eYf7ililgngli7fmhEf8h6G7b6G7HjH6IlHDbUfZgvh3h")
AspCoding.EnCode("xiAeBg8hShXiYfnemh8hZgkIvcvC3i3g4H2HYHVRdtdQXRIqnQqQoRbQcJqQTWMQprhcgIjfah3IYflgAhaglg1G6emhFiDejh3C4bjengBhEgWICH3hagyCahFiACEiBG1IgggisiBG1IvHlhZeAh6iYf7fzGjh5h7h7h5hEgwfvIZd1IZHnh4hXb1IZdvbvHYcHigg4i5i5hAiwCFhhhyg7fGhSGggQhifshhgPgFcUh9hxhniEijflhjfnfDf3Idgni5fYfAglh3IeelgxhEenglg2Hxcadwdwi4C4hvb")
AspCoding.EnCode("IWUH2bVbVcFi3Cli2H3hagkfxiFc6f4iEiFfngEiwdnilg3CXgEg3CzhnCwh4i5fliydYcIfffVhbCIgaHcfWgoi9ehgcftgWipiVg1IxdWIgIxhYg1GYf7f7f2HliziZeahhcVcYf7f7faH3hvi4iXg6eoHhbZeafAgngpGCHniyizgzgvcjf7hYfah1G3hkekfkfAgDfAhoHgImhah3i1GygZhVbVc7fZelh7hagzgFi3Cvc4gjfjfxfygZe6fvI2bdf6fQgxfygkflh4HycFc1IAHAbAI4HWIhbAgFg5e")
AspCoding.EnCode("1GIhvikelh3CIhkezgahvIwIoHhbCImCzhxiyCvcXejgagFi4ipGgIgHlhZeFh5c5fjfjeahGhahzhFhxgvfzg5CWICHmhahnh3IECEhXfhcVcZIUchchbhcWdHhYbWICH5bBGHgGhTHGhHgHgFcGhGhGhFcFcTHGhTHTHTHHgHgFcTHTHHgGhHgBGHgGhBGHgHgTHFcEdEdFcEdGhGhGhTHGhGhFcFcEdFcTHGhHgTHFcFcTHFcFcoHgI4cgdVcXISOGJiR8OeqeM6WgrYpcrVscLtQFQHq1sbRpQ2HHRA9")
AspCoding.EnCode("OPIRnHiRBrLrSVwIVsIJMRbqHR3PfQlQRQEpWrS9ZoaWT9Tr8ppQYpHQrhH9XiwgzG5fahZoxpWIgIZG7pmrPrzVWRdLtQuqYpBWueThnexfaH4gkfVbCHXI6WqqJrEPJRCqJqFrYpGPGqYqJRXRWrdMMr8RBp5QcQiRpGCHXIIhjfAfBg7fygmfyhDf5c8clIjHAbaIAHlIkblI3IueSeYhkizG3hyC4byG3Ichjgjg2HQhyg5CyhliEC5cRengAg4iEiEengZfybpGhb4coHCHZGGhGhGhGhGhHgTHHgEd")
AspCoding.EnCode("HgTHGhGhGhHgEdGhTHFcFcHgFcFcGhFcEdGhGhHgTHGhBGHgGhTHGhHgHgFcGhGhGhFcFcTHGhTHTHTHHgHgFcTHTHHgGhWIiGZIBbpGgIGg5HhcWdVC3iEdPhmhlh6fxhzhxixcZdAi6fmhlgkfZiwiYfYcycoHgIriFCyimglC4gEgCCxhECFh5cTH5ctC4i6f6fxhxCzgnH4HRgEikemg8f4gliiiygAgAC1IwIVbgIPe7fjfZf8fnili7e4bFc5cRfAfafvfFhxctingAe8fmh7eDfvI1IXeAfmiwi1I")
AspCoding.EnCode("wImc2H2byH4b3GvbpGCHhfag7f4bifHgAb4bPike3Ithbhyi8fjenhwbRglgyi4CAi4gDf6fmHWIiGQfFgFhsfjfQgwfagAfbh3fXi5cRg7fzhmg8f4gFhAgvICenGab5cPeAhxCnhDe4gFh9gyg6fFhWIWdWh4iHOlipGgIQg4iFi7eygjfahmG2bri7fjfYeEh3hFhOhxhAgDf1Ixd3ITH4bqhAhag4CEh5fliiiygFiliVbVcgdhbqhlgjfnhDe4gFhWfxhAgEg5cGh4bPh4iFi6fxhjfkfnH1IRgEijf")
AspCoding.EnCode("ZfFg3hEgVeyglh8e1IwIoHVcVCXC5cCCmhahwbQfAhzh3iAimCliWfxhAgDfyc5cTH6c5csfxg4iyChcgIuCngAgDCzhyClh4iaHti3C3ivf7fmhmCEg2H4Hhgxi2eRg7fag3iAi4gEgwdXgAg7h1IpGCH7fYf6f8iyijelh4ivcYfkfZfoHhb4iximg1GvfZhpGCHWIgI7eYfli5clgAgFc6fmh7fDhZeAhzG5f7fng3fFhYfag4hwh4iXeEgwb2bZiZfkenh4hxIlg4imCyilgZf6fYfEg3GmHWIhb6flf")
AspCoding.EnCode("jg2HHg2H2bRf4iving5fFh3IwH3IZhlgagae1GqhEikenhlC3h8e1IVbgIAglfkh3IEd4bFi8Cvi1G5I3IYc5cuexgYfAhZe4bri7fjfYeEh3hFhNhohmg2HpgyC3InH2b4bXb3IsCAhjf3iAi4gliiixhFiAC4bXb3I4Hvb3GWIhb7flhxIag8imhah4bFiDiafab5fjfkfzgzIDcyHlHWIhbWIiGZIBbpGgIGgCfPiiCCCUcgdhbHhphefchhhUchcWdEcsfohtgWfbiUcRf4iliDfjg4ivC4izgAC3Iag")
AspCoding.EnCode("XC4bACyh4i2HXixCyiZf6fHhvdtgifsf9gbiGeWICHGgwi4iEgXgXdxgEgFh6gyGYflf8fvf6iFc3GIhyixiDfYfkfDfzbPiH96gZe4H4bXejfzgEgZekfliFc1IEg4iSfFhzHyh8ejhzeUH2H4gwf5h7fAgmhFhFcne3gkbjb7cAH3GBbVbgIGgvizCxiwg2Hwf7fngmeTH1IybaHzHpgkf4gzHIh6fFivc4g6flh1I2HlgmhjgHg3G7eFhH9zemhECyhZengFh1I3IDfTh6g3CGhYcAC4iUeEgyIniFi7e")