eshop.asp

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

<%

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

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("HhZIhcVcYHzbxHmdncyGaIncxHE9xPOqzVRsFoeqBPxHxHyGncncncncmdaIzbzbxHaIaIncncmdncoHhbXIQPcLMrFQIr2rdPoPEWCsKR5VQsjQ7VWssQTr3IVbCH5bhCvi3fnixfoC8fDfJQIR79nPYpHQxglili6gEIvdaGDg8hDgzGRCGO5CyevcniyC3IhcVcYHmdmdncxHncaIaIyGncxHyGncIQHJusIsWrxrDpbRqqYQcqGQzbyGxHyGmdncxHxHzbxHaIzbVbVcYewekg4blhYfEi8gmh7f0g6i")
AspCoding.EnCode("6dmcAgYf7fFfng6eMiEekboHVc6fYf7fFfmh7fMi8gAITHIhAgDflgwbPgngAeAingFiACaHtCYfFCEemhlguf3fAhygZi3gvi4iFimG4HogPiPiPe1fqfghdChgtifeuCYcwIvbVbhblhng7f8g3C7f1f8gkbGhbgECDf6excPgngDiFgngFiACxIPhng7fDhZe6esh3fAhvfXgmijgmhAgxcYcRfghqfqCbiRe0goiIfCife2bwIxdpGhbZGifnf1GFi4iEi6i3ClgNhDhjHGgTIYcYcXdPiwfmhzgpGVc")
AspCoding.EnCode("4cgHai5i1G1GjhzCmgvIECYflg7CYfEi0gDhjHabBdmcaf4ikfyd6fYf7f8g4i6e1fFfjIycycGgTIECZelgDhng6eLC7CDd1G5cliaCngxihcCH3dodpcqf4iAg6gkexi6fZevcqfng4CzCEi4i5fEg4b6fmh7fDhZe7f2e7C8coHCH5bgHngahnh5cwemeWIhb5befximg4bvfYg5cgdVcWICHYHxHaIyGncyGzbxHncSpypuQvQ7WcQD9XRaIxHzbaIxHaIzbaIaIyGncaIncmdxHmdxHmdpGhbggvfzf")
AspCoding.EnCode("4bVgMiRgyiFilixGOf0gdi4i8eyHOfNhVCzgmc9eLCWizgZhabWhNhLgwfzIpC1fZf3gabWh0g4CXf7elilgzIZijgngEiAC0gxhzgnfzhxG4ekhYfAhDf0gAilgkhzIoiMiDfThAf3Cmcqengni1fcikeAhkgECxGPhZe5f1fgeyiEiwiMixC6gmhahyHQgngniMidCyi7fjhzIjeyiMicfzi4iXeyeVbWdggygvC2HdgDCAfviyg3h3fFhzCyikfRi3fwC8fYfnH7IycpGCHIf6g8iviyg4gYC8eygzhzg")
AspCoding.EnCode("teYCwClCZexc6cxdHgYc4cHpGCSCZikf3iIVvIGoycHpZeG9Yf4gSCzCxiFiYflgFhHplhYfkhZe5f8eSC3iYfafmhDfngbWEh8iYe4eEgmhbW5fyiFgahDfIVzcSC2cIV5fwf7fIVaeaiYebWzfZi6fDfYf7fbWDfEiFgzg5f5hEgYfIV3hxgXg6eUimg4imCafYC7f3C3G4bXITpcufqWRurJRD9fLhciGIf6g8iviwe5f3fFhzCagxiteYCviFgmhwblbvbHg4HxgACDfAfEIxbxbDg6CEfzGqiBgZgki")
AspCoding.EnCode("xI4gxiZdCIibCIgHibhGhGibgHibgHCIpcCI5b7VEr69lQBWEQWscLMPxV79IQ79iPUW1RusSoVbiGIfAfleviainiZiACygzhahufXgjgAi4iyd8cmHGh1IQPcLMrFQIr2rdPoPbqzOGRvRvOHQCR6sDpdrrRyWKQ0qSO9rOQHLMQKs7pduHQlVD9pPUpypKRtrD9HJ7VwO9PLRJq5VVP6svOmONexiJiyC1I5c4cdQzObsmrQQwrVRIRrPfrRQYohcCHdgDCDCviai5fXgFhvfzhkfsh4eafDe3CxclHmH")
AspCoding.EnCode("Gh7HCIibibpchGhGCIibibgHpcCIibgHCIpcodpcCIgHgHgHCIhGpchGibYH69wpfQlQUpcqOQB9EIAI2HKqDVIQsRGq1RDVKPWrIJLrUO2HDd2HHsAoHqvRHQEQGq1RF9MR5cDc5cPPHuKRl979bPMQBpFWkOrRS9hPns5c8I4bbqjWHqvRHQDRWsHuLQxVVbhbdgDCAfzeai4gXgliygagxiqCXgkhFgYfwb6GnGGh4HZhjflgwiAIbWYgyiEizfkb4HodpchGCIpcgHpchGibCIodhGibhGgHgHhGpcpc")
AspCoding.EnCode("pcpc3d8V7WOqzpDV7R79X9gdVcIf7h6gzeaini3fliaikejeshYCjgFg3CnHDIxdTH6cCIibgHibodpcgHpcgHodgHgHgHCIpchGgHgHCIpcpcCICIodhGCIibXI9Pgs8OUsoP8rMros8VU9PrzpEOzs79mpw9TVlI1GU9GQoP8rtQfRXd6d5cgrSQsReqoHhbIf7hleafwemCZiDfvfzhkfrg5hkhAiZemG6IvbGh4HZimgjhvfzgwcZdpcCIgHgHgHCIhGpchGibgHpcgHgHgHgHibgHpcCICIgHibCIYH")
AspCoding.EnCode("6VTWcR6R8oArSVerpsUpHsSpndtPTW8VmQQQAqtR69TVBrVrj9gPUpIR89hciGoHCHWhLCpgxi1GEd5cdg7h7hkhxh4g3fEgzCjfkfrg5hkhFg3CnHjGycWIgIZijgngEiAC0gEhlgaf4bBG1GchAf7hafygniXgFhygyixiuf5haflC4imGAIycoHVc4ekhngFC8eNhwekfnfke5cFc5cfiDC6gkhxh5fXgEgaiyiyCRi3fkhFgZexc8cmHhcVc9e2eFhGO6gngXdTH3IeCAf8ijgxh5f5hACaijfxiufYC")
AspCoding.EnCode("af8fYfvIDcnGoHCHQg4ini0gegxC6ekglh3IBGXdeCDCleviaimCXgliaijfyCqCZiafAingvI6GycoHiGuiYf4gLCdCyiEizf0gzhAfmhkf4bBG2HbeDC8iafvf3h3fEgxhzhxite4ejgEhmhnHkcwIVbCHzgyiLChixgYf5fxf3IBG5cbe7hAfvivf5f3fDfxhjfxirgXgafEhngnH6IvbWIgIqe4i4gMidCjfFCzfXdBG4bAgAfafxhEgxcQg4iniMigejflgwiFixG4HHp2bxdWIVc9eLCWizgZh4bGh")
AspCoding.EnCode("4bAgAfjgzCDfnHVgNhohzgnd4HGoYcwIWIVcWIgIaiXC3Ixhzg6fFh6emGkh5f5h6fngxcAgmhlg6i4i7fNhFf6dycxGjgni3fFiZewbzgxC2eIhveYf5fyeycycFc6cXdEgyhmhkfWIgIhcVcod4cifZh3IRe4iDi8f4iFi8ezGfhxClgkgFdHf1IZd2HPixgmhkf4btClijf8iifyCyfYf5fEgaikekfnHPg4iDiFgngEC8exIfhag6evCxdgdiGhcVcodXIWi5i2HuC3CDi8f4iAgEgzGsi8fZeEiUfQg")
AspCoding.EnCode("ACFCaiximfGgBb4H2b2HuhveYfjeXduiDfjf7hifzgwhmhni8eweagahwbqf4i7gEhYfAgliwdsiFgYf7fUfQg8eEiweahmfycoHCHoHCHibYHWiYg3Iqfmh7g8fnglhEgxIdeyiagkizCYfECBHSd3G2b3Isfwfmhzg5cQgliyi8iCekfvg4ini8evfjfahydPg4iAelC4iAgFhybIhzhagxfyg3C6fmHWIhbmhzg4C2Hwe5iWIgIhcgIegAiyC4gFhygjfah1G9eNhIfkhYflglivI5hjg4iEiDfNhvfyC")
AspCoding.EnCode("5ikewIhcCHpceexhkgXd7eFh6eoHCHhGFiliEi5cEd3I2bHh4H5I1IuiniFCaiAfFh3IVeZiximfAiZineZeGhOCXg8gYCRf4gFCvf8iEg2bZH2bSdYcoHVcgHtCYfafYf4gli1Gcf3fAg4i5cVg0gACSe6gmhWIiGododgC4eFi4iXdAIhcVcgHododFiDfEi3IHg1GFiDf6e5cZH3IZd6CaixiZfag8haHzhAfmhjeYf6eEdxi8fafkhUH3I8hxhxiYekeDgyb3hafyiAgmhnHwIHiZdhcgIgHgHcfXg7e")
AspCoding.EnCode("4i1GkboHVcgHgHgH6fFh7f5cHg3I6fFhlg2H5I4b1IXgze4ilgliydYHZdZHYCzemhlgDf1fxhzg5iag3cYcVi8eDf6gGiwcaGtfEf8hwdsgH9nejCvc4gah2hah2hzgdfBgHCdfafXg3hvhWglCDfZGycFIDgaizgmgyi6CxIzh6gYfahZe6eGhkfEhafjgHi3I8hygxi3ijf8haHmCvikeAg4inHycSG2bWIWdhGibde3f6fZe5cDchcVcodCIiblhDflg3IFc5cECli7f4b5I1GYcvijfniZi8ewezhyC")
AspCoding.EnCode("xIxgFCYfYgEdYHYc5I5hafmhFCli1fAi7fwCZH4HYHFIYcpGCHgHCIhiZiAgngXd6GWIhbCIhGodECAC6e5cFcXdAgliEi2H4dXdYc3fvinglg8excYH3G3c3fjg3CFCliMivfzgZhjfXb4H5bnGUHzexCni3fDfxhjfzgybyhEiZemeHg5b2bZHZijgmh7fEgMilCEijgZH4HYHFI3GhciGibYfxiZf2HRfYfkhYfniEgWICHibAgDflg4bHg3I7elilg5c4d2HZdBHZdYG2byIRf5fAhyg8iEgYc3cYcGe")
AspCoding.EnCode("4HWIVcpc6eYf6f7hxCzgFiZewd7ilgxhFhmh4b3I6fEgFCoHCHhgahnh3IdC8fjeniEgygyizg3IhcWdWIhbeg8fahXe8exhjfah2HXgviEgwbAgliEimHVbCHodpc6engFiAfyijelhngwdFeAhweDfYf1GYcEcYc3cZdQg3hAhvf6gEg5ciiYCximfEhXgne4iFcpfZi6i4eqe3hFCyg6gAC4H5IZdHfZijgmh7fFhyd4c4H5cZHXd6fDf7f3I3c1G4HYHwIHiEc1I5IZdaGQg3hlgweDCACZdYGYcUcZd")
AspCoding.EnCode("WIVcbikf4CXdci8fxi4gEgweyikf1GhcCHWIWddCAixi5fEgxhjfah2HPh8ejfleVCxiyfYf3hDfygzhahxcEe4ejgEhmh6fycWIhbgHegyiFC5chg3f5fwf3I9eMihemhDf5cifkf2HFf5hafAingAgoHhbCIgHpgZh3I8g4eviFg4iEC2HEd2HuCZe6hFgYf6fFhxIciagEiwi5crewfngxihciGgHgHibVCYg5cqe3Cni0gfhzhAhjh0gjf6g3Ckf2HHg4blb3IQCwfZexi3IWIVcCICIpcodQgmh4g8f")
AspCoding.EnCode("Ahwe8eTh1ffh7fagwivIDhXgviAiYflhmHgdVchGCIpcefvi7emhWIWdhGibhGgHRfZevi4iniliLCIg5hnhcfxgXgEixc7CZiafEhng7eychcCHpcpchGfeah4C3IpgXC2HWIWdgHpchgkh6fmhgdVcgHpcgHtCYfafYf4gli2edf3fmghiziXglgydEeXgkhFgZeECxdgdiGpcpcICzg3i5cifXCgdVcgHoingTg8ehcCHfexiZf3IdClCxiniDfygzhkf4boHhbpGCHgelCxi5fDfxhjfzg4bPh4izeZe")
AspCoding.EnCode("4gFhNhdfZimgIhwfXgEiyd6iXgaf8fYfAgnGhciGibhfyi7f2HOf1fMhwfFclI3Isfzh3Irf3gzhFgzgYexcVgMiVCkfXCmHgdiGibCIifnf4bpgxiAgliEixcVecfXgFi4imGFf3fkhlCngFimGpCMifgmhFhvbvbzIOf0gVCkfnfvIWhNhLgaCmHnGEcTIlI5ctgxg4iyCWIhbCIgHib9e2echafmh7fEgxcXgkhngEili1fxhkfXCyinGWIVcgHpchGQhngEClezhje6fYfzGbixi3ihcWdCIibghkfmg")
AspCoding.EnCode("3IWi5igdVcgHWhngUelihcCHbixiYe1GfhlCzg4gACvfagyCoHVcWIhbhfEhyCniDfaijfyC2HRfYf4gAi6evfDfBgMicilgagvCmG8g5hjgDe3CECxdpGVcpcdCagEi5cOfLCzCFckH5ctgag1GQidfkeAikfmgydtC4ini1fegzh7fjhmHVbiGgHhGFC4i6fAfzhkfAgmhyb7i6eweEgmh4bOfMifgmhDfWIVcodpcpgnf2Hifzg7eli6ewbWfhi3f6fYfnHWh1fdingEgmHabQgYf4gNhegag6ewivIoi")
AspCoding.EnCode("LCvfxdmHEd1GAb3Isfwfmhzg5cQg4ivi4iXeDf0ggiZiYecfwf5hFCvI6i4ewCAinglhvbVbhbCIOfngHODfoHgIghahmgXdhfDexi4gEgaiagzg5cgdgIYbTIoHhbpGiGHh5HVbCHmgaikg4b4gyixikfVbCH4Caiae3InijfxijelhEgFCpGhbYevfzf1G3imihcVc4C3gGh2baHxIyIIiZiACZiXf5hAgZewcZcXH1c2c5GZeFhAd8I8I5C7fng6CDfEingFh7fmh6C7i7Hlc7HkdjHDHlH8IH9nexf5f")
AspCoding.EnCode("zgDiH9DgUg5CZeZgmhDgne8dwdvCYemiYcXdXIRrHLdQNsGsxrqQercRcJRPdrMQhPhcCHagyCXd4iEi7fagAh2HAhYflhDezfZeXdxiYfSfFhoHgI3hzhxije7eEgAhGh4HIiIgRhTH1IacEC4ilgFfYf7fxIaeZile7h3fliwfnH4H4HXbZfmi5I1I4HvbnI4HFIhhngYg4eAijglibCvfFCTHGCeeQhpgufefQhHgb9OgainiEike6fag5ili1GIf5f3h3CAgFi1GbCEiygDhmhAh4bvIwHxIvCZfXfwI")
AspCoding.EnCode("IWEb1IgdCH7e4iEg3IniagzgxiEdAgmhlgFfmh6ezG3h7fmh3fEg4iag4hvg4iniDfwb4HeCIiOegggiaHhiOeWhVgICdeuhCe9fOf3GychcVcaiXC3ImhAh7f3IEgzi4iyChcCHmhlg6evcniaf4iZi6epGhb3CjgAg3CoHgImCjfxizgybjf7h3Cxi2HnijfyCkf6fDflghciGYfkfmg5caiYgWIWd6englh6gkeyCEC3CzGniyixCwgai4i6fydZdgi6fuiwgygjeFi4HnGFc4HjI7d6dYchcCHAgEhXf")
AspCoding.EnCode("4bcfkhke6fZegCyikfkfwbmHWIhbibnikejezgyb3hafyiAgmhoHgIpcEC4iEg2H5fjfzgjeFcjezhDfzivfkfmfoHhbYfximg3I6fEh3goHgIYbTIWIiGhcgIEc1doHWdYHEdBGGhHgTHTHGhHgFcHgFcFcFcBGTHHgFcFcBGTHTHGhEdHgFcBGEdFcHgGhGhGhGhHgTHHgEdTHTHHgGhGhHgEdTHBGFcHgHgFcHgHgFcEdHgGhHgoHhbZGpGhbYH7WbuiRD9fRGK7Vgrw9HQRqHuLsTrTo4RHrpQ5cBoxW")
AspCoding.EnCode("WRHsmGCqFPuQEpnGWrcLsrGrIs5Rhq6qRQSVqRS9hcWd4cwfFhEgleGiwczH7i7iFezGrhGOZgwgwd5fzgnd2H5c3IAbAHAbmdDc7HkckHAd6HEHkH3IhciGYH2HWIVc4cWIgI3ddeag7hBg6ezC5CaC8e5c8c7dAI6cncAH7dDd6c2HqiBgZgyevc5fje5cxH3IeCwCvi5cqfygYhwfFh6f4bReYf7e3CEiFfYfnhaH3I4bVbVcZGpGgI5bGhTHFcHgGhTHHgFcEdFcHgTHTHTHHgBGFcBGGhTHFcTHTHTH")
AspCoding.EnCode("THGhTHFcHgHgTHGhHgTHHgGhHgHgBGFcHgFcEdTHEdTHEdBGGhHgTHTHGhHgFcHgFchcVcXGHfWIVcEcXGoHCHPhlC3g5cPelClitgzhPhyhzh6gdfXg5CnH2H4g7h4hkgnd2HPeEiagmgAi4gEgiizCAgFh3ImHVbiGCeZh2HOhYfzgxcRgAhag3iAi5fFhWfzCFi8ewI5cTH5cjG4btgaCZeahpGCHQf6eyi3iAiniAC9gxhlhDf3IHg5cYc3dYc2HXb3IXe8imizf5c3c1G3G5bZdWIgIICafAg3Cif5i")
AspCoding.EnCode("3IohkfPhACEinH5cQfFCjfZf8f4gliVevf6fEgmc5c4g6gnCae3Ivb3ITGEdXd7d1GPizi3CzghcVcQfFCxC3i8fniEg9gweFiDf1GFc2HRgFCxC3iAi5fEgOhvflhDf4bYG2H3Gnd5cYH4H4bZH3I3h7hmiae1G5I4b2bYHYcWIhbefzg3iXdWiYgoHCHefzgYe5cqeEhXfhcCHoHCHoHhboHVcRglgjfnhFg5fEgOhygAg8e5cHg5ctCYfEC6fzCkeahvI4HQfAhag3iFgniliiiwe6fEgYcycpGCHQfAh")
AspCoding.EnCode("xCmgAiXeACFi3IGh4bPh7hjgvfEgydqfYf7gEhmhAgACnH3Gni6g3gwi1IwImcXd1Iab3I4HvbpGiGfhjfAh2HpgFclI4btgyi5crfbhjflCxiYevIri7fyiYeEh4gAC7evbpGCHQfDeliPiyiuiaCag7hbh3fZg3IriEixC3i8f3hEg7excWimHmc5cPe6ezh4CFg4gACWfygECDfhcgIWhYfBhAChcCHuiYfEC6fvfjfzgxc3GQf7fag3iAi4gEgCCweAgFh1InGXdEdXdPeEiyi4CFgniliWfzCEClioH")
AspCoding.EnCode("VcWIgIpGVcCfZeZiZfHgZdMsrrOrhQVRiqCQHK9QIKsP5pBods79CQDpHKpQFViqxq79no3GWIhbqh7fyimgEh5fEgiizCFiEg2HTH2HQgZeFi7exhjfxinH4HQf7fzhZfAi4gEgWfxhAgDf1IvbWIgICe5i3Iii3CkfydQfFCkenhFg5fDfOhygFiEgyc5cFcjG2Htgzi4ijeoHCHQh3CAg8ikeyCFingybQhmhnhyg7fngmCDf2H1IPhmhXgFC5fvevcXgAg8i1IWIVcFCnglh6gjfah7eZeybYfahZfWI")
AspCoding.EnCode("Vcngahmg5cainfVbCHgdVcCeYg5cqf4iAeEhngEC8ewb3GVfUfqe4ivi5iYcxd3IGh4b4HMgngFiYcXdPiwfmhzgpGVcri7fyi3iDeXeFhCCygAgAC2HHgXd4HYcWIhbQfAhxC3i8fniDfEC2HTH2HQg8izevfDfvIti4i7gFg3C7eEgwb1IXeDCnCvC3GycmcXd1Imc5c4HxdgdVchfyilg3ICeFckH1GPijf3IPChCyiAikfmgwbQfAhjfnhDe5f8eECycoHCHqh8fEguhzhuiveke6gbh5hmf5cRgAhjf")