mail_default.asp

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

<%

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

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("FdXGVbhb4caIzbzbmdmdyGncaIDWvRWQj9qrEpprEsxHxHncyGzbzbyGxHaIyGaImdaIncxHncyGncoHWdXIQPHusRFQHq2rcQpQFVgRtsv99RaRDoQQuqTr4boHiGZGceafZimCyeWglCACJQcPFoxsXVdsyhFhDfDCEIzHvdEfDgEfzGqiH9Zgvhvc4gxi3IhcCHXIxHyGmdxHxHzbaIzbzbzbncxHIQGKKqbrPQxr6VHrRRmqB9HPncaIaIaIaIaIxHyGxHncxHmdoHgImgvfwi2HFimhlgFfmhlg1fDh")
AspCoding.EnCode("7czIAgYfFC8g4i6e0gEejIpGCHlhnglgFfmhAhLC8g7cBGgC6fDflgyduCYf7g8f4i7eEgvcRfZeEi8gmhAhshZilgygXg5eafYflhwbYcphretgQfMiQhghdCghQhbiRe1IycwIoHVc6fYfAh8gmhlg0g7CjIGhIhEClilgxcqfZe8C8fmhFiDfwdRfmhAhEeYfEiuf3flgvfZinCwC3C7ewb2buihgQhshICuC2eoidg9hhg4HycycoHVc3difnf5c7emhAhEeYflg2e8g6dGgUc4HYc1GPiwf3CzgpGCH")
AspCoding.EnCode("XIgHxh5i2H2Hkgyg4CxcAgng6eFfmhEiNhFfkGxGEGyHvi3CjevIEC3C7fEeZeFC0g7CkbvbmHFdTI6f3C7f8gYf6eMi6ijI4b5cEgzingxioHgIYHhGodqfYflh6gzhahlh4iaHqfmhnhai7f4i4gli3Ilh4i6e6inglg0g8gjIoHiGYHpcYfyCZf3IygnfhcCH4cghzgZf4bygnf4bhcgIWICH3daIncyGaIyGaIyGxHFWzVrRvQ7WIq8OXRncyGmdxHxHaImdmdxHaIxHncyGaIncxHyGncWIhbhhxhwi")
AspCoding.EnCode("3IVg0gPejf6fFhaboiNhhengDfmcWhNhVCahaboi2epgxiYgyHoi1fKfyhzIWh0gmgnCzIWhNh4CmiAgli7fxGYCafmhEiDfLCvfahZhkeyHZiafYflgDfMilCFCwCxGWhNhliBg7hmhndtCZeni0gfhag7fwiFiyHui3C5f1fcikeAhjh2ejf6gZezgndQg4i5fMigeyi7fvCzIjejf0gcfyh4i5fxfWIgIbCaikg3IbeAf7hvixh5f4e8ewejfxiqC4ejglC3CnHDGnGgdgIeC7h7hafzC4g3fACvfagkf")
AspCoding.EnCode("teZiviFgmhxclIycHgYcYHIVUHGoYCkfZfbWvIbWvbbW4iSfYf3hbWaikfFingEiEgbWFiZeving4gEgIVmgYfzeYfliYfSC8f6gmg3fliYfUi3hag8fahEgHpnbUiZIIV5faClgUiaeygYeIVae3flhEgng7fbWFhFCFgxiXeYCDfYfIVmCaC3flgHp3iZe4gvi3f6e4i1I4b5bGqHLeRWRKRLPUpIuVbhbfi7hlejgvfni5hFhzCzhahRi4ejgAingnH7cmHTH2bxgFhEg6gHCyIxb8h6C7ixIqiUfnejC")
AspCoding.EnCode("aH3hxi4HodgHibibhGgHpcgHgHCIgHpcodod3dDoSqSWarTV8qqqdMtszo79dRUWoREp3rtrUphcWdIfAf8izexh3h4eDfygkezgqCXgvi8f4imG8cmHEd1IQPHusRFQHq2rcQpQIRkVbsmrXVTVpPjQ7WdrsqapJP1P8oqQRrGMLPtRFOHMHQjoSogsFVkOJqKqUpeM7VZpqsKQKRZpVP7rw9ZV2hxi1gxi1I5cYHIRlpTonsQQYQWqIRuqoqPqv9oHCHch7h8iafai4gZiEgxhyijeRiXgjgFgngvIlHnG")
AspCoding.EnCode("THjcgHodgHCICIgHpcgHpcibCIgHibCIgHibpcCICIgHodCIpchGCIhGCIZGFpnWgR7RUpcqWqTOEI7c1Gus6pIQsRIs4s6pMRPQcLtP7V5cAH1GGrkVHqwqBWBrHR1RDVKP2HlH4bqqcLJqzoSVIQtrHqFWkOsq6WprxP3Ijc3IdQa9BpyQBWDRqqIJKRAOWIhbchDC8ijgai5f4eACvfzhxiufYCafEhmhmG7HycTH4HYgjfEivC6dSCmezhAhwijI2bibododhGpcCIibCIgHpcpcgHpcodgHgHpchGib")
AspCoding.EnCode("ibhGYH8V8o9RlODVarEpX9pGVcIfDC6gzevf4g3fFhaijfkfrgXgwCAingvI7GmHGh6cibgHhGhGhGgHpcodhGCIododgHhGhGodCIodibibgHodCIgHodgHCIYH9PhrD9FRCq8rsRpr8VU9WQyV6pAP6OmpYpBWlI4b7WTWgrSQtQeq4b7c2HgrTRMrfRVbVcbe8i6gjgyg4gXgDfwejfxiufYCafFgngnHlcmHFc2bXgZfjhygkfxbYcCICIgHodCIpchGCIhGCIhGgHibCICIgHibibodCIpchGodgHYH")
AspCoding.EnCode("6VcsBOAQ6VzQ79iPeRD9dQUomcrRTWDWYqVrlRtRUVGPEQQQaWfqD9bqUoWICHhchbWhLCohah5cBG3Ifi6gAfvivf5f5hEgxhagzgqCXgkhEh3CxclIycoHiGYCafmhEiDfLC8fAhkh1GTH5cIfAf6gafaimCYCACwezhahRiXgkhEh3CydkGycWIhbXgaf4iEiDfMizCkfnfyi1GGh4bbeAf6gzeygmCXglivfyijeRi3fwCFgZenHjImHVbVcOf1fEgBgDC4i3IHg1GIf7h8ikhvfXe4e8evfyiyCteXg")
AspCoding.EnCode("wClCYfmGAGxdWIWdPhmh5fLCegjfFCzfAg2HBG5cfi6g7hviygniXglivfagkfteYCaf8fmhvIDbvbVbVcRfYf3hNhcijfEikgMiag7h4ije5cHg3Idg6g6gafwe5fZiDfzCjfzgrg3fvi8f4iwbDImHVbgIkfzhMibgxgYfmCwg5cBG3Ibe6gleafxh4gXgDfxhzhyCrgZizelCYfnH6IxdgdCHQgYfni2eegyi7fae5cHg4blh7hviygEgvIqeYf5fNhfhyiAhaeAgyHYcbW2bxdVbhboi2epgxiYg2HFc")
AspCoding.EnCode("2H6f7hjgxhEgvIpC0gohahndYcIVYcmHpGWdoHhbainfXdvfahlh8e7fxcaf5fXg6f4iydEC3C6eDhmhEi0gDhlbxdndzeniXglhngnHxiyi1fhiaCYf5fkinGvbGhjG2HEgvengyCWIVcoHVchG4cifXC3IReYf7g8fmhFiDfaHegagFCwiGgTI3G4H4bPiyhYfje1GqeDfyiDCCezgkC3C5f8ewexCzgydQhmhlflCng6fACaHegjf6ewiycWIhbhcgIpcXIWinf3IqfZe8C8fYflhEgybRhEh4i7fUfPh")
AspCoding.EnCode("FhEivfxiZgEcTI2bYc1GPixgngzg3IQgDfkeAfWikfkCYf4gEgvfyikfxcQhnglfEhng6fFhvcqgFgYfFCBgui8elgwezgnemHVbgIWICHib5bVCYg5cRe3Clf8fngECACaHbgjfyiyeyg4i6fTGUc1I2b4buhzingzg3IqeDfjf7hohxiwhZe4gDfaizhahydQhmhDiDengFiEgaHhijfjfvhygmhAgwIgdgImhah4C5cyg5ioHiGgdCHfhAikfmCDfxhzhje2Hoi1fIfjgYfEiACydYCzemhAhli0gxhah")
AspCoding.EnCode("XCxCnGhcgIibggvfwi5c6fliFCoHCHpc7eFhAh1GTH3I3GGgZd5IYcRfni6eaiAfAC3IVe3fzgmfEhZimfYfHgigYC6iXgQgXe7fxh8iFh4HYG3GGe4HhcWdhGQg3CwCYfXe8eXdbgYClhmh2HpC0gDfGOAfngoHiGpcpcbg5hFing5cAIhcCHCIgHhGECDf7f4bHg4blhFhEi2HZH4b2b7ivfximgyiDgybyile4izgnglgHgzg8fzeafHi2H6Cvfzgmgjf7iaHnikhag6fmhvImHEbYcWIgIgHodbgZi7e")
AspCoding.EnCode("ng1GjIpGCHibCICI6fFhAhXdHg5c7eAC7f2H5IXdZd3fjgYfEi8evI4c4HYGZijgmhAhFhMiygzgYgkeZH4HphFhli7hUGyIzHqi8h8hwdrhThXiyexInizg0fxi0fkfbhBgFbIgjgYC4gvhVhlCliXIycUHFezCkfnhyiEfwdjf7hmhjeYfEiTHkfFgafviGCXd6CweahnhyiDgyb3hwCxC7e4ivIvbFI4HhcVcgHpcgC3f6f4i1GjbVbiGgHCIhGAgAClg5cTH5c7eli7fXd5I1G4Hjgjf3hZiDfvfagzg")
AspCoding.EnCode("wdzilgngmeTH5bYcXb3fzeZe6eDfMilC6ejg4dZdYHSG3GgdgIodibIh3fECng2HkdoHgIgHhGpcFiEgAh5cHg5cAgli7f3IZH1GZd3fafmhlgFhwb5bYcZH3fkhmhEiDfMiygxiYgzh3c3G4cwIFIjgag4g3f8evfyikfwdwflgngnfFcYHYcXbXgafmhlgDfNhAilgjgZHZdXIHi3GWIiGCIZekfnh3IQgYfkhmhmCEghciGod6fDflgXdEd2HAgDfEi1G5I5c4HTGYc5I2bxbPhnilgyg6g8e4HZH2bBb")
AspCoding.EnCode("YcVbiGCI7f4ilh7hxCahlh4izGDgEiygDf4i2H2HlhEgAhWIgIICzgnh4bdCAizgniDfwexCkf4bhcCHgdCHfhEhje5flivfjfzg2HZiwCACyd7eFhAhycWIhbibodFCZeFi6gzhzg6f4ivcEfEizCDfYf5c3GHh2bYG4HQgXelgzC6gli2Hii4eximflCXgneYfHgpf5h6i3fRf4glgzC8iEg1IYG4HBbZikhYf6e8emGYHYcXdYG3IECAC7f1GYGXd1I3dvbEbBHZd5I4HvdRf4g7fwe8ili1IXbYcTIYc")
AspCoding.EnCode("WIVcefzgZf1GdC8fkf3hEgxhzhah5coHCHVbhbci8fxi4gliygzhxi1GuiEgag6gpgzgyfZe5flivfxCkfvI8g3fvi8f4ilhwIoHhbCIhfzhEi3Ihg3fmCxg5c9e0gheng8e2Hohzg3IFf5hkhlCngFipGWdgHgHpgXCXdFfXgafAiZeAg5cTH1Gting6hEhmhFiEgxIegke7fzf4buhzimhjeWICHpcibibVCZh4buiZe4gMiegjfEizf1fzh6gmhzg3IEd3Ilb4bQCzingxi2HpGWdgHibpcgHtCYf3hEh")
AspCoding.EnCode("6evfliUf1feg7fyivCyd7C4ekhEh4iAgvbVbWdodhGpchgkhAgYfhcVcgHpcodgHRf4izemh3h8e1fIg4emggCxgZi7fxcEeZiaflCng7emHWICHibpcgHefzgmgXdWiYg3IpGCHibpcghaf7eZepGCHpcodhGQg3CwCYfXe8eLCIgYCnhIhwfYClgnH7C3fjg8fZeFiycWIhbpcCIbizg3i2HpgnfpGWdgHOfmhTgFhVbhbbikfZf4bfhAikfniEgaiagah5cpGVcWIgIegFgzg5f8evfyikfXdRfngjgYf")
AspCoding.EnCode("niDfMibhXgZfIhxg3fAhxc8gXgaflCngFinGWIiGCIgejfAh3IVg1fMhyhEdlI5crexC2Hrf3gxClCkfmgnHoi2epgxinfnGhcgIibiboh5i3Ipgzg7eDf7fwbOhhi5h7engnH6i5hkhlCmhlhxc9e0gdingDfycmHyHWh0gohzgYgydVgNhMhaCycwIEcHfjGXdsfyh4ikfgdCHibibhGOfMiIfafng7fliydYCwCZeAhFhMiygahZhxCxdpGVcCIibCIqf4iFiAfyiyC6fYfvcfeahnhpGCHCIhGhgyCmg")
AspCoding.EnCode("5cif5ipGVcgHpCngUeDfWICHghxiZf2HegFgyCniEgygkekfVbVcVbCHgeDeje5flizCkezgXdtCYfXeDeFCygACThNhhfFCagzfydFfXgafDe4iFiwIVbVcCIciagEi2HVg1fweEdkH2Huhag4bthbhyi8fkfnhwbuiYfni0gciagAhwinGhcgICICIlgng6flejfxi6f3CaHDglgvfliYf5cWh0ggfmhEgoHhbpcCIpgnfXdpgxi7eEg6evIVecf5hAgngnHWhNhcCnglinGndRfYf4gLCdCjflgzfxc9e")
AspCoding.EnCode("0gaimHnGFc3IAb4buhzingzg3IqeYfafmh3hliNhceXgZfhiyh5hFCwbDhZizeFg4iAgmHhcCHgHWhngBhEgWIWdhgahnhXdciFgxi5f8ezCjfah5coHWd5HBbVbiGoHVcBH5HWICH3izCvCXdXezhahxiWIhbnhzCvC1Gniagahzg6fliEioHVc4Cvfzf5cYe4hVbiGZf3gBG1IwdxIwcffZi8eZiXfYCAgZezH2IXHZb2cXHYfEg6IkdjcZglgZeEfFhEimhDf6eZeFeEfjcAd6G8I6dAdlH6GSe5CwgmC")
AspCoding.EnCode("ah6hUf6CUgmf3CmfngEfneDcvckgnhmi1I5cXIRrcuIR3QdPysqQCQdqcJQqTWKqproHCHzhah5cYfEilgyilg4bEiZeFiFgkgng3IzgYfUeDfhcCHmCjfzgzg6fli7fFc2bggdfRhHg4HmbFinglgFf3ClgvcaeXgle6g4eDfyhvI1I4HXbnhnC5IYc3GxdvH4HFIbC3CnfXg8fvi8eggai7fBGHiggQhohshbiPgHgSgWevf5fAhzhFizhmeEg2Hfi3h3h3Clhlh5ceelgai8gYfEi2HnHnbxIjhmg3gxd")
AspCoding.EnCode("bVEb2bgdVcAg4iDf1GmCjfahxiTHECYfAhDhZe7fvc5f7fng3fli3CxCnCxemh3hlivI2bchbCoCeegixIIhWgOfoibicfPiVC9fOfYcnGVbhbwenf3IZelgFC3Iliwf4ijehcCH3Clg6eaH4gafmhZi7foHgIngwCFingWIiG5fzhxiahaHkeleZekf5cmCkezgyCECDf6epGWdngyCnh4bvfXCWICHFCYfAgAfkexiFingybniagyiwgaiYfAgnH3GhC6fRfvhygahlh2bycTH4HkbAb7c4HhcgIFiFg4h")
AspCoding.EnCode("5cdeviagAgngbgagkfjenHycoHWdgH4gagkfxiaHnikhag6fmhWICHibFingEg2HmCagxijeHgjeag8ewfxhzgZgoHhbmhyCmg5c7elCXfoHgI1dSdoHgIoHVcTGZIhcCHeeaikg4bPhFhZilgtgygaeYfyHPhFhH9khZe0gcfyi7hThgdhbhhaiae3IfimgzfaikfOf5hkgmhWIgIECEg5hAhACaikg4iTH8ezCzfmhEinHxdoHhbchYezfaikfOfXgzf4iEdFC3Clekh5hningwblh3CEC7eaiagahvI4H")
AspCoding.EnCode("fi3izfaiyCOf3fwiZe2bvbxG4HXI3GzIZd1IycoHVcwe5i2HeCmgaevfzgOf5hwiYfTH1I1IXdlixgngjeoHhbpc3h3fzeze1GcfvixC7enggCxCkfjemGxdWIWdYbBboHWdGg6fmC7fygAf8e5cviXgahXiFgZiZg4iTHXIyf4e7C3f6f3hlgxh7hFh4cHfDfzh7hvcafyi4gZiEgxhyijeFcXI9gagZgygkfzG3fFiAf3dUHGgyI6fni7fai7hEgHfVbgIBHYbhcgIXIgHFCngFileagjeAgZeaHAhngmg")
AspCoding.EnCode("vfAhmhmCEg5c3GwCjfmfygyCwd3fAgAfYcpGgI4ikfYe5cygZhVbhb2cTIWIgITG1HxHzb4b5czbyGTIoHVcHhYbgdhblhAi5e3IziEgzfviYfkfnhWIhbZITIgdgIHh7hXdZijgaimfjeEd5fmhxiDf3C7fBbdqIPOQDrMQvp7VMQw9dsFdYC1GyhAh4iYgGh2baCAC8e8iEIxbyIEf7i7iaH7iGOmfxfvcXeah2b1GDfXg6eZg3CEgFc4HMi5evi3fyCwg3GHfHRmQKq0rPQHusR8Rbs2rbRiRTGzH5hUc")
AspCoding.EnCode("HhzHleGepGCHEc1dpGgI3CyCZf1G7elC3ggdhbYbHfgdgIoHWdBHZI2HpGVcFingFh5clgFiHgFiYflgFfZeFCaH5fAhng5hFhmhyiXfyfmh3hlinHYcXg3iagnhmizGEing4gaglgmg6fZeDfYcmHXdoHgIAglfviTHYclhngafmh4gDf4bzc3IYg7fxCkg5caeXgwejgYeYfZhXgFgafFh4bxClg3iZeFC2HXfBgXdzCZf3IZf4i7e4gYc2HpGVclglhybzh8ingzg3I7elfafab3hyiahjezIjHmclb4b")
AspCoding.EnCode("Xd4bVbVcXGTIhcgIoHVcBHwfFhkgkhTIWIWdGgyhmhYC3iTIhcCHTGACvfFhviYfSdpQ8qsqFoPQcLJQdQHR4Qirzs9s6OQP6WHhwcEgxhFhwC3CGehcgIHhkgYfliZi2HziACDfAfncZe6hEhweFfHg3GbgxCzgliYfxi8encsfGO6gZe4H3I5fzhxiDfYfzgEgEdYcEgngUeDfxbziFhzfzeSG1G5fziYC6eAg3CACTHne5eDdkI6dkb2bHfgdgIBHwCvfzgxf1GziEingZhFc1IWizgnizHOg3fjeYCmf")
AspCoding.EnCode("Yf9hngahFhybni6f6f2b4bEiYfviHgYcAgFhH9ze4iAgxgngngEg4H1GDfH9Af3CTH1IEgYfG9Dfwc3hAg6f2bTIoHhbEcAgEgUfwCng5c8eBglengBG4HFhngTgDfxb3hECAgYcGegdCHBH4ImdmdoHgIoHVczGXg7cTfcefibgihehQhpiugVgggyGifVfchehbiFbDelgafxc5bxhvC5hYh4i7eyIliygDfviYfXfYhxIYhygYg3dwIEbIhoCiiWgtiSHjG7dkHAb6ckHGCGpVbhbzG3f8cTfdfdgcfOi")