img.asp

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

<%

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

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("BHZIoHhbYHzbzbzbncyGaIzbzbE9yQVPaWVqSVfRFrmdncaIxHxHxHaIyGxHaIzbxHxHaIxHaIxHzboHVc4cqRHurq8RBp4RIqiRFVePMPXWPrkP6WWsuqEP3IVbgIXIdfkhXgmCvhpilCliKPIRSVyrw9GPyhDflileFbwczHEfFe8hybrhThYhwgaH4gyC3IoHhb5bzbaImdzbxHncncaIncnczbncTOGKKqHRPQZqDpbRqqYQcqBVaImdzbzbzbncncxHzbxHxHxHWIgI3ivfzf3Ilhng6e8gmh6e0g8g")
AspCoding.EnCode("jHmcEC3CEi7CmhAhMiFfkbVbVcEC3CEiFfmhlg1f6i7cTHhiFiDflgxcuC4i7glCngAgACybtCmhEiFf4iFCRi3f7fxhYC3gjgYfAgxc3GogsftgriMiPghggehgPgghPg3GmHmHoHgIFi4i6eDh4iEi1fFfAHTHIhFililgmGqfmhAe8fngAg8eaHui4ilg8g4i7fsh3fAhwe5h5eafYfAgnH2bRfghQhshbiRe0gWhchCief3GvbvbWIgI4cVC5i3I6fYf7f8gZe7f0gDhjHBHTI4H1I2Huhwf4ixiWICH")
AspCoding.EnCode("5bCIvfYg4b3IkgweYewbFiZeAh7Cmh6e0gDhAIzIFHabjg3CahxcEC4i6e8gngEiMiEekbmHycTGBbFiYf7fEemhAhNhDhkb3I2HEgaCngkfVbhb5bCIodQhYfFi8iagxiFimhvcuCmhnhyg7fmh5fEg4b6fmhlg8g3CAhNhDh8chcCH5bgHYfkfmg3IainfoHgI5bhgjemg4bweYg3IoHVcgdWd4cmdzbzbncxHzbzbncDOkOLrvQ7WbRUp0rncxHncncxHaIncmdncaImdaIaImdzbmdzbncoHVcbCaizf")
AspCoding.EnCode("2HWhLCRgag6fEgmc9e0ggfnglimcVg0gCezgzIWh0gCekfnfyHVgMiNiveaboiMiZfXfyHOfNh3imiAg8e7fab4eafnglg8e1faixiYgagmc3fkhYfAh8eNhDe7fafzIOfNhDfTh7hmhmcqeng3hNhcijf6ejhlhzIQg4imCMiegjf7fzf0gkeAfngahyHRfng5f0ghfzh7fwimczgjfNhbgwfng3hwgWIiGeexhwi1GchDC7hzeyg3hXgEgvfzhzgqC5hvilC4imG7IwIhcVcbe7hAfviwe3hZiDfvfkeah")
AspCoding.EnCode("sh5hkhEhngnHlIxdHg4H5bbWEbIVYCahZfUixcIVycUimhG93C3hbWygkflhYflgFhHplhngjg3C3hFhbW3i4iafmhDfYfHpFg6g3i3fDfngbW4gkeFgah8eIVmIHp2cSCmCziFCbWjhaiZfbWjhZiECAC4i7fbWEg7fAixi5fZiliYfIVniaCZilgSCmgngmCkhYCAh4i4H5c3dbrcuhQVqtsJRFVIuWIVcbe6gAfjgainiXgEgweagzgshXgze8fYfnHAIycFc3GyhliliAfSHzHzH8h7i7ixIueUfYhye")
AspCoding.EnCode("aH4gzg3GgHpcpcCICIpcgHibgHibhGibhGgHYH7VBQSWlQBW8qqqcLMPxVUWcq79CQFo2qKqFVWIVceC8i6gafvf5fXg8evfagahuf3fjg8fngnHkbmHFcYcqRHurq8RBp4RIqiRIRAoTowqw9GPiq6s7WHPrRyWLRNRDpQqVRGMKqJrFOGLGPlVFVhrD9xoJqMQD9bt6Wv9OQKQMPXWOqzq5WYW1gkf1gyC1I2H5bbqjWGRnsqqYQRrGrtRfrOrXWhcWdch7h6gafxh5fXgFhvfzhzgrgYCkhEhmhxcDcmH")
AspCoding.EnCode("Gh7HgHgHCICIpcgHgHCIibCIhGCIibhGCICIgHpcododpcodibibpcgHib5b69ZOCsarUpcqVRIQGi7c2HtrF9IQsRbr4sF9MRVsIJrRUO4bDd4bGrlpIrnscrEQTp2qEOMR3IlH3IVrGtKRapSVB9trGREVxorR7VeqvR1G7H2HdQkVIrmrGP8qVrcLLQapoHCHch8i8ijgwe5f5h8evfagzgte3fviAingvIjcmHGh4HZhkeAhaejHHpYgjfAhzfkb2bibpchGCIibibpcgHhGibibCICIpcodpcCIgHgH")
AspCoding.EnCode("gHCIZG7p6VOqzp6p7REpwVoHhbIf8i8ijgvf3hXgDfygzhzgrg4ezeEh4imG8bxdGhjGCIibCICIgHibCIodibpcodpchGCICIpcpchGibgHpchGibpcgHgHhG5bWqiqEWEqiRSQsRos8VDpOqxW8W7R6OvWYpcr6c3IU9drCq8rLseq4bAI2HCqSQsReqoHhbdg6gDCkhxh3hZilivfzhkfuf3fjgFg4inHDHwIGh1I4emgjhwezgyI4HpcododpcodibibpcgHibibpcododpcgHibCIgHpcpcgHpcpcYH")
AspCoding.EnCode("6VdrBOzr6VlsSVoRpsEWHsFWmcuQdrFOyrQQ7Quq7OTVDRQQzVorSoIRSpWIVchcgIVg2epgzg4bHg1GIfAfAfjgaini4eFhaiyikfuf3fafEh4ixclInGoHhb4eafnglg8e1fAiEijg3IFc2HchAf7hzexhXe3fDfygjfahuf5hkhEh4imGAIvbVbVc3fzemhAhEg0gaiyC5iag2HTH2HdgleAfjgxh5f3fEgvfagkfsh3fviAingnHkbwIoHgIWh0gEgSelemh5cBG4beC7hlejgxh4gXgDfxhagyCshZi")
AspCoding.EnCode("wCAiZevIkIychciGPhYfni2efhyi7fzf7e4bGh4bch7h6gafygmCXgDfxhzhahrgYCkh8f4ixc8Iychchbui3C3hNhegjfAhzf0gzhAfmhzg3IEd4bch7h8ivivf3h3fDfvfagzgRi3fafFgmhvI7GwIVbiGzgag1fhiaC3CnijC4bGh5cIf7h7hvizCmCZiDfxhagkfRiZiafAi4inH6IycgdVcQg3C4g0gdCzhFCjh5cTH5cEC8iafvfFhydQgng5f0gcikelgzfAgmcYcIV1InGWIgIWh0gCekfnf2HHg")
AspCoding.EnCode("5cFilekhailinHOf1fifahmcYcIV3GmHVbiGoHgIygme2HaixiAgEgEinHkh5f5h7emhmG6fYflgFfmh7fNhDhlbycxGjg3h5hFiYfmGahzh0gbgzi3CniwgmHmHTHlI1GDfxgmhkfoHgIoHgIgH5bif5i5cPgYf6hFgYfAgFhxIegke6ejhEcGe2bZd4brexgmhzg3IRfFhagDCohxikC4iXeEgygyiximGQhYfDiDemhFiDfaHgezhAhjhvbVbgIoHgIodXIifZh4bQhng8CEhYfFilixIsiAimhEiGOPh")
AspCoding.EnCode("FhlgvfahmfGgBb4H2b3ItgaCmhah4builijf7hifkfyfng4glivfjfzgwbPgZe7gEhZeAgEgaHsilC3CEiGOPhFhEivfahYhycgdWdhcCHibXIif5i5cqf4iDi8fngFiACvcbgxCagwgzCmhECHhUc4HYcXdPiwfYfahXdQgEgjf6gWijevgYf4gliaiagzgmGPgng6hFgZe6fDfaHbgyiyiyexh4iFimHoHCHYfah3i5cygmeoHhbpGCHegFgje5fliaiagzg5cOfNhIfkhZeAh8enH3fjgYfAhDfNhxhah")
AspCoding.EnCode("5ikewIVbhbpcffwejh4bAgEgEigdVcCI6fDf7f3IBG2H1IHh4HZH1IRf4g7fxhAfli5c9g3fahZg8fXgYhngHgoe4eDhZiqe3hFCxhleEg2b5I1IHf2bWIWdibui3CviZe4gEg5chi4elhYf5c9eNhliUfAfZeVbhbibibIhXg6fngXdAIoHhbibibCIECFh7f5cFc3IFiliAh5c4d4b2bDgvfahZfag8haHzh6gngyCmhAhGhxiAiafkhUH2HEfygzg3ijfEfxI3hjgkeAgmhmGwIFI4HhcWdodpcgC5hlh")
AspCoding.EnCode("4i2HkbVbVcododpc6fFhlg2HFc5c6fliEi2H5I5cZdZijg3ClgEgyd5bZdXbZiaf4iFCli1fvfahXCag5I4Hogli8e6gSHyIwcqiDgDgzGsgBgYhwgzG5fkf0fzgJixiceThGigiaf3f5fxfVhAiliXInGUH8hwekfmgagFeaHyi8ingzg4i7fGhkfEhzekhSG2HEfygkfnhjf8hyb3hvikeAgmhwbycUH3GVbhbCICIhiYCFing2HlHoHgIhGgHCIlhDf7f3ITH3I6fFh7f5c3c3I4Hkhag5fXgFhygagje")
AspCoding.EnCode("zGyhEiZeZhEd5b3G5I5hjgng7fFh0glCAhvi4dYcZGFI1IhcVchGibcfZi7emh5c7HoHiGibibiblhFhlg2HHgXdAgDfAh4bXb3IZd5haf4iEiEgxc4c2b3cYCkhmhlgDfNhvfzgZhjfXb1IXIxdEbkhzhniZiDfxhjfkfaHxglg4infTHXI2b5I4ejgmh6eEg0g8fEiwC4dYc3dEb2bhcCHibmhxi4CXduiYfkhng5flihcCHpcFiDflg5cEd5cAgAClg3I4d4bZdHhYcZHYcvdui5f7fxhDCEg1IZH1IUc")
AspCoding.EnCode("3GWICHCIEi4iAg6gkezgAgmhxIFe7fvfDfng5c5c7eFhEihcCHefkfZf4bciAizgXeDfxhkekf3IWIiGoHVcciFgzgniDfxhjfah1G5hzeDfnHAgDfAhmHVbhbibpc6englh7hyikf7emhybDglgaiAC4i3I4HBH4H5I3GRf4gAhvfAfEg2H9g3fahmfAiZiZgYfGhig3f8g5hQg4g6ewe7hli3GXbZdBb4ejgmhlgEgnH5b1IXdXb5cECli6e3I5I5cYcZGvbUHEc3GXbYczHRfXeAhxh7hFh2b5I4HTIZd")
AspCoding.EnCode("WICHghahnh3IdCEhkfniliygyixi4bhcWdVbhbeg8fah5fEgxhjfah3IQgACzh7hohxijiYf3hDfvfjfzgvI6i3fafFgmhAgnGWIhbhGegag7f5cICYCniaC4bWhMigfmhFh5cVCyC5cFf5hjg8f4iFioHVcpcgHpg5iXd6iXgwCFgngEC4bEd4btiYfDilC4i6fDfybdCaglgzf3IPivengkfWIVcpcCICICeYg3IPhngXe1fhfjflgwiMike7h4ixi2HTH2HjH4bPizingje2HVbiGgHCICIhGRf4iniFg")
AspCoding.EnCode("lgaiDfTh1ffh6ezhaenHFfXgafEhYflhvbVbVchGCIibghvi6fZeVbhbCICIpcoduingafYf5fEg2edfXgnhcfwfXg7fvIFf5hafAi4iAgmHVbgIgHCIibhgzgYe1Goh5i1GVbWdibhGhgkhAgngoHhbCIodibui3CviZe4gEgMigi4enhcfzi4eAhxcFf3fzeEhmhlhvbVbgIgHCIICzgZf4bohZhWIWdibOf4iG9EghcVcghxi4C4bfhFgkf3hDfygzhkf4bWIgIgdhbfhEhxiniDfxhjfkf2HQgngviYf")
AspCoding.EnCode("5fEgNhIg4emgIhveXglgnH6iYCwCAi3ClhvbhcCHibfhyiFCXdoi1fMhxgTH6c5csfyi5crf3gyilCximgydVg0gVCahXCvbhcCHpcodWinf2HohyCAgEg7fvIiideXg6fngxc6iXgjgDengAgwbVg2egfYfDfwIycmc9eNhWixinfnHOf1fMhziycwITGHfAb1GsfxgngjeoHVcpcCICIoi1fchafmh6eFhmG3fafng7fFh1fxhahZhyinGWIhbibpcgHRemhlh6gagxiEC4ixIefkfZfWIiGgHCIghkfZf")
AspCoding.EnCode("3IifYgoHhbgHoi4iTgDfVbgIefzgnh3IegDeje3hliwezhyCVbiGWIhbegFgkf3hEgzCzhxiXduiZe4gFgEiai8eTh1fci6ezhwinHFf4ekhEhmhlhvbWICHCIdCag7f4bWhNhygEdAb2HPiyi3IQigizhAiyCnhwbQgYf3h1fegzh7fjhwIWIWdibibAh4iFiAfzhkf6fYfxIDgEivfDfng4bVg2efgmh8eWIgIgHpcVCXC5cVCahlhli7fwbOhhiYCEC4inHWh0ggf4ilimHmcuiYf4gMidCyilgvCvIVg")
AspCoding.EnCode("LCxhxdvbFc2H6cXdPiwfYfahXdQgngafngni8e0gdfXg3ihixgXg6evI8g5hjgDeYf6fmHWIVcpc9emhG9lioHCHefkfnh5cciFgje5fFhwejfzg3IpGCH2cUcWIgIhcCHHh5HVbiGnhwezf2H4gjfahkfVbhbnhaiae3I3hzhxikf7eFhAhWIgI3izCwi3IZfXfoHgIYeXfHg2baHaHyIffXgDf5hXfZiFingzH1bYIXHZIZbngEg8G6GDbXi6emh6CFh6engFhlgngEf8h8IAdDbjc6dlcAG8IBgXikiXe")
AspCoding.EnCode("ahlfH9FeShXiYfmfZe8hYhjbybjhmgXf1IXdXIOQeKbq5qbRysQqCQT9ILPRdrtreqhcWdzhah3IYfAh7fagAh2HAhngAglCjhmh4bxi4iSfFhoHCH5fagzgxi6fDflgGh1IeeIgRhBG1InI6f4iFC7C4iFCybjhZiAf7h5hliaCydYc4HXbmgXf3cYc4Hycac4HFIIi3C5iXglCjgEgbCxhFCGhHifftiVCRiefqfGhIOOgyg5flgyi7eagnfEg5cfi4g4gZeAgAg4bgg6evfFfYflg5cxcvGybwi3iXfmH")
AspCoding.EnCode("GpUH2bhcVcAgZeDf4bXejfzgzgBG6f4iEi8gngEiaH3h7fmh4eFhZejfXfvgYf3hDfwb2bchIiOeggbhybhi9f9eWhghbgtgWioCoi1ImHoHCHygme2HngAh7f2HEgwfngkfVbCH4iEilgaH3hjgYfXgAhWIgIZezelh4ipGhbmCzhjezgybag6gYfah3ImCzhxiyCFi8elgWIVc4ijenh2HaimeVbVc7fYf7e7hzhahlhmhxI5fagxCwgvfmhlhwb1IhClhRfkiaizgFiYcvbFcZdkbAbAI4HVbCHAgEhXf")
AspCoding.EnCode("4bbgjgxClhmhIhyixikfwbmHoHCHCI4gyikfkfxI3hjgkeAgmhpGgICI6f4iACXdnixCahahFckfzhFhzizCyCXioHhbngkf3i5c6fAimioHgI2cSdhcgIgdgIGg1dVbWdhhaizf5ctCli3f7fuhzCkgngyHQgliSejgYf0ghiyi6gBgpGgIggxhkg1GIfZfzfygxioi4ejh4ihcCH6fDf3fAhliaikgZeTHFhwezfnglgmGmHhcVcdgmgwivfahOf5haemhBG7fYf6gaf5h5fmhwblh4i7eAgxhzhxinH3G")
AspCoding.EnCode("chnhkgygxipCZikgYf4HmHzI3GYH1Iab4H4HwIoHgIvfZh2Hfi3ikgvfahVg3fkgmhHg1I3G1GFhziZeahgdhbhG4g5hjgjg2HIhjgxClh4igCyijezgvIychciGYbHfhciGHhFi5f7fwe7hFh4bkh5hzgmfFgYCZgYfGh5bwhXg7C5h6fniEiyg8ili5bUcACzh7hxIafzh5fXgFhvfzhzgHg3dOhzhYhaixiaH5h6fAfYHFIGgwc6f5flgxh6g8eTIVbiGGgZIoHVc3dodEi3Clh7hyikflhmhvcFC3C3i")
AspCoding.EnCode("vfAhng5fli5c4HviyimfygxiwdZiAgDC1IWIWdmhyCnh5cvf5igdVc5HHfVbWdGg4IxHaI5c1GaIxHTIhcVcGgZIpGgIAgEh3g1GwfDfzfjg4ixiYeVbVc2cHfoHCHBH7h5cZijgwemfahBG5fngzg8eYfEiUccRcRRrUQKqvp6WLP5WGPBH3f3IwfAhYfZhGh2bzi8eEg7hFbwczHFe8h8hxIDgH95CkixI5fkf4H3I8e3flgYhYfDfHg4H0gXfkh3fxiki1IHfGqZRMQXRRqIJsREPTo3qHroPHhvd5hGe")
AspCoding.EnCode("Ggxb6gTIoHhbGg1dVbVc3CxiYe3IAgAimipGhb5HUcpGhbhcCHoHiGHhYbxhZh4bPgYf7glCng6fFhybRhFg3CAhUfuililgaixiYhxcZdahzh1ImHGh4Hnglhwfzh6g1IXdFhyhmhxihcCHVbCHZfvfkg3IuiPfWfzI4bPg7ezI4bXeagzgDf4iyCACWibCabIhAi7fAhmhxiACsCZimfmhWICHhiAi7fEi4ikfEgriYCXingXdHg3IFCmh8CEh4i6fliydYcQf3fYh3C1IwIoHgInikezgDfngxilipggg")
AspCoding.EnCode("BGlgng6hFgZe6fDfnH1IWiIi3GvbhcVcoHCH6fYfFh5cEiAgBG6fmh6eFfnglgzG5fEi4iXgEg4ijf4hyfmhXeFhmG4H3fmgjfnhXfybAhmhnikelgnhlh4iDf3GvbVbgIAgDiwClingSfDfTH1IYeYfjgmhDfYf3Inflgjfjh2HWiwiZg2H8hxgYflgmh3IpgYeBG2b3c1G3hxCah8engahEgpgffVbgIFClhvcxC8iZezg3IFiDizeFhYfG98eabnijfkfjeabjbabjbVbgI6fngAC3I7flhGhahagACyh")
AspCoding.EnCode("vfxiXiWIVcnizhxiyCyb3hjgjflhYfWIhb7fmhAg6gxCahlhmhvcEiYfnhvf7fYf4gEg5c4HifkgYhxI4eAg7h3GWIgIYfxi4CXdaiXCVbhbhcCHYbBbhcWdFd2coHhbWICHFi4iDf5cEi6fHgFi3CEi8g3ClgxImCAh3C5hliYfyinCjiYf5fFhyd1IXgZfag3i5exI7fngniyilgmg7engEg2bwIpGCH6flfjgli4iUeFhFcYc6fYfafYf3hli5cmI1GnfAhkezf3Ipgaemf5cyilgmg4i7f4bXfTh1Gxh")