index.asp

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

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

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

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("EcXGfC2HCCdg9egfugdgehbiTHufIgQggCtipgRgre2HIhpihhefPebeheefFcTdAG6I1dSdoHiGTG1dagDCFhxhjfyC3IYfHOAfjgvf5failiEIhhaikg5cdgFiAfbgjfYezCzgmfYbTIVbhbHh2c5HHfVbhbEc5HuCngFi6gzhxi7e4ixIIgFgYgYgYf6eTHPi7flCYfZITIoHVcBH2cVbgIYHzbaIxHzbncaIaIxHFOvRPrypWRFofRBPxHzbaIaIxHzbzbyGaIncyGmdxHxHzbmdmdxHWICH4cQPIJMr")
AspCoding.EnCode("FQTo2rIqCqEWhqur5V9RaRDoQQsQDq4bhchbZGIgafZi3hvhoCEhFhsrcPSVyrXVHQziDfDf8iEIxbyIDg6CDgvcrhGOXiwgvc5fjeXdoHhb4cxHmdxHzbzbxHxHncxHxHaIxHB9eMLPIsQPZq7WHrRRmqcqcsmdyGncaIzbzbxHncncxHncmdoHCH3iwejh4b7eYflgEengFC0g6iAImc7e3C7f7Cng6e1f8gjIVbVc6fYflg8g3CEi0g8gkGTHIhFiFh7fmGReZelfAi3C7eEgwdtCYf6eEe3ClgqC5hAh")
AspCoding.EnCode("vfYC3gaf3C6fvI4HCfPiPiRgNhtihgcihgtiefPg4HnGxdWICHlhngAhDhmhEi1fFfkbGhhi6fAClgxcPgmhDiDe4iAgEgxIQgng7fEeYfEiufYC7fygXgXfviYfFiwb1IRfghPgufghti0gVgIfiChgYcmHwIpGgIZGifZh3IAgYfAhDhZelgMiEe6dBHHf2bZdXdsfxgYfxipGgI4cgHwe5i4b4bjhxh3ivIAgng6eFfYfAhNh6ilbxGUIyHvimhahydlhmhEiEengEi0gFf8cmHmHEcTIlhnglg7CngEi")
AspCoding.EnCode("Nh7C8c3I5cDfve3CkfVbVcYHodgHQhmh6fAfyikf6fngaHti3CYezC6emh3hli3IlhmhFC7CZeEi0gDhkboHVc4cgH4iyCZf2HaimeVbhbZGefzgYe3IzCYg5cWIVcpGWdYHmdaIyGxHaIaIzbncSpyprRyRSOHrFVXRyGxHzbnczbxHyGyGyGxHncmdyGaImdmdxHyGpGWdggzCjh4bOfLCRgjfECDfzIOf1fdi4iEgaboi0gWizgmcOf0gifjeXCzIOfNhLgyhabWhMiZfXfabWhMiZfnCAglilgabZize")
AspCoding.EnCode("4ilgEg0gygzgnfkeyHZiaf3C7fEg0g8fEiafmcWh0gDfTh6gYfabuing4g1fdCagEizfAgxGQgZe5fNhegag7fjhNhke6g4ijendRfYf3hLCdCjflgzfmcjeagMicfve4i3hvhVbhbIiygkg3IbeAfAfkhxhni5h8eygjfxish5hwCEhmhxcDGwIhcgIIf8iAfafai4g5hEgygxCzgRi5hwCAingxckHnGEd4H5bUiUHSC3fahnhHpnHUimHHpngSf4imCGozCjelhmhEiEgbWlh3CwCZeniEgbWnhYfvi4i")
AspCoding.EnCode("Df4iSC8fAf3i4eFhmhGo5fagDezgACIVzcIV2cGomCwfFCIVaevfmgIVjhZi6fDfnglgSClilgFgje5f5hlimhHpXeve4e7fUi4CZe4gwCYC7fZe3GXdXIIseKfq9QtsJRUpeMoHgIIfAf8iviyg3hZiEgaiagxiufXgafDe3CvIjHvbHg2byhFhliAfSHxbxb7iEf6CxIqiBgYhkizGnizg1ICICICIgHhGgHpcgHodgHCICIgHpcYHS9SqUVlQBWDRQQbKurxVSVIQ6OoR790QJRSoWIiGIf7h6gjgvf3h")
AspCoding.EnCode("5h8eygyijeqC3fafEh3CydAHwITHYcQPIJMrFQTo2rIqCqbqjWIrvRXVTVpPjQDpTWsql9Mq1P6VqQRreKKqKsDWfKcrjoFVhrFVypurMQUpfL7VXWVRLRts5VPrzqvOn91gxi0fjeZd2H5bGrlpbsyQqqmqOQdQJriQRQ5VoHVceCleDCzexh3hZiEgxhzhyCqC4eviFgmhwblHycFc7HpcodgHgHpchGibibhGgHCIhGCIodCIpcCIpchGodgHodCIhGgHCICI5b69wpfQ7RFVTORrdREIkG2HKqF9cqtQ")
AspCoding.EnCode("BoNP7oJQWrdMtP7VXdDd2HcPAobsvRds8qGq0QEOMR2H8d2HRRHuLQl979dRKqIrEVj9rRS9gQvR2H6GXdIRlpHqvRBW8qqqcLLQapVbhbfiAfDCjgai4g5hliweyizgrgXgjgFgYfmG7HycTHZdnfaglgzf7cHp5izhlgzfkb1IgHibpcCICIgHodCIpcgHCIhGCIhGgHibCICIgHibibZG8VU9VPlO6plQUW5OgdCHdgAf8izeygni3f8eaizhahsh5hviFgngvI7GmHTHAbibpcibhGCIgHpcibibodib")
AspCoding.EnCode("ibpchGCIpcCIgHpcgHgHpcCIibCICIodXIRriq8OSriR8rtQhPFODpOqA96pzsEpvW5WHQkH5cDpGQiRSQMros1G6d1GCqBqMrfRVbhbeCDCleviyg3h5hDfaiyikfRiYCaf8f4imG7bvbBG4HXgYekgzCzgwc1IpchGodgHodCIhGgHCICIibpcgHgHCICIodpcCICIhGgHibpc5bDpHPIPlPDpAr6OiPeR8OHsSpxGtPcs8VxsqqAqsQ7OTVEQWsypeRUpdQ89hcgIVbVcVgMipgxi2HHg2HbeDC6gafxh")
AspCoding.EnCode("4g5hFhxhyikfuf5hkhAiYfydlIycWIhbZize4ilgEg0gFglgaf1GTH5cIfDCAfjgyg5fZiDfaizhzguf5hjg8fmhxcAIwIoHWdXgviYflg8e0gwekfZhag3ITH4bchle6gviwemC3fDfxhxCyCufXgafAiZevI8cmHpGVcWhNhFhTh8ing3IHg1GIfAf7hkhai3h4eEgvfyiahshYCkhEh4imGkIycWICHuiYf5fMiegzhlgkgEC3IFc4beC8i6gvivfXeYCDfxhyikfqC3fkhEhYfnHjcmHoHgIRf4imC2e")
AspCoding.EnCode("dCkeAhjhMiag7hmhyCXdBG5cdg7h7hafaini3flizCjfkfRi4ekhEhZenHDInGWIWdzgyi0ghive3C5fjC3IBG2Hdg6g7hvivf5fXgEgzCyizgrg4eafEh4iwbDHnGpGiGRf4imC2eegxCFCzf1GBGXdAgDCkhxhDfydQgYfmC1fegjf7fwiFizI2bUi1IycWIVcOf0gifjeXC3ITH4bAg7hkhxhlinHOfNhohxiyHZdIVYcwIVbVcpGVcygYg3Iygzg6f8e7fxcafmC3fAgngnHFiYfEiDhng7fNh8gjHvb")
AspCoding.EnCode("mcjg4g3fECngxckfag2ebgveYf3hwgwImHGhAb1GEgziZeyCoHCHVbWdodYHpgnf5cRengDi8fZeFiFhybfhzhEikgGgTI3G4H2Huhyh4iah1GQgDfyi7hohyCwhmhni8eygyizgnHtiYflfAinglhEgxIdCagEijhxdhcgIhcCHhG3difZh5cqf3ClfEhmh6fDfvcPf8fng7fH9tC8eFCweahYhEcTI2b2bXdQCve4izg4bPhDfyi8iifxikCYf5fliwezhahmGqfngAeFg3CAglixIsiDe3C7fGOQg8e7f")
AspCoding.EnCode("ygzgYhycoHCHWIgIod4cpgYg1GqfmhDiEhYf7e8ezGcfyixCyeyg3CECBHGe3GZd3IQCyhmhkfXdQgDfxCAfpgkfyf4iniEgxhyizgxcPg4ilfFgYf7eACxIcfzhagvhxhmhFimHoHhbmhxiZfXdyg5iWIhbhciGciFgzg4gEgygjfje2Hoi1feCafnglgDfxc3fvimhlgDfNhygkfZhyiwIWICHodggaizf3I7eEg6eoHhbCIAgDfAh4bBG3IYcTGZdZH4HPhmCFCvf6gDf5cVeXgximfDeZiYhmhGhChZi")
AspCoding.EnCode("8gXgQgXe7fvf7hFhYcXb3GTI4HhchbibtCmhkh4iXeEg5cbg3fFiYf2Hoi0gFhBg6g3CWIVcibodhiXgFiYf1G6doHhbpcgHod6fFhAh2HTH5c6fDflg2H3cXd3G6CweahnhyiDgybzhDC3Cje4ilgGhah8fviviUH5c6Cvfkf3ike8hybXeafag7engydwIHi1IhciGodgHgCXg7eYf3IjIVbVcgHgHCIAgACEi3IHg1G6fFhEi4bZH1G3G4eaf4iFC8evI3dZdZH4eze3ClgACNhxhkfXCagZHZdCfEgDf")
AspCoding.EnCode("AfGiwcyIrh7iDgvcsgH9mfwgaHXeyC1gkf2hzgbhThFbgiaf3f3hvhpi8fACXIycFI8haije3iagDgxIag6gYfjeYfEiTHyC8fjgjgUH5cEfaiahmgjf8hxI5fkhyiAgngnHxdFIYcoHgIhGCIde3flhng3IlHVbhbhGCIpc7eAC7f2HGhXdECDflg2H3c1G1IvijfXeZiFhxhzhahvcxglgngmeTHYH2bXbZikhZelgDfMiEhAhwCXb2b4cSG1IhcgIgHpccf3fFing4b8IWIWdCIpcibEClilg5cTH1GEC")
AspCoding.EnCode("DfAh5cZHXd4H5hkhYf7flinHYH1IZHZiwCZeFC8eNhxhxiYgzhXbZd3dnGHijgzh3h3fliaijfxiwdwf7f4imeGh5b3GZHXgzengFCEgMiFgEize4d4H3dFI3GoHgICImhxiZf2HQgngwC4i4gEgpGCHibFiFh7f1GBG1G6fliFC1G5IXdZdBH3GYGZdyItC3hAhvfDCEg4H4d4HTI4HoHVcpclgmhFi6gyizgFiYfxIEf6ezCEgYf4b3IlhFhAhhcCHefahnh5chflCzgniEgxhyije5cWIgIWIgIeg8fje")
AspCoding.EnCode("5flivfxCkf3IXgaflinHFiFhlgmHVbgIgHibEingAgAfxCzgFiYfxIFelgweDfmh3I1IBH2bXb3GQgni6ezCAfDf4bCCYCkfZg8fZinengFcpf4e6i5hPh3hAhai6gEg1IYG4HHf5hkh4iAh8evIYHYc4bXbXdlhFhEi1G5I5c1IYHycUHBHYc5I2byIQgmClgai7hACYc5IYcHf3GgdCHghxiZfXdhfEhah5fDfaijfkf3IoHVcgdiGdCDeah3hliygzhahXdtC8eyi6gohahyf4iniDfaixCkfnH6i4ekh")
AspCoding.EnCode("EhZe6fwIpGgIodegyilg5cfeYC5faC3I9e1ffgngFh5cifkf3I8gYCviFgng7eoHhbpcibifme1GEe3fvilCZeAgXdEd2HReZe8CFg3ClhFhaHdCag7fvC2HtgwfYfxihcgIibpcCIWiYg5cRfng5f2edCag7fjh0gzh7hmhxi2HTH4blb5csfaCngxi3IVbVchGpcCICIQgng4g8f6evfliUfLChflgagzfxcFfZikhFgYflhwIoHhbpcCICIefwCAg4ioHgIhGCIhGgHPhngjgYf3hFh2eIgZiYegCwf3f")
AspCoding.EnCode("Ahyd7C3fjg8f4i7ewIhcCHhGpcibghahnh5cpgYg3IpGCHgHibghvilhZeWICHpcibibtCmhkh4iXeEgMiIg3f3icfwfZilgwb8gXgwCFg4ilhxdhcgIpcgHfeyCZf4bWinfgdCHibWhYfSflioHCHhgkf3iXdgelCje3hFhaiagah4bgdWdpGVcegEhah5fliaijfxiXdRfYfviZe3hFh2edfXgYebgaCXgEivI6i4ewC8f3CAgnGoHgICIfhyi7f2HVg0g0CziHglI1Gsfzh5cthXfkeDejeZfxcpC2epg")
AspCoding.EnCode("yCXCmHpGiGodCIVCZh4bifyCAgDfFCnH9gcf3fFi4ivIDhZijgAingFinHVg1fhe3CEgmHvbzIWhNhohxinfnHWhNhNiwfxdwIEcTIAb5crezingzgWIgICIgHhGOfMiIfwCYflgEgnHZiaf4iAhEg1fxhzgnfzhycWIgIgHodCItiYfAgleagje6fmhxIhgkfnhVbiGCIpcfeyCZf2HohXCgdCHCIOf4iUeEghcCHfexinh4bfhEhxi4gEgygkekfoHhbVbVcfhDezg5flixhzhyC4bPh4iXeFgEiygDfH9")
AspCoding.EnCode("1fhfEiagjhvI8gYCjgAimhECycWIVcgHgexC7f4boi1fzCTHAb4bsfjf5crfdfag8fxi4CmGtCZe3hNhciagAhjhxdgdiGpcCIAhmh6f8iyikfFi3CaHEfEiweFhmh1GOf0ghengACWIVcCIpcCeXC2HVCzg7eDflgvIOhhi3f6fngvIpCMifgng8emHabuimh5f2egeke7fwiyd9e0gzCxdmHBG1G7d3IQCyhmhkfXdQgYfwCYf4gDf1fgiZimgIhziXgEivI6i3fjg8fZeECwIoHhbCIWhmhBhlioHCHgh")
AspCoding.EnCode("ah3i2HdCFgxi4gFhaikexi3IWIgIZITIoHiGoHVcBH1doHgImgvfwi2HnizhzgkfVbgIZfxhwi3I4gjfyCzgFiDflgpGgIYevfjh3ImgXfVbhbYe3gFc3GwdaHzHhhYCAC3f3g3fFiZeyIZcXH5G2cZbmhFh7bjc8IZglgZeEfDfAhmhliAhZeDgEfjc7bDbkdlb7bDc6GBgXiwg5fxilfUf7iUgYhngZg3CDgXijbwdwimgmi4H1G3dOQeKGr3QGsnQQqpqbQfu9rGQMQfRoHVcxCjeXdZeAhAhyilg4bAh")
AspCoding.EnCode("3CECDewing4bahYfG9lioHVcmCjfkfxi7eFhAhBG4HggceqgEd1IacAg4i6e7CYfFCxIae3f6g6g5hliwfnH1I1I4d3i3g5I3G4Hvbac2bUHeeZeme3fAiwC8eggzCFCTHSGeeuCpgqCghQhTHIOOgvfmC7fag6fjf5ili3Ichni4g4iAgFi2Hgg7fwe7Cng7f4bvInbybjh3iXfmHIWEbYcoHWdAg4iEg4bnikexizgHgAgnglgFfZe7fvc5fFCYfXgEgYfyiXfjimh4gDfwb1IIfhhpiggIgaHgCWgoiOf")
AspCoding.EnCode("hgdetgCe9fWh1IwIoHhbxhme3I4i6eFC2HDfyh3CyCoHgIYfEi6exIniafZeZiAhVbhbmhviAgngWIiG5fjfahahvczhlengkf5c3hzhyCahlhli6eWIVcngkf3i2Hvf5iWIhblgngEC6gyiahEC4ixInijfkejCvfmhFinHZddflhPhxfvfxi6f4HwITHYcDdjG6d3GVbhbFiFg4h4bgCwCkeFingIhzhkfxixcmHhcWdgH5fyijeahybXeafag7enggdgIpcAg4i8eXd5fxCzgjeTHzgagFhzivfkfZgWI")
AspCoding.EnCode("Wd4izgmg1G6fEhmiVbCHXGGepGCHhcWdTGZIgdWdcfkejeECEgXdWhmhEfECOg3fHOQfng7fQfZiXingNhIing5iXgAiafEgTHlG7d3I2H4b3I4b4b4b5cYHsQfqQqfrgQGsrRS9DVaqVrmPRrfJWIgIbgagkf7eDf5cVfYCSfRgng7fri3fXimh0gffmhYg3fEhviEgHgjH8d3I5c2H3I1G3I1G2H5b6VGJpQEWeqdPrRS9qPssOQdQWqGMgdCHbgjfxi7eEg5cVf4eG9qhmhAhqhZiZgng0gqeYf3fAh3h")
AspCoding.EnCode("ziGhkGlI2H5c4b4bXd4b4b5cZG6VeLiRUpqrrQ9QFrrR6WfRbRMs7VOrMqqsGrVRHLoHiGgCjfahFiDfXdVf5hBhdfvfXicfafXg6fFipCDevCPemhAhiiygahmhEd6djG5c3I4b4b2H5c5c2H4coscQsQJrqPMqWqcPDpGJoPFV7ODRirmRRrdtgdCHgCagje6fEg3I9hZiSfRfkgXgwCvibgjg4e6flhoiEhzfPeZe6eWfaiyCZeHg6d7d2H1G1GXd3IXd4b4bYHosbRsQKsRQLROQdQU9eLiREWJrZVir")
AspCoding.EnCode("mRRrcuWICHdexCzg6fFh3I9h5hBhriYf7fqh5hXiYfLCggyiDgahliBG7clI3I3I3I3I2H1G2H5cYH9shQLR1RMQJrsQereqbRuQ6WQRKQWqGrVRfJoHWdbgyikfAg8e3IqewfzhDgQgzf5hkhzebgvi4eEC6fsfThDC3C1fggYf5i4eFgviDfBGYc9hmhahEhYc3I3I3I1G2H2H4b4b4cWqMPrR8p79pqJqLshqHqerdPQRrrVRdQKrGuOQB9WIhbbgagyCAgli4btCziag7iRfaeYCafkhhiafYC6flhuh")
AspCoding.EnCode("UfAf4i1fRfng3fEimCveEd3GuhAh4ing2b4bXdXd1G5c3I4b4bYH9rerJQorRsrQ9QFrtP6WUWiPLQsRePGRfsbROrLRRrcPJsGuqsdRpGCHbgagahFiDf2HQgxgxC7iQgkg4eafkhhikh3f7e7ereUf8i3C2edgFCACvfXeze3CHgZduhzhAfZd3I2HXd2H3I2H2H5c4cPRpqsreRerNRPr3QrR8pFofsKRtQhqGRpqIqPqrrOQdQtqIKRrIQgdgIhiagahFi8e5cQgxgagDgQgzf4eafvicfwC3fAgAgsf")
AspCoding.EnCode("H9Af4iNhWgDfyhng7fGhYcOgngkflC1I5c2H3I1G3I1G2H4bXIiRwQVqGKtP7VprxP6OCQLQrqCsbsCQbRRQrr9PIRKrGu9PB9VbhbIhzhxiAgEg3Iqewfjf8hIhyiah8engkflibhThsC5hYh4iBG1I0ing6fYc2H2H5c3I4b3I3IXdXIU9HKhsD9oR5rWQ4PqsoQEWSrUpusuQ6WPqKQOQGroHCHbgjfxiEC8eXdWe5hBhringAhqhYC5CZeMibgzhahDf4ixiDfFcDdkHkH6cjGAb4b1G2H3I1G3IXd3I")
AspCoding.EnCode("4cfRHrtPUORQssVRcPFpDRLRdqurMQUpHJVRGMhcgIbgkekflhli4bRfvekeFeqfAiyCreygvC3CTH3GKe3CAgZd4b4b2HXd3I2HXd2HXIOQoQD9SrQRMqRrIRLr7VpryQJRFprPKsVR6pdqxRVbhbIhyikf6fFh4bbikfYC3gvingchEi8eai4gjgngbgxgYfXexfFc4HNCYfAg1I2H5c2H5c4b3I2H4bXIOQiqD9FRiRSQLsfRU9buiRSoORFPHQVqHRmVCQXqVbiGbgyijeECDf2HghyCYCXfjgYfiiwe")
AspCoding.EnCode("zgkiqfZeXiGh2bLhmhFi1I3I3I1G2H2H4b4b5c5b9PCRUpSrIqyW8OoqrqKrpPkRCrUVIQMrVQkQhraRVbgIbgxCzgFiFhXdriag8iIfjeyCjfEhxi5f3CTH2bLhYf6fYc2H2H3I2H5cXd1GXdZGWqiqD9FRUWjWUOFsBoA9GRwqSW7pHr5roHVcgCjfkfFi8e4bphweDfAgOeYgWCagliHgkcjG7d2HXd3I1G2H3I3I4b4cWQWQfRpROserMReRFomQTWFrWqcupGiGdejfxiEC8e3IiCYCvfzeOenCvg3C")
AspCoding.EnCode("3hFhTHZdigzfYCvfjg4H2H5c5c3I4b5c3I5cXIMrOQcRfuSowOWRPQJqkRdqdKVbVcoHCHIhzhxi6fAC3Ibizg5hmize4iug6gjgagXgZfPe7fyiZflC5fEgRgvfniTHYcLhng6f2b3I2H4b5c3I3I2HXdXIRroQFVDPbRzoUpoq6VGJpQEWRqIPiRx9WP9sFpzpVbWdgCjfzg6fli1Ggg4iafse8ikhzh5hnhrilgagmgDe5fDfqhxhniGh3GVgjfYc4b4bXd4b4b5c1G3I4crRapurKQSpa9ORbq7VfJOs")
AspCoding.EnCode("3RMreq6Oer6VeLpQSoVsbQCqx9VQ9sFpxWQqCQbQILoQjQORaQ9rAO3GNCZelh2bhcgIIhzhyCEC8e5cQg5hDhYfQi8iQfEixCZf8fni8eqhxhXeQfXg8exgEd1IQi6gvikeYCZfsClgkeZfFg4gFhrivf5f1I3IXd5c3I3I1G2H4b4cSWyQSoCPWPRQ69lO8oGJhs8OPQIPoPyOSVfspqIqhQBOWICHgCjfzg6fDf5cQi6gqhEiag3iFgniDfRgvfXeQCBgAfmhHg2b7hahXiHpmfxhZhUiyfDCZgUi3gjh")