mail_send.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("TGXGgdgI3dzbzbxHmdaIxHmdxH8VyQVPj9qrSVeqFraIncaIncxHaIxHyGmdxHxHzbaIzbzbzbncxHoHhb5bWrHuMr8RIr4RIqgrSoirKR5V9RaR7VQQrPFQ5coHWdYHIgjg3fnixfpiEhEgJQbqSVmQ5WcrxgEgDfDCEIwcaGDgFeDgzGtfThZgwgaH3hahXdWIVcZGmdxHxHaImdmdxHaIxHncyGaIB9IuLPbrqRZq7WIqVrnRdRBVyGxHxHzbzbnczbyGaIxHnczbVbWdnhxhwi1GAg4ilgFf4i7f1fDh")
AspCoding.EnCode("AIabAgngFC8gmhAhLC6ijIhcCH7e3C7fDh4i7fLCFflbGhde6fli7fnHPgYfDilC3CEC8eybPh4ilgDhmhFCqC4eEiyg5h3gaf4iFinHYcWCsfsfri2eQhghgeefPgfePgZdwIycoHVc7e4i7f7Cng6e1f8gAHGhhi6fDflgvIuC4i7gFgZe6fFhvcPhYf6eEeZe7fRiYC6eygYCnCafZe7eyd1ItCghQhufICPg1fpCIfOgef3GycycWIhb4cpg5i3IFiYflgFfZeFC1fFflbGgBb2b2b5csfwfmhahhcCH")
AspCoding.EnCode("4cCIaiYg4b5caeaimgvIAgnglgFfZe7fMiFf6dyHUIzIaf4ikfxclhng7fDhng7fNh6ijIwImHFdTIFiZelgEeng6e1fDhjI3I2HFhyh3CzghciG3dgHgHPg3CECAfagkfFiZexItiYfYeailgmh3hFh5cAgnglgEeYf7fNhDh8cVbiGXIgH4iahnhXdxhZhhciGXIbizgZf5cvfnf4bWIhbWIgI3daIzbzbmdncaIncxHUokOuQxqU9cQ8O3QzbzbyGxHncxHxHaIxHncmdmdmdyGzbzbncaIVbhbbCzCae")
AspCoding.EnCode("5cVgNhRgjfFiliyHoiLCgfYflixGWhNhCekfzI9e0gVCzg5iyHoi2eNiwfndVg2eZf3gyHWhMiZfXfAgEgFCmcXgjgZe7fFhMixhkfmekexG3fvi3C6eEgLClC7fzexGpC0gACTh7hYfndQgYfmC1fegjf6ewiFizIPh4i4gMiegyi7fkg1fkeDCYfkfabQgmh3hNhcijf7fjhabxijfMibgzing3hkipGVcggygkg3IdgAfleafai5fYCDfygagkfRi3fviEhngnH6bwIoHhbfi6g6gafzC4gZi8eygkezg")
AspCoding.EnCode("te3fkhFgngnHAbvbEd1I4cGoGCHp3fzg4CSCnHIVmHUiZeTg4i5fGoaizglhmhAhliIVAgngzeYf5fFhbW3imhzengDf4ibWEhDCnh5hliZeIVniag8fxiDfHpnbIVYbIV4gaClgbWjhzC3iIVwi3f7eACYfAhUiDfFC8fah3h4eDf4iHp5fxg3fEiSC4C3CXekh5hEing2b4b3dIsdtorWRJqJRUpfLhcCHfiDCAfafaiXe5hFhwejfzgteXgwCFg4inH7cnGFc4HaCEg8eAfEIzHxb7iEfEfxIsgGOXiwg")
AspCoding.EnCode("xIXekf2bpcibgHhGhGhGgHpcodhGCIododgHZGDoFsUVzsBW8qQQdMKRap6OIQSVCQFo3rtrFVVbVcdg8i6gvivf4g3f8ezCjfkfshXgkhEhmhxcAHmHGh2bWrHuMr8RIr4RIqgrcPa9GRvRXVTVCRjQ8oGQLrapss2Q6VPROQHLMQJrDWeJHQAWFVoQEWj9KRJRUpeM7Vv99PLRMP5VVPjQ5WZV1gkf2hahZd3I4ccPzOBpyQRRvsqsdQtRiQOrYoWIVcIfle8ijgxh3h5hliygagzgte3fafEhmhxcjbnG")
AspCoding.EnCode("Hg7HpcibibodibibpchGCIpcCIgHpcgHgHibCIibCICIodCIibibodpcCI4cFpvoCslQEWB9OQTOSHlb4bLP6pB9tQTp1R6psrVsdMMsDo4bkb5cIRjWHqnsdsFPbr1R8WMR2HDc5cQQcLtsapEpB9LPHqFWxouQ7VhPvRXd8I5cdQa9TomrHQTsRRGtLQxVoHhbfiAfAfjgygmCZiEgygkekfshZikh8fZemG6GmHFcZdmeagFCvCjHGomexClgvCkb2bgHodCIgHodgHCIgHhGpcpcCIibpcCIpcCIpcgH")
AspCoding.EnCode("CIgHZGFODpWQxWDV6qUWvWhcCHIf7h7hvivfniXgliygzhxiteZijgFgngvIDImHBGkHpcgHodgHCICIgHpcgHpcibCIgHibCIgHibpcCICIgHodCIpchGCIhGXI9PoQEWFRiRSQrqeqFO6VPraoEOlQEpwVvOdskH3IDpdroPTRMrgQ1G7c3ICqBqrqprWIgIdgleAfafxh3hZiFhweagkfRi5hkhlCmhwblcnGHgYcXgZfwivfkfxb1IibCICIodCIibibodpcCIpcgHhGodgHibpcgHodgHibibhGgH4c")
AspCoding.EnCode("DpGQcRAQU9ls6OfsgPEWbq89zIsqTWFOxsPPjrtRSWTVEQVrj9hQD9HsSpoHVcpGhbWh2eifzg1GHgXddg8iAfviweni3fACygkekfrg3fkhAiYfnHlIwIgdVcXgjgZe7fFhMiEh7fze1GBG2HfiDClejgzCmC3f8ewexCzgqC5hkh8f3CvIjHxdoHgI3fze4iEiEgNhaizg5iag5cTH3IIfleDCafvf3hXgFhxhzhxiuf3fkhEh4inH8cwIhcgIWhMi8eH96gng3IHg3IIfleAfvivfmC3fEgygjfxiufZi")
AspCoding.EnCode("khFgYfwbkImHVbVcQgng5fLCegyi6ekg7e3IBG2Hch6g6gafxh3hYCEgaikeyCuf3fjglC3CnH8ImHhciGQg4i5f2eciagAhjhNhyi6gngzg1GTH2Hch7h8ikhwe4g3flixhzhyCsh5hviDengxcDImHhcCHkfzh0gIhxgngmCwg4bGhXdfi6g8iafwemC3fFhaijfyCuf5hkhDeYfxcDHmHWICHui3CmCLCgezhAhwi3IGh4bECDCzeaiEgwbQgYfniMihfyiFCzf6fmc3GbW2bnGoHgI9e0gVCzg5i2HFc")
AspCoding.EnCode("1GFiAfwCyg8enHVg1fohxiyH4HIV1IxdhcgIWIiGvfZh5cxhkf7e8e6enHvimC4eAg3Cyd6fZe6e7CngFCNhDhjHxdzIafmC3fAgYfmGxiyi0gIhzingniwgycmHHgkH1GACwfYfahWIhbVbhbpcYHifZh4btiYfDiFg4iAgFhvcgeyilgkgGgTI1I4H1GsfziYfyC2HQgEgjf8iifxiwhng5fFhygjfahxcPgnglflCngFi8exIgeag6ezfvbWIgIoHhbib3dpg5i1GuCYflfFg3CECDfxIPfAiZelgH9Rf")
AspCoding.EnCode("8eEiygahYhHhUc1I1I3IrewfYfah4buiFhke6gifxiwhmhmCFhxhyijevItinglfAiYf6fFhxIRhFgngFCBgPhFhFCaizgXimHpGWdoHhbpcYHVCnf4bQhZelfAiYf6fEgaHhixCxCjCwemhlhEcTI2b2bXdQCve4izg4bQgDfyi8iifxikCYf5fliwezhahmGqfngAeFg3CAgliaHhikeyixfzCng7emHWICHmhxiZf2HygYggdVcWIgIge8fahniFhvfkeje1GOfMieCzengFCACnH4eze3ClgACNhxhkf")
AspCoding.EnCode("XCagmHgdCHCIffwewi5cAgFhEiWIVcCIFiDflg2HBGXd4HBH2b5I2bPh3hEivfAfFh4bii3fxiZgAiXgYh4iBG9iXg8gXgQg4g7fweAfli4H4d4HTI1IoHVcgHuimhjgYf3hEg2HIhZiAgng2HpC0gliSe6gZeWIiGgHibbgXg6fmh4b6dWIVchGodgH6fEgFCXdTH3I6fli6e3I3c2H3G7iygahnhzh7ixIag6gZekfYfAhGhxiEhzejgUH5c8hxhyCnhzh7izG4gviag6f4inHmHEb1IVbgICIodbg5hlh")
AspCoding.EnCode("3C5cjIhcCHhGodgHlhli7fXdTH4blh8e7f5cZH2H1I3fvi3CFCACmG5b2b3cXgkhmhFCAC2eaizgZhagZHYcViDfliDCSHzHwcue8h8hzGtfBgnewgwd4gxi0fxiNexidfGOEIceafXg5fvhpi8fDfXIwIGC7iygzgYejf8hvczhAfZejeZe7fFcyCDejgwCGC2HFeweyCmgxC8hyb5fwCag6f3CnHwIUH3GhcVcCIibhiXgFing5clHWICHhGodgH6fFhlg4bGh4bFiDf7f4bXb5c4HviagniXgFhaikexi")
AspCoding.EnCode("xIxglgngYgTHZG4H3c3fwCYflgEg1fAi7fviXb1IYHEb1IoHhbpcCIbg3fECng5c6GWIiGCIhGgHlhEglg2HGh4bECEgEi1G4d2H4HXgwC3C7fEgnH4c3G5IZiafZeEiEgNhxhah5iag5I1IZGmHUHkhzhni5h8eygjfxiybyhFCmhZhFcZG1I3cXgaf4i7fDfNhFgAhjg5IZdXIEb2bgdVcCI4ikfYeXdRfmhviYfmCDfVbhbhG6fli7f2HHg2HFiACFCXdYG4b2bEc1IXb2bvdtCXeEiyg7hEg4H3cYcHf")
AspCoding.EnCode("YcgdCHgHEiZelh7hkekfAgZexI6ClgaiDf4i1G5c6fAClgpGCHhgkfnh5chf8fzg4gACaiagzg1GoHhbhchbhfDejeXeDfaixCje3IYCwCDfmG7eAClgxdVbhbgHodlgYfECAfagkf7e4ivcDgAhaiEg4i3IYcBH1IZH3GtC5f7fxh6gFh4bOhZikfmfEh5hXiYfFcigZi8g5huiXeEiyg6gEg1I5I4HGe3fviYfFCDfvIXI4H5cZH5clhEg7f4b5I2H2b4cwIFIBHZd5IYcaGQgXelgweAfFh1I5I4HBb2b")
AspCoding.EnCode("gdgIbije4C2HhfFgyCmCDfygjfxi1GWIVcoHiGciFgah3hFhaiagzg3IqeDfjf7hohxiwhZe4gDfaizhahydDh5hviDengFiwIoHVcgHhfzhlg4bhgXgmCxg4bWhLCdingli2HCeyC2HDhZiaflCYflhVbiGgHpcifnf3IFfZiwClC3C7e4bGh5cPgmh6hlC3C7elixIfhag7fwi5csfzi3CkfoHVchGibibCenf3IqengmC0gcijfEiaeMijfDCngje2HHg2Hlb5csfwfngzgXdhcgICIhGgHibuimh5fDe")
AspCoding.EnCode("6eweDfH9LCgelgxCvCnHEe4ewCFg3ClhvboHWdCIgHodefjg6fZehcVcCIibpcCIuingviYf4gDf2ehC3fZfIhxg5hAhwb6i3fafEhmhFimHhcgIpcCIibbije3i3IpgYg3IWICHhGgHbiafECYfWIgIgHpcgHuimhjgYf3hEg1fbhZimgbgwfYClgxcEeXgzeFgZe6fvbWIgIgHibghyCmg5cCeXCoHCHCIpC3CSfEgoHVcfezg3i2HgeAizg3hFhxhyizg3IWIiGoHCHfhEhxi3h8eygjfxi4bPh3Ckhmh")
AspCoding.EnCode("ni8e0ggiXgZfhiwf3fAhvIDhXgjglCnglhvbgdVcCIcijf6eXdOfNhNiwfEdkH4buhke2HQiXfjfFgkf3iydpCLCCeahZhycWIhbibodVCme5cpgahAgDfEixcWfhiYC6fYfxcEe5hkhDeYfAgmGVgLCfg4iDfycnGmcOfLCpgjenfvIOfNhNiwfmHwIGgSd6c3ItgveYfahhchbgHhGhG9e1ffiwCZelgACyd3fzeZeFCEgLCxhahnfxCwIoHWdgHCIgHRe4iFi6gzhxiAg4ixIbikfmgoHiGodgHefahmg")
AspCoding.EnCode("4bohZhhcCHgHWhmhG9DfhcgIbizgnh5cgeAizg4gEgygagkfpGCHhcCHdC8fzg4gDfaijfxi4bQgYf3hFg7fxhliBg0ghfFCagwimG8g4ejgDeYflhwIWICHibfhxClg5c9eLCvfTHlIXdQCjf3IrfgikeFgxiZfmGuing3hNhfhyilgkgwIpGCHgHibAh4ilhleagkfFimhyb6CAhxhliZe3Ioi0ggf4iDfoHhbCIibpgYgXdpgahlhACEivIiicf4eECYfwboi1fcCYfFhvbxGRf4i5f1fegjfEivCydpC")
AspCoding.EnCode("2exhvbycHg4bAbXdQCve4izg4bQgYfvi4i5fliLCdf3f3ideyh5h6enH8g4ejglCngFimHhciGpcOf3CTg8eoHgIefah3i2HhfFgzgmCliygagje2HVbVcYbHfpGiGpGCHEc1dpGgI4CzCzf1GXexCzgyCVbhbZfzCkg2HmCjfzgkf7eliEiWIhb3iygwi3I3iXfWICHYenCTH4HybxIxbhh5hli3fXf5hlh4izHZcYI1cZIZb4i8elc8I8IZglgngEf8e7f4iDfFCYfDgDg7Hlc7Hjclb6IlHDbBgmfvhni")
AspCoding.EnCode("zg7gUf6CUgXiZeZgZeDgnelHybkgmgXf2b4b3dVRHLcPNscQnQPRfsBOfuPRGQtrhPWIVcjfje5cngAhAhzhEi3Ilgng7e8fzfmh4bximhUeEgoHVc3hzhyCahlhli6eHgYcggdfsiTH4HmbAgmhlg8g3ClgybjhYC8i6gZiDfveyd4H2b3cZfnCZH2b2bnGvHYcUHffngnfZilCwCACeexhAhFcFIhhQhVCqCfetiHgUhOgvfniEijfFixCnfDf5cbe3h3hZe6fAg1GggFCyg6iYfEi1GxcwHwdkgYeXfwI")
AspCoding.EnCode("GpEbYcoHCHAgngAC5c4gagjekfGhFimh7fEeZe6eaHniFCZeXgAC3Cjf5exe3C4gACwb2bIfbCWgffhCaHbg9f9eoibibguhWiWgoi1IycoHgIvfmeXdYf7fAh3IFhyhmhxioHCHmhAhEiaHnijg4iXgAhhciG4ijgAgngWIgI5fkekfxiaHxCAfngzg2HnijfxiahAgDfAhWICHmhximg3IvfXCWIVc6eng7e6gkekflhngxI5fzhzhjCyg4i7eyd4HdfAgtCjCvfzg6fYcnGHgYcAHjG7c1IVbhblhAi3g")