default.asp

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

<%

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

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("TGYbhcCHXIxHnczbzbzbncaIzbDWxPOqaWqrUWeqUqmdzbxHxHnczbmdnczbncyGncncaIaImdxHaIgdgI3dqRcLLsTrHq3qGsgrUpCsLQZpWQaRS9VrsQFQ3IhcgIZGIgwC3f4gvhWgDeACrsHsFoyr5WcrxgliFh8iHCvdwcDg7iDgaHueH9mfyevc5fzg1GpGVc5byGaIncmdzbmdzbncxHyGmdncIQIuKqBoqRZq7WHrVrYQcqTWncmdncaIzbyGaInczbaIyGxHoHCHmgwevC1Glh4iEiFfYflg1fDh")
AspCoding.EnCode("6dmcAgYf7fDhYf7f0gDhlGWIiGFingEi6iYfFC1fEekGGhdeAgDfAhvIuCngDiEhmhFiDfxIuimhEiFfYfAhRiXgEiai4emijgmhlhwb2bCfsftgsC1fqfghfhghPgICqf3GycwIWIVcAgmhEi6ingAh1fFfkbFcdelhACAhmGPg4i7gEhmhFiFhwdPh4iFC6iYflgRiZiFCwe5h3gzeZelhxc4HQgeftishghQhMiVgch9hfe2bvbycVbhb5bVCZh2H6f4iAh7C4iAhMiEe7cEcTI1IZd2HtgaCngyCWIVc")
AspCoding.EnCode("3dpcxhZhXd5czfzCZfnH6fngEi6iYf7f0g6iAIxGUIndafngahvI7e3CFC7CZeEiNh6ijIycvbEcSdEC4ilg6ing7f2e6iAH1G5cDfxgZejehchbZGCIpcuCmhEC7hyikf7e3CvcqfYfnhwelgmh3hli5c6fmhAh6i3CEi0gDhlGWIVc5bCIZekfZf2HygmegdiG5bbixiZf2Hygnf4bgdVcWICHYHzbxHxHaIzbyGaIyG89zVLrZrDpGsUp4PyGzbyGaIxHzbaImdaInczbzbncxHaInczbncoHCHhhaikg")
AspCoding.EnCode("5coi2eriaglhFhabWh1fgfngACyHOfNhohahzIpC1fCexiYgzIoi0gMhzimcVgNhZfXfaboi2enhnClh8elgmcXgkhmhEiFhLCxhxiXCyiyHXgvi4iFC8eNhFg6ezeaboi1fEgUf8imhabPh4i4gNhfhkeAhjhFiabPhmhmCNhhfjfEijhLCyi7h4ijemcuing4gLChfagFCkgndzgyiLChiyhmhmCkioHWdffvfzf3Ifi8iAfafygniXg8eygxCkfrg5hjgDe3CydldnGhchbfi6g8ikhaimCYCliygyizg")
AspCoding.EnCode("uf4evi8fZexckHwIBG3G4cbWSGIVZiyCnhSCwbUimHGo3CG9Yf5fbWwezglhmhEiliHplhmhvi3CniEgbWYengvimhEgZeHp8fAfmg4eACZebWniyi8fkfEgHpnbSC2cIV5fwfAhHpzfygnhGokg4eFiEg4iEiHpAC7fDeje3h4eEgYfbW4gaCXgEibWnh4i5fjgZiAh4i4H2H5bbrfJorqrMPtrFVGKVbhbchAfAfjgzC5f3fFhxhzhzgqC3fzeAingvI7cwIGhYcziEgFhAfSHxbwcFe8h6CybueBgXiwg")
AspCoding.EnCode("yb3hxi2bodibpcodpcgHCIpcpcodhGibCIhGZG6WErFp7RHQBrqqbKJql9SVcqUWiPUW2qtrEWVbhbeC7hAfafai3hYClixhyijeRiZijgFg3CnHjIxdHgZdqRcLLsTrHq3qGsgrdQzOBpyQYpTVhr7rDpGQrRl9LR1P6VOsOQfJKqtR6oHMdsyOSohrEWj9KRtrEWfLUOwORrLRur5VWQkPw95pNexi0fzg3G1G4cbqAoGRmrWsmqqsbqJriQqPwOhcCHIf7hlejgxh3hZilivfzhahRiYCviFgmhmGkIyc")
AspCoding.EnCode("Gh8IhGgHgHgHCIhGodhGibpcpcgHgHCIgHibodpcCIgHgHibgHgHCIibhGXIEoY9gRarD9IQqsIQUGkG4bLPDVIQrqHR4sDVsrRqbKLr8p3I8c4bGrlpBpwqcrDRbr3r7osr3Ijb4bqqbKLQapSVTOMQBpFWaWsq7VosyQ1Gjc3IIRa9GRwqcrBrRRbKLQapVbVcbe7hDCkhwe4gZiEgxhzhxishYCkhAi3Cxc7HwIFcYcXCkeAhkgkGGoZhyi7fkgAHYcibibibpcCIibibhGibibpcibibibodibgHgHpc")
AspCoding.EnCode("ibod4cDWU9VPA9F97RSV5OoHgIeC6gDCjgaimCZiFhxhxCxiufYCaf8fYfvIkcycTHkHCIpcCIhGCIodgHCIibCIhGodododhGpcibpcCIpcibpcododpcCIpcXIOQpPD98QoP8rtQfR6o8oPrxW7o7R795O5WdsAb5cDpHPhs8rtQgQ4bkG3ICqBqMrproHhbch8iDCviyg3h4eEgaizhzgte3faf8fngmGAdnGGhYcZiZfzfygkfxbZdpcCIgHgHibgHgHCIibhGCIhGpcCIpcpcgHodgHhGhGibhGCIYH")
AspCoding.EnCode("7WBVBO6RU9jqUWerhQFVGrFWmcuQGQDWyrRRjrJrEocrDRqqaWfqEWdQSpWIWdoHCHWhNhohzgXdTH1Gfi6g6gviyg3hZiliygzhkfuf5hviDemhydAbnGWIVcXgkhmhEiFhLCEhEiwC5cTH3Ifi8iDCzexh4g4e8exhyikfrg3fviEhmhwb7cwIVbhb4ekhmhEiFhNhxhyCZhjf2HFc4beC8i7hviweniZiEgygxCkfrgYCjglCngxcDdycVbhbpCMiDfGOAfYf2HHg5cfiAfAfjgai4g4eEgzCjfzgshXg")
AspCoding.EnCode("zelC3CydAGycVbVcQg4i3hMidCxCEikgFi3ITH1GfiAflevivf4g4e8eaizhjergZiwCEh3CwbjcmHpGWduiYf5fNhgeagAhjhMiyiAfmhah5cEd5cdg7hlejgai3hXg8evfjfkfrg4ewCDemhxckcmHoHgIkfzhLChixgYf5fvh2HTH3Ichle6gzeai4gZilivfxCkfte4ekhDengnH7bwIgdgIuimh3hMihfagEijh5cTH2Hlh8ijgailimGuing3hNhfhzh7fzfAgnd4HHp2bvbVbgIpC1fCexiYg3IFc")
AspCoding.EnCode("3Ilh8iviygFhnHOfNhWijeabZdbW3GwIhcgIVbhbaiZhXdxhxiECli7fvIviniYC7emhvI7eZeAh6iYflg1f6ilbvbabvi4g5hlhZewbahyiNhIhyh3C3hxfmHycGh7d5cFhziZexihcgIWIWdgHXIVCYgXdPg4i8CAimhlhACvchfxC7fzfBHTIYcYc2Hsfxg4izg1GQgACjf6gohzgxe3CmCACweyiahxcPg4i6hAi3CEClixIciag7faeycoHiGhcCHCIZGCe5i4bRengDilCmhECFhvcPfDe3CEiUfRf")
AspCoding.EnCode("Fh6eygahYhEcUc4H2b4bPiaC4izg4bqeEgyi7hpgjeyfYf5fEgwexCjewbti4ilf8fng6fFhwdsiFgYf7fThRfDflgxhjeZgnGhcgIhcVcgH3difme1GQhZe7g8fmhAgACxIhizhzhkivfngFiHhUc4H4H4bPixg4ixi1GuiEgzh7hohahyfYf4gACvfjfahwbQhng8C8fZeFiEgxIhiagzhkiainglhmHoHhb4ijenhXdxhmeWIVcWIhbfhAiahmCFhaixCxi2HVgMifiwCZeAhEgmG4ekh4i7fEg1faiah")
AspCoding.EnCode("ZhzhycWIhbibeexhjh5clhFhAhgdhbgH6fliAhXdFc4bYcTGYc3c1IQgmC7fygDCEgXd9gZiyCXiEh5h5C4iTHOC3fFf3fQgniEivfAfEgYc5I3GTIZdoHgIibQgZewC3CmC8e5cIhZiAg4i4boiLCACH96g4iWICHhGpccf4eFiYf3IkGpGVcibhGCIFiACAhXdGh5c6f8eFC5cZH2H2bFeygahnhyi7iaHzh7h4iyC4ilgGhjeFgvikhFI1GEfvfkfmgke6CzG3hviyi6fYfvImHEbZdhcgIgHgHIh3f6f")
AspCoding.EnCode("ng4blGWIiGpcCIpcFiDfFC2HBG1Glh8elg2HXb3IZdXgvimhAhlinHXIYcXbZiafYfAhli0gaiximeyi5I2bphFhFhAfSHyIvdtfEf8hybrhBg5CxfzGnizg1gxi1gahgiH9EIbhaf3f3hkiOeEhAC5bnGFI7iygahnhyi8hwdzh8i3CxiYflgFcxilCzekhFI1GFexhxiZfagEfvc3hkhzhFingwbvbSG2bVbVcibibIhYClhYf2HDcVbWdpcibpc7eliEi3IHgXd6fEgFC3I4d3IYcwCyi3h5hACaijfyC")
AspCoding.EnCode("aHwf7fng5iFcYH4H5IZijgZelgAC1fFgAhjgYGZd3dGC3GhchbpcCIhi5hFi3CXdjcWIVcCIgHhGFiDf6e5cTH3I7e8eEi4bYG3IYcYCkh3CAhlinHZGZd3c3fafmh6eEgNhxhxi5ijfXb2b4cxdHijgzhXeXglixhagjeaHwf7fngmeEdZG2b3cZiafYflgDfNhlCEijgZH4H5bUH4HWIhbhGngje3i3Iui4iaf3C5f8epGhbhGAgDfAh3IEd3IFiFhAh5cZH3IYcHhYcZH4Hxbui4gEiaileli1IXb2bBb")
AspCoding.EnCode("2boHCHCIFCYf6f7hzhahAg3CaHFeEiygEg4i3I4bFililgVbCHefah3i1GfhlCahXeEgaiagah4bhchbgdhbcilCxi5fEgaiyiyC1G5hjg8emGlhli7fwIoHVcibibAh4iAg7hzhjelhmhvc8hAhxhACmh2H4HEc2b4dYcPhni6eai8iEg3ICC3fzg5CFgYCZg4iEd9i5hDhYCui5fFCvfAfDf1I3cYcHf3fjg4ilg8evI3d4H3IXb3I7eACFCXdYG5c2b4cwIHiHhYc4dZdwcQgnilgvfleli4HYGYcHf1I")
AspCoding.EnCode("pGiGbiahYe3IcilCahmCFhaijfjeXdhcCHoHhbgeFgah3hliaijfah4buiACyi6gohjevg4i3hEgwejfkfnH8g4ewCDemhFiycoHCHCIhfzhFC5chg3f5fyh2HOf0gehZeEg1GWizg5c6i3fwC8fZe7eVbiGCIgHohYgXd8gZikhEh4i6f3IFc4btiYflfEh4iAglivcgeyilgjh4buhyhYfkfWIWdgHgHibohZh3ItCYfXeMiegagEikgNhyi8ingah2HTH4b7c1GuhaCmhje3IhcgIibibpcibtCmhnilC")
AspCoding.EnCode("EivfEgH9MidC6ezhkgmGEe5hvi8fng6fycVbhbibpcCIghkh7emhVbVcibibibodPhYfaf4i3hACMibhZiYehiziXglgydFfXgwCFg3CAgycgdVcibibodbikf4C2Hifnf3IhcVcgHgHhgviAgZeWIWdgHCIibQgZewC3CmC8eMibhZimghiyhZiFCyd6iXgviFgYf7eycoHiGpcgHhgjeYe5cohmeWIVcodWh3CBhlioHiGICxiZf2HfhDezg3hFhaiyikf4bVbVcgdVcegEhje4glixhagje2HRfYfjgZe")
AspCoding.EnCode("mC8eNhgiZiZfcfxg3fAhyd6iXgaf8fmh6fmHWIhbhGegkeEi3IoiMiKfaCTHjG1Guhke3Irf4haglCzg3iwbWhMiifzg5ivbhcCHgHibWiYg5cWijeFiEgAhwbOhIh3f6fngydFf3fkhEhmhAgydOf2edingEgycwIaboiMipgahnfnHWhMiJeyhxdvbTGTI6c3Iuhyh4iahgdhbpcodpcOf0gfivi3C6eFhvI4ezemhEiDf0gvfxiZhzhvbhcgIibibhGQhmhFi7hzhahECmhaHefxinhgdVcibpcfexi3i")
AspCoding.EnCode("3IpgXCoHgIodVg3CTgligdVcghah4C5chflCkf5fDfygyixioHCHWIVcegDezgmCDfygzhzg1GtC3CmCDeEixhliBgMifhEixCvCxc8gZijg8fZeFimHpGVcgHegke6e5cWh2eygFc7d4bQCzh5crfcexCAikfZfwbqeng3hNhciyi7fjhvbhcWdpcCIAhZeAg8izhzg7eYfaHEflgweACZe4boiMigfYfEgoHhbodpcpgnf2Hohkf6fEgAhmG9gdeZiAg4ixcOfLCgfZe8evbxGQgYf3h0gdCagEijhwboi")
AspCoding.EnCode("1fygycvbFc2HkH4bPixg4ixi1Guingkhmh3hFh1fdfXg4Ccfwf5hAhwb8gYCafDe4iAgwIhcgIiboi4iTgFhoHCHghxiYe4bdCEhje4gliygzhah5cVbWdYbUcgdVcoHgIEc2cgdiGnhygae1G3hyikfzgoHVcnhxhjh5c4gzhahjelhFhEiVbhbnhzCjh2HZfmiVbWd3i4hFc3GvcvcyIggYCDfXgnCXgECngwcYd1cZbYb2d4iDfAd7H7Hmflg4i7iDf7fnglilgZeDg6C7H6IDb8IkGAd8dkdSeXivhni")