en_productshow.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("GgZIbf5cWffiWhfgrfchfgefGhRiIgQgcftipgrire3IdeWgeeefqhdgfgefGhUb8d6I2cSdgdCHBHZIxCDCDfygjfxi1GngG9Afzeai4gxhFhFbIiygkg3Ibe6fAfIhzh3ixhjeZg5HUcVbhbFdYbYbUcpGgIEcZIqf4i6fAfzhzglhngxIhCFgZhZh3CEiHgPi7fDe3C5HBbhcCHFd5HVbhbZGxHncxHxHaIxHncmdFOnsVPzVVq79fRUqzbncmdyGncaIzbaIxHncncxHncmdxHxHncyGVbhbZGPQIJuP")
AspCoding.EnCode("8Rbs4RHrpQD9ePurZpQsaRDoQQtRFQ4bhcCHYHdfjgYCniwgWgDeDfLqGrUWmQZoGPveDfliDCUGyIvd6CEfFezGRCBg5CvhxI5fyC3IoHWdYHaIyGyGncncaIzbncaIzbxHncIQHJMQBoVsnQDpIqRRmqcqTWncxHxHzbzbncxHncaIncaIzbhciG3iygkg3IAgng7f7CYfEi1f7CjHzIAgYfEiFf4iAh0gFfkbWICHlh4ilg8gYfEi0g6ikGHgdeAg8e7fwbPgnglfEhmhECEgvctC3C7fFfngFCqC3flg")
AspCoding.EnCode("vfZi5ejg4i6fmGYcoguhuhqhMiPghgegfeqfefQh2bycvbpGgI6f4iAhDh3CAhNh6ilGHghiAgDfEinHqfmh7gEhngAgACxIPhmhFC6ingEiuf4eFCvf5hmiaf3C6fwb2bqeeftiufefPg1foieCiCIC3GwIvbhcgI5boh5iXd7e4ilgDhng7fMi6ijHEcSd4H4H5creyhmhjeoHgIZGCIzCYg5c2Hwiwe3inHECng6eFfng7fNh6ijHyHFHzIwC4izgvI7eYfAh6imh7f2eEelGmHycFdGeAg3CFCFfZe6e")
AspCoding.EnCode("LC8gDd4b3IDfaCngkfgdCHXIhGhGti4iAg7hyizglhYfvcqfngZfweFCYf5fFh3IlhmhAh6iYf7fNhDh8coHVcXIpcngah3i1GaiYgWIgIXIhgkf4C2HainfXdoHgIWICH4cxHnczbaIxHzbaIxHFWj9rRyRDpHrFV0ryGaIyGaIyGxHzbaIaIxHzbzbmdaIncmdmdxHoHgIbCzCzf3IOfMiPeagFiDfxGoi0gehmhFhmcVg0gpgjeyHOfNhohxiZhxGVg1fNiyhabpCNhnhmixGVgMimgXfFiDf7fabXgkh")
AspCoding.EnCode("nglgAC0gxhahXCyizIZiafZeFCDfNhAi7fwCyHWhNh8eUf8iYfyHQgYfniLCdCxC6ekglhmcQgmh3hMidCkeEikgNhagAf4ixiyHui3C5f1fcikeAhjhxGkfag2ebgaCngnixfhciGIivfvC3IbeAf6gafxhni3fDfvfagyCRiXgjgDeYfwbAcvboHiGbeleAfvizCXeXgACzCjfjeteYCjglCmhvIkHxdHg4H3dHpFIGo4exi3iIVwbUiwIbWYfG9Yf4gHpweyC6fYfAhEgbWlhmhviYf5fFhbW3iYfving")
AspCoding.EnCode("lingbWAile3iXgEgngIV4gjflCkfliHpadHpZIIV5fzi7fUijhygZfbWkg3flhlinglgHplilgAije4g4eEgZeHp3hxgXg7fbWnh3C4gviYCFCYf4H3I3dIscueR9QurLPFVfLoHiGfi6g7hkhxhniXgEgygkekfuf5hkhAimhmGAImHFc2byhACFh7hGiaGyI7iDgEfvctfUfYhwgyb4gzgZdCIibibodpcCIpcgHhGodgHibpcgH3d8pSqSWAPHQBrQQHuKRap79TO6OfsFo1RKqD9WIhbch8iDCzeai4g")
AspCoding.EnCode("5hEgvfyixiufZiwC8fYfxclGvbGh3GPQIJuP8Rbs4RHrpQGrAoIryQvOTVpPjQ6VGQsql9KQ2QDpPRqsHLJRtR6oduBWx9EWoQSoxoMPMQD9eMDo5VqsssLQYoVP6sXVmO2hzg0fyC1I2H3ddQkVToxPVrwrVRbqJrpRPqZphcCHdgAflewCvf5f5hEgxhzhahRi3fafEhmhxclHycHgjcCIibpchGpcCICICICICIgHodgHpcgHodgHCICIgHpcgHpcibCIgHibXIFpnWir7RFVIQRrdRGikG3ILPDVbPtQ")
AspCoding.EnCode("Gq1RDVJQRqbKMs7V5cDdXddQlpGRnsdsEQHR0QF9KP3IDc2HPPcLKRyWUWcqtrGREVzVtP8pgQwq4bjc4bcPkVBpmrBW8qWsbKJql9pGgIfi6gAfvivf5f5hEgxhagzgqCXgkhEh3Cxc8IycTH3GXCjfAhwijHSCnfzhAhaeAHYcgHgHCIgHpcodododhGCIibpcCIibibpcodhGpcCIibXI7pU9PrzpF9zsEpmphciGch7hleafygXeXgACygyikfRi4evi8f3CvI7GmHHgkHibpcgHgHgHCIodpcCICIhG")
AspCoding.EnCode("gHibpcibgHhGhGhGgHpcodhGCIododgHZG9PgsFVUsCqTRtQos8VDpQszpDVAPFoX9w9TVAb5c6VTWpQ8rtQfR2HkGXdpQSQrqfRVbhbch8iAfafxh3hZiDfaiagxirg5hviDe4ivI6IwIHg1I3f4Czfaikfvd4HCICIgHpcgHpcibCIgHibCIgHibpcCICIgHpcCIpchGCIhGCIZGDpTWcR6RDpjqUWfseRD9HsDOyHuQBVFOxsQQlRsQ69GPDRVrypgPD9IRFWVbhbhcgIVg0gCekf2HGh4bfi7hlejgvf")
AspCoding.EnCode("ni5hFhzCzhahRi4ejgAingnH6cmHoHhbXgkhnglgAC0gEhAhwC5cHg5cIfleDCafxhni3fACvfzhahte3fvi8fYfvIjHycgdWdYCzengAhli0gxhah5ixC1GFc3Ich6gAfviai5fZiACvfjfxite5hkhDeYfvIlGwIgdgIoi1fliSe8iYfXdHg1GIf6gAfkhai5f3fDfygxCxirgXgze8fmhxcjbmHpGiGqeYfniLCgeagFCvC6f1GBGXddgDC7hjgvfmCXgDfzCjfzgte4eviAingwbjcwIVbCHuiYf4g1f")
AspCoding.EnCode("gexC7fzfNhag7hmhah5cTH2Hch7h8iafai4gZiEgxhyijeRiXgjgFgngvI6HxdoHVckfxC1fbgxgYfnixf5cGh3IIf7h6gafxhniXgEgvfyizgRi4ejgDengmGDHvbWIgIRfmh3hLCegyiFCvC2HTH3IECDCafygDfxcqengni1fgeyilgjhlhabYcIV1IwIpGCHOfNhohxiZh1GHg2HFi7hkhzCFhwboi2epgxizI4HUi4HmHVbgIVbgIygXC3IxhahEClilgxcafXeYC6fmhxc6f3C7fDhmh6e1f6ijHmH")
AspCoding.EnCode("zIafniYCEC3CmGzgzhMibgyhmhnijCnGycHgAb3IDfzi4ikfhcWdoHCHpcZGohZh1GqfngAeFg3CAgliaHcikeEizfFdTI3G4H3Isfyh4ikf2HRfEgxC8ipgzgxeYf3hlixhjfjemGReYfDilCZeAgACwdhfke6evCwIgdhbWICHodXIifXC2HPgZeAeAi4iAgFhvcqgEhYfEiUfQgDf6ezCkfmfHhTI2b2b4bPiwfYfah4buiDfyi6gWizgwh4iXeliygagzgvIPgYf8C8f4i6fACaHqgFgYfEiUfuiFhlg")
AspCoding.EnCode("vfahZgmHVbVcWIgIgH4cpg5i1GPgZe7gDeYflhEgxIcfzhzhjCyg4iECFdHf4H1IXdQCwfngkf5cqeEgyiAfCexivgmh3hFhaiagzgvIReYflfEhmhFiFhzGbgjfyivhxh3ClhvbhciGngximg2HainfoHhbWIhbegFgyC4gFhxhxCxi3Ioi1fbewCYfAhlinHYCafmhAh8e1faikfnfagmHhcWdodbCwekg4bFiEgAhVbVcod7elilg4bHg2HYcEc4H3cZdRf5fEiwe7hFh1GWfXgjeZglCXgXiYfFcoeZi")
AspCoding.EnCode("FfYCQgXe7fygAfFhYcZH4HHf1IgdVcCIQgZeafmhniFh2Hde4e7eYf5cpC2eEgGODCYfpGiGodCIgC5hAgYfXdAIoHWdgHCIhG7eliEi3IGh5cAgFh7f5cZH3I4HFezCkfZfzhDgybzh7h4ikfYfAhGhxi8fvijgHi3I8haije3iagDgxI4gjgjfECYfxcmHGC4HWIgIgHpccfZilhng2HkbWICHibpcCIAgDfEi3IFc1GAg8elg1GZH4b1IXgafmhAhACvI4cZd4d3fafngFCAC1fygkf5ike5IYcCf8eli")
AspCoding.EnCode("6gFbxbxbqiDgDgxIueUfmfvhybniahNezg0fxibhThHCbhkhZiXewgpiFgDf4cmHUH8hygahmgag6CxIzh7h3CxingEiTHjelCafkhHi2H6CvfahnhkeEfvc5fafag6f4iydxdGC3GWIhbpcCIIh5hFi3C1GDcWIhbCIgHpcFiDfEiXdTH2HFi8eAh4bYG2H1IzeagmCXglivfyijevcwfFCngmeTHXI4HXbZiafYf7fEgLCAilgjgYG4H5bHi2boHiGhGhGcfZiECZe3IkdgdCHhGhGodAgACAh3ITHXdAg")
AspCoding.EnCode("DfFC2H5I1G3GZivingAhlivI5b4H3c3fjgYf6eAC1fvfahYgzhXb2b4cmHUHkhzhni3fliygyizgybzi6e4iYgHgXI1I5I3fwCYfEiDfLC8flgjgZHYcYHHi2bWICHibngkfnh5cQgngaf4i4glipGgIhGAg8e7f4bHg3I6fFhAhXd5I5cZdFd4HZH1IvdtC5flgvf8i8e1I3c4HGeYcWIhbibAh4iAg6gagje6fYfyb8hEixh8eng2H5clhFhFCVbhbbijemg5ceg8fxi5fDfxhagah3IWIWdWIhbfhlCxi")
AspCoding.EnCode("4glivfkeyC2H5hviDfyd6fFhAhnGoHVcgHgHlgYfFiDCxCyC7engyb7ilgxhFh4iXd3GEc1IXb1IRfniEivf8iAC2HWfZijeYhEh4emfngBGigYC8gZiRfni6eaiAfAC1IYG4HTI3fkh4i7fDfnHXIZd5c5I3I7eDfAh5cXb2H3GZGnGUHEcZdYG1IvdtC5f6eweDCEgZdXb1IHfZdWICHICkfmg1GgeAixi4gFhaiagah2HhcCHWICHgelCkf5fFhygzhah4buiDfjf7hohxiyf4i4gliygzhximG6iXgjg")
AspCoding.EnCode("FgngAgmHgdCHpchfxC7f3Ihg3fniwf5cWh0ggfmhEg2Hohxi3I8g3fviFg4i7eWIiGCIhGifZh3I8g3fkhEh3CAg5cEdXdqfYf7glC3C6fEgaHcikelgwi2HrezingahVbhbpcCICIpgme2HRfmh3hMifhkelgzfMizh7h3Cah4bFc1GAI5ctgwf4ikf2HVbgIibCICIodQgmh3hlCEiygliUf2edC7fzhwinH7C3fkhEhZe6fycoHCHCIgHpcICwCECZeWIhbpcCIibibui3Cze4i4gFh0gdfZi3icfziYC")
AspCoding.EnCode("7fnH6i4ekhEhZe6fwIpGgIodCIpcefxiYe5cifXC3IpGCHCIgHghvi6fYfoHgIodpcCIQgZeafmhniFh1fce4eYecfziYC6evI7CYCafDeZeECwIgdhbCIgHICzgZfXdifYgpGiGpcoingBhliWIhbefxiZf3IhfDeyC5fDfxhagah4bVbVcoHCHfhEhxi5fliygyizg4buiZeving4gEg0gIg3f4Ccfzi3fFCnH8gXgafAiYfFivbWICHibegjfAh5cVg0gKfziHg6c1Gtgke3IseXfzhFgzgZfwbWhLCpg")
AspCoding.EnCode("xiXCxdoHCHCIodVCnf3Iifxi7eEgEinHVehiXglhmhwb6iXgjgFgZe6fnHWhNhdimh8ewImHmcWhNhVCahZhxc9e0gNixgmHycBHHfAb3IuhxgngyCWIhbibodpcVgMiIfze3C7fFhxc3fwCYfAhFh2evfxinfjfwIoHVcodododRenglh8iagahlh4iwdfeximgVbgIgHpcbikf3iXdifnfhciGibWhZeSfEgpGgIICzg3i2HciDexi5fACygkekfWICHVbVchf8fkf4gACaiagzg1GRfmhniEh7fwe8eSe")
AspCoding.EnCode("1fciFCkekgyd7C3fzeDe3CAgxdVbgIgHdCag7fXdOf0gweBG6c5ctgzh5cugbhjfAikfmgnHqe3C5f1ffhagAhjhvbhcCHgHibAh4i6f8iagxiAgmhvcFeEiygEgng3IVg1fcCYflioHWdgHCIpgnf5cifxilhEg7fwb9gcf5hFingvIOfMifg4i8ewIxGQgZe5fNhegag7fjhwbpC0gaixdxdTH2HlIXdQCwfngkf5cqengviYfXeli0gbh5hnhhixgXglgmGFf3fkhEh4ilhnGWICHpcWhmhHOFhVbVcfe")
AspCoding.EnCode("zg3i3IhfAikf5fFhygzhzg3IgdgIYbBbgdVcWIVcBHXGgdCHnhaizfXd5fzhahjeoHVcZfvfkg2HnixCyCyC7eEgAhhcgInhxhwiXdYemiWIhbmgXfFcYcaHvcvdff3fli4e4h5h7eYfyI4GYI2dZI1cYfli8Gjc7H5ClgZeEfEg7fmhli7fYfEfDgkdlc8I8IkGDHjbjcThmfyeXejelfH96CTeZg3C5CYfFene8dxIvCnh3g4HXdXIOQGMdQXRdPmP9rercRdK9rBVKqgQhcCHagkf1G3C7f7fzhlg4bAh")
AspCoding.EnCode("mhFi8fzfmh4bxiYfG9EghcgI3hyijexiAgEglgHg1IffhCPfFc4Hzd6fnglgFf4i7fvcjhXgAf7hXgDfyhxc1I1IZH3i3g3c3G1InGnI3GUHhhngYg3fEhkhACggaiFCEdUHffPgVCqCefPgTHb9Weygni7fkeFiagZhFh4bfi4g4gng7e6f2HhhAhaiDhZelg2HxcnbybvCnh4hycHoFIYcWICHFiYfDf4b4gzhzgzgEdAgmhAh7C4ilgvc5f6e3C3fFh4ijfnCyfmh3h8enHYcIfffWgffgiwdgCoC9eVg")
AspCoding.EnCode("ghhitgohVhoiZdnGhcgIxhYg2H4iEi7f5cACwfYfxipGhbmh6e7fxIXejg3CXgEioHVcZevi6f3CWIiG5fagkfahvcjfAfYfzgXdniagzgje6fFhEiVbCHZejeYe2HaiXCpGgIFC3C6flekeyCAg3Cyb4gjfxCwgvf3C6fvI3GceFiuiwgxhxiAg2bmHFc4HjIkHkGZdoHCHlhFg4h4bIhvijf6fmhIhyikfxivIycWIhbpcXeyizgzgxI4gjgjfECYfhcCHod6fngEg2HnijfxiahHgkfzhEgwfxhxiZgWI")
AspCoding.EnCode("CH4izg3i1GAgDe3gpGCHYbTIWICHVbhbFdZIhcWdgCjfkfAgACXdOfngEfFiWeXgG9QfZeEiRg5hYhmhMiggngYg4e8fafFhGh8cAb1G3I2H5c4b4bXd4b5bJrgPPRfrfRcQLr8p6paqRRZqVRfJgdgIIhzhyCFiEg5cVf4eHOQfmhEiQfYCmfmhNheeYf5i3f8fjgDfFc6d8dXd1G3I4b5c3I4b4b4cSOItgrFVeqbRuQS9OrKQRrHsOQcuhciGIhzhje6fEg1GOgYCTgriYfEiPeZimf3C0gqeYfXg7f3h")
AspCoding.EnCode("ziTHjHkH3IXd5c3I3I1G2H4b4c7WbuoPSoOPrQqrEstP7VosGsuQDoqPssVRHsWqfJoHWdbgjfyC6fEg1GWeZiG9IgxhXibgkh3fFi6fVg8faesCYf7fOhygahmhGh7ckH2H4b4b5c2H5c3I5cXIeqHrrPJrQRLRVRIR6VbuhsUp69EQCsZQVRfJoHVccfyiahAgDf4bOg3fBhuikgXgafvibgvi4eAg7eVgDezfqhnglgWfxhah3CHg7c7dXd2H2H3IXdXd2H3IYHprdPtRJrRQJPRrIR7WHKCqD9tRZVgR")
AspCoding.EnCode("YPOQcuVbhbhizhjeAgDf5c9h5hHOqhmhEiPeXgXing1fIijfEfahEgGhAIlIXd3I4b4bXd5c3I5cYHqPpsKQ2qtrsQKsCQeqIqtP8pOrKQOQIROQHLgdWdgCkezglhli3IPhyhyi6CqewiXgkhjgcfviZi6fFiQCUfAf4i2ehhmhme3fFgzeEgEd1ICiYfxiDeYc2HXd3I1G2H3I2H4b4cOQLQuQ7V6OerKRsRePBppqHrPqKQ9PcPsPGuRrTOpGgIgCxCkf7e8eXdQgaCzhDgRfvCXgafwCcfjg4e7eFiPi")
AspCoding.EnCode("Bg7h4i0gPhYfZi7f4gwfBGZdsf7fmhng2b4b4b5c2H2H4b4b5cYH9roRsreRVqKrOPFrrR7VSVoRKRtQCsBpercQ9sKQVRIRrQdLOQB9VbgIcfzhzg6fFh5cQgxgjf7iQgwi4ejgzebgze3flhAgtgUf7hmhLCdgEiACzC5fafngEdZdsfagAfYc1G3I5c2H1G5c3I4b5bQqerMReRoR1PWQ3Qsq6W79pqMPsRfQIrpqIq9sMqWqGrsPbJRrdRoHVccfjfahAgFh3IQgaCag8hPhvCZijgvicfzeYC6flhPi")
AspCoding.EnCode("UfDCYfNhVh8ewf4i7fTH1IVf4iyClCZd1G3I4b5c3I4b4b5c3doPYrWRGKrR8pprmrEpertstQfQIriPIqPqJPOQIRsPbJqsdRhcCHhikexi6fAC3IqewfagEfIhyikfDfYfzgACgiBgRg4emfmhFc2bJfZe7e3G2H5cXd1G3IXdXd2HZG8ofMiR8OpqNRWQNsVRoQ8O8QFVLPtPS9OrLRWqGrWIhbcfyikfAgDf1GiC3fSfqhngAhqh5hXiYf1fIhzhxiDf4izgliHgkb6cjG6clIlI3I3I3I2HXd2H5c2H")
AspCoding.EnCode("3dgQbRrR8pOrKQRrbqUVEQMqcRLQKqD9HJVRcuhcgIhikezg7eEg1GRfyhagDgqfEhahQCygwi3CEd4HJfngECZd2H3I2H5c1G3I5c2HZGRrCREWEqPqrrVRIRrRDogQyQKqSWJruq9PDVbQYrVbhbgCzhahFi8e3Ibizg3fmiafYfchlgFhyg4gwCngIhyh3CniwgFc4HKe3C6f2b5c2HXd2H4b4b1G2H4cOQoQFV8QgrDsLsos8oGJCqD9OR8qBWqrIsvoer5RVbgIcfyixi6fliXdefkfZi5ekhmhVevf")
AspCoding.EnCode("zgyePg3CZgFc4H0iZeFi4HXd3I1G2H3I2H4b5cYHOQoQFVUsHrxVFVCPtQtqhrjqeQEobPuPVQ6rgskPWIWdgCjfje7eAC3IsCzh6gIfyCzgjflCkf4gZeBGYc0inglhYc3I4b2H5c2H3I2H1G3dOQoQEWFRUWjW6WErTpzpHqwq697pHrNRhcgIIhyijeFiEg3IogygEg6foCnfVijfACTHDIlIkH5c2H5c4b3I2H4b3IYHOqPrfRpRqQerMRorFoZRHPSR9PcuVbgIbgjfahlhAC3ICiYCzCaf9f3gkC3C")
AspCoding.EnCode("5fEgTHYcoekgZivfzeYc3I4b4b4b5c3I3I3IZGtQOQdqdKD9XWOPqRLQArdqdKgdhbVbVcdeagxiAgDf5cefkf5h3gkhngugDCjgzh5h4CrilgyiZfDemCDfqhai5fEd4HLhmh7e4H5c2H2H3I2H5cXdXd3d9PCREWSrbRyWEWfrSOItgrFVRqcRpQx9QrRQ69lOoHCHhikeahlh8e2HggZejgPC6gvijfZiYeri7fxCmgDe5fEgQfxhniTH4HOfagZd5c3I3I1G2H4b5c4bYHtPzoMPKQ89zOWPIRUOGMqQ")
AspCoding.EnCode("5PuPosSVfs7WGJpQ8OqRbQhskpORqPEoA99roRdqILCRzqVQlrqQxV4HKe3C6f4HVbgIIhzhahFiDf2HPh5h6iYfQi6grilgzh3iDeniEgRgyg4gRg3fACwfFc4HPCAfjgag3f3iQfEizhmg8f3hEgQfxhni1I3I2H5c3I5c1G3I1GXIEoyQEWpRORRQSWxWSOGJgr8OVsbQpQlV6OfsCQbRhQT9pGgIhijfjeFiEg4bth7hrilgagmgDe5fDfqhxhniuhSe6gYfFc2b7hyCYhbWXiweYgUivgAfXiHpXfjh")