en_sale.asp

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

<%@ LANGUAGE=VBSCRIPT CODEPAGE=936%>
<%

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

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("Fd5Hbf4b9gchWhehQiIfgfghGhRidfuibgtipgqhPi1GhiWggghgRgdggfICTHBclHAd5HTIWICHEc5Hyi7hEgvfzhzg2HmhG96gjgvfniygliUGggwekg1GIflh6gbgjfnhxhyCZg2cSdgdCHBHZI1dSdoHgIBH2cRengFiAfkexiAgmhybbhAiYgYgng6eTHsfAhEh4iYbGeWICHEcYbVbWd5bzbncyGaIncaIxHnc7pyQOqzVVqSVfREsaIzbzbmdncaIncxHyGmdxHzbncxHmdxHzbzbpGCH4cPQHusR")
AspCoding.EnCode("FQIr1sGshsSogRJqv99Rzq6WVrKsEP5cWIhbXIdfviZi5fkioC8fDfsrcPUWYqZoHQxg8eEgDCEIwczH7iFe7iaHRCBgnexfxI5fah5coHCHYHaImdncaIaIyGxHzbnczbxHyGbPbtMQbrVsmP6VGsWsYQbPHPmdaImdzbaIxHmdaIxHmdxHaIpGiG3iaikg4bFingAhFf4i7f0gFfkGnd6fYfAh8gmhAhNh6iAHoHhblh4i7f6ingEi0gDh7cBGhiAgEglgvIPgYf8C8f4i6fACaHQgng7f6iYfEishXg7f")
AspCoding.EnCode("xhXgXfkh4iAgvI4HVitgPiPe0gRehggeefQhhgPg4HvbvbgdgIFi3CFCFfYflgLC7CAHHgcfFi8elgxcqfZeDiFgmhlhFhvcQgnglgEeYf7fsh5hEixh4e3gaf4ilhwbZdPhghtitehgti0gOffiVfef2bwIvbWIgI3dpgZh4bEC4ilg6iYf6eLCFflbEcHfZd4H4buhveYfxioHCHXIgHaiXCXdXdaeygnhxcAgmhAh6i3C6eMi8glbzIFHmcviYfxiyd6fYfEiEemhAh2eFfjInGwIFdTIFiYfEiEe4i7f")
AspCoding.EnCode("LC8glG2H3IDfyh4ikfoHCHXIodpcPgng7eAfzhxilhYfzGReZeZfaiFCZe4gACXd6fZe6e7CngFCNh8gAHgdgIYHodYfzgYe1Gai5iWIhb4chgahZf5cvfYg2HpGWdoHCH5baIzbzbzbncxHxHzbFWj9uQZr6VHrFV5qncyGncaIaIaIaIaIxHmdxHncxHmdxHaIaIxHhcCHIixhkg2HWh0gQfzhFiEgzIOfMifg4i8ezI9e0gCekfabVg0gifahZhndVgMi0CaCyHOf0g4CnCyHVg1f3i5eAgli7fxGZijg")
AspCoding.EnCode("mhAhFhMiygzgYgkeyH3fkhmhEiFh2eFg7fviabWhLCFhTh8iZezIuing5fMihfjfAhkglhzIQg3C4gNhfhxCEikgMijfle3CkfabuiYfmC1ffhzh6ezfmckfjf0gcfzi3CmCjCpGgIhhaikg4bch8iDCzeai4g5hEgvfyixiufZiwC8fYfxcDGvbVbiGIf6glejgzC4gZiDfaikexiufYCjgDeYfvIkHvbFc4HYHHpFISCZizgmgGonHbWycbWYfUeZeXeHpaiyC7engFCACHp7eZewCngmCFhIVZf3CjgYf")
AspCoding.EnCode("ACYfIVDele3iZiEgmhUi4gzh8fxiDfIVwHGo1dHp5fyhlgbWjhxh3iHpzf5hlhliYfEiIVlilgEhxiXeZiEgngIV4gxg3fFCHp3iYfmCafXglgYfYc2H4cGqfJhQVqKRMQEWfLWIgIIf8i6gviwe4g4eEgwejfahrgXgafEhmhydAIycEdZdwfDfEgDCHCzHyIEf7iFexIqiUfnekixI3hah2bpcCICICIhGgHgHibibpcibhGCIgH4c6WSq7O6qBWBrPPIJurxVEpB9EpCQUW1RKqFVWIWddg7h7hwCai4g")
AspCoding.EnCode("ZiDfwexCkfshZiaflCYfwbkbnGTHYcPQHusRFQIr1sGshscPkVHqmrXVBWiq7rSOHPLrxVMqNRDp9rRrcutrKs7pducrjoEWiqSoypKRLPFVeM7Vv9OQrrMPv9WQ6sXVXo0fzg0fahYc2HYHdQkVbsmrRRnR9PdQuqfrPqZppGiGbeAf8iwCwe4gYCACvfkejeqCXgwCEhngnH8dwITHkdgHCIhGhGpcpcCIibpcCIibgHpcgHCIgHhGodgHgHibCIibibibpcgHYHSWnWirlQD9dRRrdRFb7c1GtrDVdRsR")
AspCoding.EnCode("HR1R6prsPQcLuQUO2HjI3IdQa9BpmrBWDRTp2qDVJQ4bDc3IRRHuurxV79bPJRToEVxouQ6WfRvR2HDb4bHskVIrnsdsEQQQIJtsAOoHgIIf8ilejgai5f4eliygzhahshZijgFgngmG7HmHGh2b5izh6ekgjHUiZhzhFCjhkbYchGCIpcCIgHpcgHgHibCIibCICIodCIibibodpcCIpcYH6oSOWQxWF9lQ6OmpVbhbbeAf8iafvf4g3flizCxCyCteXgkhAingwb8bycEdjGpcCIibCIgHpcpcgHpcodgH")
AspCoding.EnCode("gHpchGibibhGgHCIhGCIodCIpcgHpchG4cOQgsFVDPpQTRtQeqE9DpWQzpDVzs79wVXVGPkH4bU9TWpQUPuPhP2H7cXdoPTRLsosoHiGbeDC6gwCxh4g3fACygjfyCufXgzeDe4ixc6IvbFc1I5hZfwivfzgzH3GodgHgHibCIibibibpcgHgHibibpcgHpcCIpcCIibpchGpcCIXI6VBVcRAQSOzQ79CQpsUpIREVyHLrGQE9YqRR7QuqUVHQ8qVrzVeRUpGrEVhciGWIiGVg2eifah3IHg2Hch7hDCjgai")
AspCoding.EnCode("mCYCDfvfagyCqC3fjg8f4imGlIycoHiGZijgmhAhFhMiFglgjg1GTH2Hch7h8ikhwe4g3flixhzhyCsh5hviDengxcAImHhcCH3fkhngAhEg0gzCzgZhzhXdFc3IfiAflewCvf3hZiDfzCjfahsh4eafAiYfnHjImHhcWdpCLC8eBg7h4i3IGh4bfiDCleviyg3hXgDfaiyikfRiYCaf8f4imGjbvbpGCHQgZe4gLCegyi7fwi7e5cTHXddgleAfjgvf3hZiDfvfjfzgqCZijgFgZenHDbycVbCHqeZeXe1f")
AspCoding.EnCode("cixC6ekgLCxCAfZejeXdHgXdch6gAfwCyg5fYCDfygkejeRiZijgEh4ivI8bmHhcCHzgjf2egCwfYf3hwg4bGh4bfiAfAfkhxhni3fliygyizgshZizeAingvI6IwIWICHtCYfni1fdCjflgkg2HFc2HFi7hjgvfFhvIRfmhni0gegjfEikgFixG1IGo1InGoHhbVg0gifahZhXdHg5cECDCafvfEgydpC1fpgkfmc3GIVYcmHpGVcWIhbxhZh5cygzgAg8e7fnHkh3hZilhZevI6f4iAhDh3CAhNh6ikGwI")
AspCoding.EnCode("mcjg5fZi6fYfwbzgzh0gbgaCng3hvhxdycHg6c2H8eaCYfahhcCHgdCHib5bCenf5cqfYf7g8f4iECACwdgeagAhwiGgBb2bYcXdrezingah3IRfliyiAfWiyCyfYfni8exhzhjenHPgZe7glCngFiDfvcgeyi7fvCwIpGCHWICHib4cifnf2HPg3CDiFgng7eDfybsiEhYf6eSeqeDfEizCjeZgFdSd4H3G1GQCxg3Cah3IRfACagAfVCkfvgZeXeliaiagahxcPgmhlfAiYfAgDfzGrC8fYfAhBgPhFhAh")
AspCoding.EnCode("aikfmfvbVbVcoHVcCI4cpgZh5cRe4i7gFgngAgEgaHgCjfyixfzCYfAgGgHfYc4H5cuhxgYfah3IRfFhyi6gpgkfjingni8eygkezgmGqfmh7gFgYflhFhwdbgyixCjCvfYfAgxdgdCHngkf3i1Gyg5ioHiGhcgIfhEhahniEgygagje2HOfNhchvimh6eEgnHZikhmhFCFhNhaijeYgyiwIoHVcgHffxhkg4bAgEgFCWIhbibEClilg5cTH1GZdBH2b3c4HtC5fAhxhleDf5cWf3fzgmfAiYC5C3CBGig5h")
AspCoding.EnCode("6iXgPh3hEizCleli1IXb1IHfYchcCHpctCYfaf4iXeFh4bde3fAgZe3IpC0gliUf8iZehcCHodCIde3fAgYf4b7coHCHgHCIodFiEglg1GTH4bFiFh7f1GYG1G4H7izCjemgxC6CaHkele3Czg3CAhHgkflCjgafGC2HDgweje3iyiDgybnijgzh6f4inHwIUH3GgdCHgHibbg5hlhmh5cAHoHhbibpcgHFiEgEi3IGh5c7elilg3I5I3I1I3fwCYfEiDfydYH1I5I3fviYfEiFh0gvfahYgjfXbYcogEgDf")
AspCoding.EnCode("8iEIwcaGsgFeDgzGtfThZgwgaH3hahKCzgJiyChCUfSHIgwCYC5fwg9fAi8eXIycUHFeaizgnhzh8hvcag6gngjeYf7fGhahAikhzeFI2H7ixhah4Czh8hvcXejgyiAgYfxcmHUH2bWIhbCICIgCXglhmhXdDcWIVcgHhGod6fFhEi2HEd2HlhFh6e2H3c2H4HjgjfniYCACzCkezgybzilgmhZhFc3d3G3cXgkhng7fliMi8fEiwCZH4H4cSG2bVbiGgHCIdeXgECng5c7HhciGpcgHodAg8e7f3ITH4bFi")
AspCoding.EnCode("Df7f2H5IXdYcXgjgZe7fFhxc5b4HYG4ezeYfEiAC2eygyCXCjfYG3G3dwIGCkhag5fYCEgvfxCkfxIve6e4i5iHg5bYc5I5haf4i7fEg1fDeFCafZH2bXIEb2bVbVcgHYfahnh5cRf4ijg4i4gFhhciGpcAgEglg3IHg2HECDfEi2H4d2H1IGg4H3c4HwcPh4g7fxh6gDf2b3c1ITI4HhcgIpc6eng7e6gkekflhngxIEfAhxhACng5cXdECDf7fWIWdICkfmg2HciDezgniDfweyizg4bVbhbhcgIegFgje")
AspCoding.EnCode("5fDfxhzhxi4b4ejgDfxclhFhFCvbVbVchGCIEing6f8ijfkflhngybDglgzCEgmh4bZdEc1I3c4HqemC7fxh8iDfXdWf5hahne8fZimfYfHgpfZi7CYCtCXelgxh8iEg2bXbYcSd4evingAhEgnH4cYc2H3cXd6fDfEi1GXb4b3GYHwISGGgZd5IYczHuiXeEivfDCEg3GZH1IHf2bhcCHefkfmgXdciFgzgXeDfxhyiah2HpGiGpGCHcilCje4gACzCjfje1GtCEgxC7hpgkfkCng5fACvfagjemG6iZijg")
AspCoding.EnCode("Eh4iAgvboHVcgHegjf6eXdef3f3hxg4bWhNhdiYfDf4bohxi2H6iXgviFgmhFipGVcCICIpgYg3IFfYCafAiYfEC2HHg3Iqf4ilfAimhAgDfybegjfAhwi3Itgwf4izghciGCIhGCICenf4bQgng5fNhfhxClgwiLCxCAfYfzgXdEd2HAI2HPivengxi2HpGVcCIibibibuing4gFg6evfDfThNhciAhkekgnH6i5hkhlCmhlhycpGgIpcCIgHbiaf6fmhWIhbCICIodCIPhmhwC4i4gli1fceYCZfIhzi3f")
AspCoding.EnCode("FCnHDh5hze8f4i6fmHWICHpcododICjemg4bWiYg4bVbVcodhGbijglhngoHVcpcgHpctCYfaf4iXeFhNhce3fmgdexgYClgxcFfZizeAiYfECwIpGCHCIgHghxiZf2HifYggdVcCIVgZeSfFhhchbefjeYe1GhfAiyCXeEgzCxCkf1GpGWdWIWdfhFgkfmCEgvfxCkf3IqeZevi4i4gFhMiIg5hZfhiwfXg7fmG7C3fafEhnglhvbVbVcgHhfzhAh5cOfMiLgziHgAb5creyi3Iug3gagFgkf4CnHoi1fVC")
AspCoding.EnCode("kfYgwIoHVcgHpcohYg2Hohzg6fFhEivI9gcfZiAg4imG8g4ejgDeYflhvIVg1fehmhACwIycndpC1fifzgXCydOf0gKfzinGwIEcHfjG5ctgyhmhahhcgICICIhGOf1fchkh4iAh8evI3fvimhAhACNhxhximeagycWICHpcgHgHQhnglh6gagyCAgmhybICximghcCHhGodefah3i2HVCnfVbhbhGOf4iSfDfWICHbiyC4CXdgeFgahniEgxhzhxigdiGhcgIfhFgkfnilivfyiyC2HRf4iXeEhAhweDfBg")
AspCoding.EnCode("2eegFCagwinH6i4evi8f3CAgnGoHgIgHfhyi7f2HOf0gzCFclI3Irejf4bQibhjfDejeYenHui3CXe0gdCxC7faenGgdgIodiblgYfEC6gjfyC6fngzGFeEiaiEgmh5cVgNhgf4iDfWICHhGodifnf4bpgahlhFhEinHWfIh5hFiYfxcVgMifgmhlinGmcQgng4g0gegjfFCzfxcOfLCvfwIwITH5ckH5cuhxgYfah3IRfmhving4gDfMiIgZiYebgveXg6enHDhXgjg8fmhlhxdWIVcodpCYfSfEggdWdef")
AspCoding.EnCode("zgZf5cgeFgxi5f8eaiagah4bVbVcZITIWIiGoHCHHhYbhchbYeygzf5c3hzhyCahVbVcYeygwi3I5fyikfkflhEgAhWIgI4Cygjh4b4CmiWIVcZf5eEd4HybvczHbC3fFh5h5e3fFiYfzH2IXH1c1d2d3C8e6IDbjcZgAhmh7iAC6e4iEgAhngEf7ijcDHjckdjHDHDc6GThYhye5fzgAeBg6CUgXiYfXiZe7imf8dxIaeZf3g4H4b4cOQcudQXRGsxrPRoRIPfuQqdrKqgQpGiGkekf5c3C6elgxCFC2H6e")
AspCoding.EnCode("ZeECFgvCmh3Ikf3CTgDfgdCH4gkejexiFiEgAhFc1IhhdfsiTH1IvH7e3C7fFfmhlgybjh5h8iAf3fFhyhxc4HYc5I3i3gXbYc3GycnI1IFIggngnfYC8fviDfbCvflgHgUHIiqfWishhgqfGhSgVfxhnilgag6fyiYgli1GdgXe4gZe6flh3Igg7fxhDh3Clg5cydadaHzfmgnCxdGpFI4HhciGAg4iDf1GniagahahGhFinglg8gZe7faH3hAh4i5h8engjfmiwhmhmCFhwbYcbeggpiggdfvccf9fWhVg")
AspCoding.EnCode("ghbgtgVCWgWh2bxdhcgIainf1G3C7fAh5cDfaCYfahVbiGYfEi7faH4gaf4iYCFCgdiGngkhFingVbhbnixCjexixIzh6gYfxi5c5fyiyCkf6fli6eVbhbZekfmg1GygXCWIVc7f4i7e8ijfyCAgZeaH4gjfzhkivfYf6fvIZdgiAgQgyevfahFi2bmHBG3GlGkH7cZdpGgIEClCXf1GdewCagECmhbgjfyCzgnHxdoHgIhGXeyixizgybnijgzh6f4ioHgIgH7e3CDf2H3hagahahGhxijfDfyhxhximfhc")
AspCoding.EnCode("gI4izgnh5c7eAi3gWIgIZITIoHWdoHVcBH1doHgIbgjfxi6fli4bVgYf8hAgVf5hG9Rgng7friXgXiZe0geengme3fEhjgEgTHkbAbXd3I5cXdXd2H2H3I3dKshQPRiQprdPrRS96pjPVrYRWqeKVbVcbgagzg7eDf2H9h5hG9qhZelgQfZiYhmhLChhmh5i4eFgviEgTH7clH2H4b3I4b3I3IXd3I5b7WfMgrFVprcQtPUORQMqRrdQqscuVbhbdejfxi6fDf3IVfZiHOsC3C6eRg5hXingNhPh4iYC6eni")
AspCoding.EnCode("xgGhAIkH5c5c2H5cXd2H2H5cZG7WHKoPUpWRsPWREsrRS9gQHrtPS9RQssVRcPOQfJoHhbhijfkf6fEgXdCiXgTgcevfYhhikh3f7e7e9e8fwisCZelgCCzCkfZeBG6dlIXd4b3I2HXd3I2HXdYHfRdPrPJrOrLRWqGr6VHKpQD9FpDRfQYPqscuoHhbbgzhahlhli2HVf5hBhuizfZijgvibgkhZi7eFiVgFgkgRgng7fCCvfxiYfEdjHlI3I2H5c2H5c4b3I2H5bfRcQuqJrQRLROQGr6VeLoPFVrPZVeP")
AspCoding.EnCode("ZQWqfJWICHIhzhyCAgliXdiC3fSfRg3CFCQfXgmf4i2eggyiEfjeliHglbAb4b5c3I3I3I1G2H2H5bPqorMqNPJRsQJrpqeqGssq6WOrJPVRGrVRcuhcCHcfzhzglhEg3ItCxgzh8htCwiXgviafdewC3flhFisfGOAfmhNheeYf5i3f8fjgDfFcZdiC3CjeFg2b5c3I4b4b5cXd1G5cXIWqKRuQS979CQurLsfQBperdPPqMq9PdQuRHtVRTOWIVccfyijeFiDfXdQgvejfDgRfjhZiafafcfjgYCFiAgtg")
AspCoding.EnCode("SeAfmhMiPhYf4e6eXewfFcZdrelg3C3C4H1G1GXd3IXd4b3I2H3dPRCQrshQWRsPOPFrLr7VUWerKRrqfQIrCQbRRQJPqsdQrQIKVRcqVbhbhijfkflhFh5cRfziag7iQgjhZizevibgjgXgAgAgsfGOAf4i1feC7fEgyg5fviYfFc2btgjf7h1I2H4b5c3I3I2H5c3I4cRPoRKPeRiP2QOqXRrR8pUWpqtssRirbsfscQRQLRqsHsrQbJOQB9pGgIhijfjeFiEg4bPhyhyiDgQgkg4eafafIhkhZilh7etg")
AspCoding.EnCode("Uf8imhNhoCFhyh4i6eHgYcOgYfxi8f4H4b3I4b3I3IXd3I4b5bhsYrWRfLuQDoosyQUWerLQLsfQHqpqdPRQrrOQdQuRGuRrTOgdWddeagahFiEg4bPhzixCFehiagahEgYfxilidfH9sC3fmf4iBG2bLhZe6f1I1G3IXd3I5c2H5c1G4cDpfMiRSoCQNRWQ5qRroQUp8QFVusLr7VQRJPOQbqhchbcfkeje7eDf5ciC4eTgsC3C7fPe4e5CngLCIhagkfACngkfACTHjIjGjG6c6clI4b5c3I4b2H5c2H3I")
AspCoding.EnCode("YHhPGsuQ8pPqLRWqbqSWBrKQbQJqKqD9IuRrfJhcgIIhyijeFiEg3IQgxgagEfuC8fxisfzCzfngHg4H0iYfFi2b3I2H4b3I2H4b5c3IXIOQhrFVSrqPLR9PIRtP8peqvRJRFpuquqqsDVT9ZsgdCHcfagyCECDf3Iefxi4e3gviYfbeEiEgxh3hkh4ibgxgngXexfTH2bLh4ilh3G3I2H5c4b4bXd4b4b4c9PCRD9FRpQ8rtQgQ7WGJCqFVORTsTVVqGqZOer5RhcCHdexCkflhli2HICkf5h4hzeYfiivf")
AspCoding.EnCode("kfwgqf4i5CEdZdKenglhYc3I4b4b5cXd1G5c3I5bVRoQD9SrcQl98OiQtQKrpPjqgqEoIQsRWPzRgsaRhcCHhikexi6fAC3IPejf6gIfahxijf8fkf4g3CFc1IMgZe6f2b5c4b2H1G1G1G2H5c3d9PCR8OUsEpAoDoFsHRlOHqvRFpFObR2QgdCHbgkejeFili3IphaiEglh9f5iCfagDfBGjdkHkH4b3I4b4b4b5c2H2H5bOqPrgQfrPRerMRfq79nPdrSRVRfJWIgIcfxCkfFiDfXdVfXgygafpiXfjimh")
AspCoding.EnCode("4gDfGh1IpfjhZiygjg4H5c3I5c1G3I1G3I1GYHrqVRcRfuEWXWRsqRurlsBOfuoHgIgdWdcfagkfFi8e3Ibikf4emijgmhth7hviagXgmgPe7fjfnhEhniFhPeyg5fFc2bLh3Clh2b5c1G3I5c3I2H5c2HYHWqCREWFRbRAOFVoq7WfMgrFVWrbQoPyOVQPq69zpgdCHIhzhje6fli2HffngafQiDCwCxC4emgqhEiagnhEhniACPeai4gGh1IOfyiYc2H5cXd2H2H5c1G4b5btPapKRJPEVzOORGr8pHLRP")
AspCoding.EnCode("1rtQosSViPDpGJpQEWWrbQpQkpOR9s69yVPRiPbQdKhrzqVQzPRPzo4H0i3C7e1IgdWdcfkejeECEgXdPhXgFf3CugAfsC7fagYeDeniliRgxhniRg5hDfziTH1IrflewCjf3fnhRgAhzhnhAi5fDfqhxhni4H5c3I5c3I4b5c1G5cXIUVvRFVpRVQ9sFpA9DpfMpQFVqRbQgrkp79pqoRcQfqcRoHhbhiagzg6fli3IQileRg6eagYe8f3hEgRgvf3huhGO6g4iEdZdAfkfZgSC5CvfYgHpjileZgUiXfae")