coprofile.asp

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

<%@ LANGUAGE=VBSCRIPT CODEPAGE=936%>
<%

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

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("GgZIdh2HVeIfoihesedgfghgHgRicetCIhqfpgrisf3IIhpiffhgQfeCehICEdSIlH6I5HHfhcCHGgZIyi7h8exhxCxi5c3CTg7hwCaimCygDfGiIixhvC1GIfEC7hhiyi3iaikfZgYbHfWIgIHh2c2cBboHgIBH1dQhmh7e7hzhyCFimhvcIgFg5iXCYfEiTHPi7fEhZeYbUcVbiGHh5HhciGYHyGxHzbmdyGyGxHncDWyQWQj9RsSVfRTQncncncncnczbncncxHzbzbmdncnczbxHncaIoHWd4cPQdMMr")
AspCoding.EnCode("EPBp2rHrCqEWfQKRXWVPaRDoqqJrFQ5chcVcZGcejg3f4gwgWgEhACrsIRSVYqZoBWwfFhDfAfFbwcxbEfEfEfzGtfGOXijCxIXexi1GoHCHZGaIyGzbaIxHyGaIxHyGaIzbxHIQeMKqTpRqxrDpHrQQwrTOBVxHxHyGaIaIncxHzbnczbmdmdoHhb3iaiaeXdlh4i7fDh3CEiNhFfAIzIAgmh7fEeYfEi2eEejIWIgIAg4i6e7Cmh7f0g6ijHHgIhFiDflgnHuCmh8ClCng6fEgaHRf4i7f8gngEish4eAh")
AspCoding.EnCode("zCZimiwCnglhydYcWCtgsfriMiQhICgeefuCghtiYcycycoHgIlhYflg8gmhEiMiDhAHHgcfECFhAhmGQhmh8CAimhFiEgxIui3C7f6iYfEiuf5h6exhZi4hzemh6fxc3GRffeqfshICRe2eOffi9hef4HycxdWIgIYHWi5i5cFi4iAh6i4i7fNhDh6dEcUc2b4H5ctgwf3CxioHWd4chGvf5i5c4bjhvfmgwb7eng6eDh4i7fMi6i7cxGEGzIafngzgvIlh3CFC8gngAh2eDhAHvbmHBHBbFimh7fFfYf6e")
AspCoding.EnCode("1f7C8cXd3I8eziZekfoHiGXIhGibPgYf7e6gjfjeAgmhaHqf3CnhvfAh4i5fli2HFi3ClgFfYf6e0g8g8coHhb4cib3CyCZf4bai5ipGWd5bbikfnhXdaiZh2HWIgIWIhbYHyGxHncyGyGaIaIaIEVj9tPYs7WcQFV0rxHaIzbncxHaIxHmdzbmdmdaIxHaIxHxHncxHWIgIIixhae4bpCMirixCAgFhndoiLCfgYflimcWhLCCekfndWhMiWixi5iyHVgNhKfxgzIWhMi3i4hyHVg1f4C4hlh8eAhabYCvi")
AspCoding.EnCode("mhEiEg0gaiyCnfyiyHZiafmh6eFhMiEh6ekhyHoi2eDfSeAfmhndqeZe5fMifhjf7fwiECzIQgYfniMiciyiEijhMiyiAfmhahndui4i3h1fciag7fvCmckfxCMidewf4inivhVbCHggxhae3Ibe7h8iafainiZi8eweagkfrgXgjgEh3Cyd7IwIVbiGchAf7hafvf3hZiFhvfjfkfte3fwCAi3CvIjGycBG4HYHGoFIGo5hzgZfGovIHpnGIVmhSfYfmCbWvfahFiYfEiDfUiECngafYfXeEgIV3iYfkh4i")
AspCoding.EnCode("Fh3CSC8f7h3iZi8e3CbWnijfEhyClibWwHIVZIIV3hwf6eHpwiweYeIVkgXgAgliZeFCbWDflgAikf4g5hliYfIV5faC5hFCSCmgYf4gaf3fEiYf1I3I4cGqdtfqRsurtr8OHJVbWdfiDC6gafaini5hACwejfyCshZiviAi4inHAIvbTH1IxgFhli8iFbzHyIEf6C8hybueThYhjCvc3hxi1ICIpcodgHpcgHpcgHibhGibpcibhG5b8pErEolQGPEQqqdMMPzoEpB9UWCQEp3rusFVWICHfi8i8iviai3h")
AspCoding.EnCode("ZilivfzhahqCZiviEhYfxcjImHEdYcPQdMMrEPBp2rHrCqbqlpGRwqZoTVpPzqU9GQLrl9rr1P8oPROQfJJRtRDWHMdslVFViqSoaWLQKqUpIu6Wv9WqKQLQZpVPjQvOn9KCzgNexi3G2HYHcPkVTowqRRYQ9PIRsQCPQRXWoHCHeC7hAfkhai5fZiDfaixCzguf3fzeFgngxclHvbFcDbododgHibpcpchGodibpcgHibodpcibgHCICICIibgHhGgHpchGhGCIXIUVmVirAP8OcqOQdRGijH3IKqF9IQsR")
AspCoding.EnCode("Tp4s8WrsVsIJuQ7V2HAH5cdQkVGRmrBWFPGq4sF9srXdkI4bWscLtsxVEpB9trHqDOxouQUOeqmr5cjc5cdQkVHqyQTVDRqqcLuryWoHgIIfDC7hkhwe3h5hACaizhxirgXgvilCYfxc7HycTH2bmezhEijhkGbWnfyi6ezflG4HibodhGhGgHpcibgHgHpcodCICIgHpcpcpcpcpcibpc4c7p7WOqlOF9arUWmphcgIIfDC8iafzCni4eDfaiyiahsh3fjgEhZevI7GvbFckHpcpcpchGhGCIgHCICICIib")
AspCoding.EnCode("ododCICIibhGibgHibgHgHibpcibgHgHYH9PoQ8OSrhsTRuPpr6oDpWQaoDVAPUWwVYpGPlI2H8oBVCqSQtQos4bjH4bgrSQMrgQhcWddgAfAfzeyg4gZiDfxhyiahqCYCafEh4ixc8GxdGhYc3fnhvCaiahzH1ICICIibgHhGgHpchGhGCICICICIpchGodibgHCIpcgHCIibpcYH6VGQBO7qSOlsSVCQeRUpdQ89yHrRBVE9YqPPAqKs69crTsRRaWpsD9HsEVoHVchchbpC2eifyC4bFc5cfi8iAfjgxh")
AspCoding.EnCode("5fXgEgxhyixish3fjg8f3CwbAbnGVbhbYCvimhEiEg0gAiFCaf5cTH5cIf7hlekhai3h4eFhvfyijeuf4eafEh3CmGkGmHhchb3faf4iFCEg0gvfxi5iyi5cFc4bfi8iAfkhxhmCZilixhjfxirg3fwCAiYfyd8cnGoHVcoiNhFhUf6gmh1GHg1Gch8iAfviaini4e8eygjfzgrgXgkhlC3CvIkIvbpGhbRfmh5f1ffhyiAhzf6f2HBG2HeC8iDCjgweni4eDfvfkezgte5hjg8fZevI7HnGWIhbRfYfmCNh")
AspCoding.EnCode("hfzhEizfMijf8i3Czg2HTH1Gdg6g8iafxhni5hACzCjfahRiZizelCmhxc6HvbgdVcahjf0gbgxgmh5fye2HFc1Gbe6g6gjgygni4eACxhjfzgRi3fjgEh4inH6ImHgdhbtC3C4g1fegjf7fwi2HHg3IFi7hzexhACxcui3C4gNhdCyiFCkg6fmcYcbWZdnGoHWdWhMiWixi5i2HHg4b6f6gjgxhlixcWh1fpgkfnd2bbW3GvbVbWdhchbaiYg3IaiyC6fli7fxcaf3h4elh4iwb7emh7f6iZe7f2eFflbxd")
AspCoding.EnCode("xGze5fZilhYfnHxixC0gbgwf4inikiycycGh6c5cDfyhmhyChcVcVbCHpcXIifXC5cqf3CDiDeYfFiliybfhjflgjhTGTI3G2b5csfzi4ixi1GqeEgjf6gpgzgwh3CmCEgygzhjewbqfmhlf8fmhFiFhaHhfjf6ezfxdhcWdWIiGpcZGifnf1GPgZe6hFgYf7eEgaHQeFgmh7fUftCFh7fxhximfEcHfYcZd3IsfwfZezg3IuiDfzh8iohyCkCYf3hliaikeyCwbtiYf6hlC4ilhDfxIqgFgmh7fSeRfli6e")
AspCoding.EnCode("wezgZgwIWIVcpGWdibYHpg5i2HPgmhDi8fng6fACybgCxCagxfygYf6fEcHf1I1I5cuhvemhyC5cuiACag7hVCxikCng5fliaizhyCmGqf3C6hAi4iFiliaHbgzhjfwgygmhFiycVbCHngkf4C4bxhmeVbhbgdVcfhAizg4glizCjfxi2Hoi1fchzemhEiFhmG5haf4i6eDf2evfahXCkenGoHVcibffvfwiXdAgEg7fhcVcpcFiliAh5cFc2H2bHhZd3cYcPh5fEiygAfAC5cWfYCxine8fZiXimhGhpfXg")
AspCoding.EnCode("Dh4eQgXeAhaiAfliYc3c3GGe1IoHgICIQgmhwC3C4gEg4bde5h6fmh2HOfNhliThAfYfoHiGgHodhiYCAgZe5ckGoHCHhGCIhGlhEg7f1GHg2H7eEgAh2HZHXd2bEfxhxiZfyiEfvcxC6gYfkfZelgHgxi8fkhviEbXd6Cvfah3iyiFewd3hvijflh3CxcvbUH1IWIgIibgHde3fFiZe1GjIWIgICIpchGECFh7f3IFc2HAgFhEi2H5I2HZd5hwC3ClgDfvIYH4H3c3fjgngEiFh2exhyC5iyi4d1IphACli")
AspCoding.EnCode("DCEIzHwcqi8h6CzGtfGOYhkivcnixi0fzg2hkfIgBgFbgivi5h5fwg9flCFh5bnGEb8hzCxinhyiDgxIyiDCYfxiYfEiTHahDekhviEb1G8hvfxiYejfFeaH3hwCke7eYfxcvbUH4HhcWdCICIcfZiFi4i5cDcVbVcpcgHiblhACEi5cGh2HFiEg7fXd3c2HZdvike5fZilixhzhkfxIyh6engmeGh4c4H3cZiviZe6eEg1fFglgjgXbZd3dFI1IVbiGibgHIh3f6fmh5cDboHCHgHhGgHECliFC3IBG5c7e")
AspCoding.EnCode("Df7f1G5I1G2bXgafZelgDfmGXI2bZH3fwCmh7fFhMivfxinfyi4d1IYHmHSGjgagni3fFhaizhyCwdwfAh4i5iBG3d2b3c3fkh3CEiFh1fFglgjgXb4HZGUHYcpGiGCIngzgmg5cqe3CkhYf4glioHgIibFiDflg2HEd4bECAClg2H5I2H4HEc4H5I1IwcPhXeAhzC8iliZd5I2bSdYcgdgIgHEi4ilhDCkekfECmhvc7iEiaiDfng4b2HAgEgAhhcVcghkfmg2HdCEhahXeFhxhxCxi4bhcgIWIVcdC8fxi")
AspCoding.EnCode("5flivfzhje4bZikh8ewb6fli6emHpGCHibod6eZe6f8izhkf6f4iwdDglgvfli4i5cYcEc2b3cYcRf3hAhzC8ili4bWfZizgmflCZimf3CFcoe3f6iZiPh3h7fyg7h8e1IYG2bUc3fvi4iEi8emGXI4H3I5I3IlhACFC3I5I4b3G5bmHEbBH4HXbYcxbRf5f7fweAfACYc4d1IGeYcpGCHefjemg1GfhFgkfXeEgvfkezg4boHCHgdhbhfEhxi5flivfyiyC3IRfDfke6gpgxiyfmhniFhzCxCkfwb6iZize")
AspCoding.EnCode("lCmhFimHVbWdpcfhjflg3Ihg5h5fve2Hoi2ehengEg3Ipgxi1G7C5hafFg4i6fWIhbpcgHpgnfXdDhYCwCFgYfAg2HTH5cqfng7gAimh7eFhwdciyiFCkg4bQCzi3CzgoHVcpcibodCenfXdPh4iniMicijflgjh1fag6gmhxi5cGh2HAI2HQCyhmhje4bVbWdpcibpcCIQg4imC8fEivfliUfNhgeAhyijhmGDh3fviDeYf7emHVbWdhGhGgHbikh6fYfhcWdCICIgHpcui4ivi4i3hliMidf5hnhgCziZi")
AspCoding.EnCode("AhnH6iXgaflC4i6fxdhciGgHpcpcghahZf3Iohme3IpGhbpcgHbiviFiZepGgIgHCICIQgmhwC3C4gEgNhce5hZfIhwf3fAhxcDh3faf8fZe6fxdhcWdCIhGbijeZf2HCeYgpGhbCIOfZeTgDfpGgIghkfZfXdfh8fahniDfaijfxiXdWICHoHiGegFgxi5fFhaizhyCXdRfmhvi4iXeACNhgi3fnhgCzi5h7fvI8gXgkh8fZe6fycpGiGCIegaglg5c9eLCMhwfHg6c2Htgzh5crf3gjflCah4CydVg1fpg")
AspCoding.EnCode("kfnfycoHgICIpcohme4bVCxiFiAClgwbCChiYCAgYfxc6i5hwCDeYfECwboiMidi4iDfwIvbyHVg0gohxi5iwbOf0gKfaCvbvbTGBbAbXdPiyh4izgWIVcodgHpcOfMiIfkhZeAhliwb4ekhYfEi8e1fwekfZhxCnGpGCHpcibgHqf4iEC6gagkfFi4ivcbixinhhcVcgHibghyC3i5cohnfhcgIgHpC4iSfAChciGefxi3i4bfh8fzg3h8eygkeahhcCHhcVcciDeje4gDfygagzg4btC3C4gFgAhweFhUf")
AspCoding.EnCode("Nhhf7fzhwiwbFf3fafDeYfECycgdgIhGcike7f2H9e0gweGhlI2Hreag2HseIgzh8fkf4CwbRfmhni1fcijfEivCwIoHCHhGCIlg4i6f7hyiahEC3CaH8hEiai8e3C4boi1feh3CliVbCHCICIpgZh2HCekfFi8e6evI9gbgXgFiZeydWh1ffg4iDfwIabuiYf4g1fdCzhFCvCvIOf0gvfmHycTH3IlI5cuhvemhyC5cui3CjgmhmCliLCIg3f3ihiyhYC6enH7C5hviAi4iFimHWIhbgHVgngBhlihchbef")
AspCoding.EnCode("zgZfXdfhEhje3hFhzCyiah5cWIgI2cSdoHVcoHVcBHYbpGhb3ixhae4b5fyijekfpGCHnhzCae1G5fyiahkf6fliFCWIgIZfaiwi5c3imiVbVc3iXfGh2bwdvcwchh3fliXgXfYCFiYfvdZc5GXH2c1cmhFhDH8IDbnelgZe8hli7f4iliEiZeFeDg7H6I8I8IlbAd8d8IBgYhye3hkf6hUfEfShXimhmfYfEfnelHwdwi4C3g3G5cZGOQcucPXRdPZqPRCQIPcJqQHPJReqoHCHxCah2HmhEi7fyi7f5cFC")
AspCoding.EnCode("ng6f8faeng3IxiYfBhliVbWdmCjfahxiFi8eFCGhYcffbhrCFc2bvHAgnglgDhYf6eaHwi4ele6gXgEgxgxc3GZdXbZf3g3c4H1Ivbac4HFIff3CZhYClCjgDfggvf7fFcUHggPgWishfeQhEdb9CizC4gAhxCFixCYgDf5cfi3hmCZe6fEC4bIiEiai6iYflg4bnHmIxIjh3imivbGpFI4HgdhblhZeFh4bmCyiahxiHgAg4iFCFf4i7fvc5fAhZe5hlimhke4hyf4iXeDfmG4HchbCOeeedfvcIh9fOfoi")
AspCoding.EnCode("ICbgtgifpioiYcychchbai5i2HmhAhFC5cliyhYfxiWICH3CEi7fwdnizeYfZiEiVbhbYfjglhZeWIiG3hyikfxivcyileZezg2H4gagzgahECAClgWIhbZeahZf4bvfnfVbVcAhYf6fAfkekfEC4iwd4gkeyiyevfYf7evI3GbhAgRfyeygkf7e1IvbTH4HDdAbjH2bhcCHFi8fmiXdbgafjf7engbgyikfahxcvbgdWdgH3hyixijewd3hvijflh3ChchbgHAgngEg4b5fkekfxiBGjeagEgxgygxinegd")
AspCoding.EnCode("hbYfzg3i2HAgEhmioHgI5HSdVbWdgdgIBHZIoHCHhijfzgAgli4b9emh6CFiCiYCTgqh3CEisCXgmf4iMihh3Cme3flCkhliFc8c6c2H3I4b2H3I3I4b5c4cuqhQPRiQosIqsqDo8WaqWsxrWqHLWIgIhixCkfFiDf5cVf5hUeqh4iAhPe5hmf4i2effZenf5hlCze8eTH7cjb2H2H5cXd3I3I2H5c4cU9eLgrEWprHruQ6WPqssRrGrWqcuhcgIcfxCxi6fAC5cWe3fG9rimhAhQfXgYhZe0gqemhZi7fni")
AspCoding.EnCode("ziFckGjG3I2H3I3I3I4bXdXdXI6VHKoPEW9Qtq9QTQsqS9eqcQuQ8pqPKQqsGrqsfJpGVcdejfkf7eEg1G9hXgSfceygmfdejg5h6f6fpCEhzfqh4i7fiivfxi3CHgjHkH1G3I3I5c2H4b5c4b3doscQuqJrOrJPqsbqU9buCq8O698qfQmRVRfJVbCHdejfxi7e8e3IOgXgTguiaeYCkhafbgvi3fAglhoi8fkgQf3CAhCCzCzgYfHgjHkH5c2H3I3I5c4b1G4b3dprHrKstRPqssRrHs6VbugrD9uqmOeP")
AspCoding.EnCode("ZQqseKhcVchiyikfAgFh2HOgXgBhri4iAhQfXgmf3CNhhhke8hahACFclb6c3I3I5cXd2H5c2H5cYHPqgPMq3rKqrPuqCQprdPuQDoRQMqqscP9PcuhchbcfjfxiECEg3IRfziyi7iuiwi5hvivicfkh5hECFiPiThAf4i0gff3C5i3flCvi8eTHYcCimhah8f1I4b1G3I1G4b5c2H5c4cRrMPtP7VEpoRKRsRhqbsfsbRQRMq9PbqrQIKOQIQVbVcIhjfkf6f8e2HtCzixCDgqewi4eafafdejg4elhAgsf")
AspCoding.EnCode("Se6gYf2eQgmh3f7fmCyhTH2bPi7f4iYfYcXd3I2H2H1G3I3I5cYHQqerLqpsRsrQVqFrLrDo6OpqurtQhqbserIqRQLRVRIRtqGu9PIQhciGdeagzgAgEg5cqeaCzhEfQgwi3fjgkhhiafXg6fECuhGODCng1fdg7fDfai5fjgngFc2brezhDCYc5cXd3I4bXd5cXd3IYH9rerLqpsiP2QQs5qLrS979erLQsRhqBpoRbRPqrrRrbqrQbJOQTOVbhbdezhahECli4buixgag7itCzfZiafvicfkh4elhFiuh")
AspCoding.EnCode("Se7hYfMiOeDfveYfAhEd3GWeYfxiEh4H2H5cXd3I3I2H5c5c4cgrYrVqfLLr8peqwq6OerurrqfQIroRcQ9srrOQHsKrHtOQB9hchbIhjfzglh8e3IqeyhyiEfhiyixi8eZezgDfIgBgRg5h5C3CHg1ILhZelh4H4b2H2H4b5c4b2H2HYH8obuhsD9fsNRVP0r9PoQUpDPFVLPsq7VRQJPVRdQpGgIIhjfkfECFh2H9hZiSfriYfEisCXgmfYf2ebgagxiDfmhxiFhEdDdkHAb6c6cjGXd4b5c2H4bXd5c4b")
AspCoding.EnCode("YHfRbRrR6WRQJPOQGrEoFPLRcRKRJRD9btqseKoHgIhijfzglhli2HQgwfxC8huClCzgsfygzfYfFc4HMgngFi2b1G4bXd5c5cXd3I4b3dRrgsFV8QOrrrWqHstP8poswqtr69JrJrOQDVdqwQWIgIIhyixilhDf3IefyC5h4hzemhchFClixhnijgnghiaCYfnixfFc4HLhZelhYc4b1G4b2H5c1G2H1GYHWqgsSoDPpQ8rrqgQDpeLhsFVOREQcrqrbrY9erXqhcVccfzhahECli5cghkfZi3gaf3Ciivf")
AspCoding.EnCode("yCkiReYfXiFc2bLhYfAg2b1G3I1G4b5c2H5c5c4c9PpPFV8QbRxVFVoqLsJsCRkRgqEocqtQ9qkQoQzqhchbcfjfkf7eDfXdrixC6gbexijejf8fje4gZeGh1IJfZeAg4H1G3I4b2H2HXd4b2H5bRroQD98Q79zO7VBQTpaoGRvR697pIq5rVbWdgCjfahFili1GWCxhli6fVhXCVizhDfHgDIlIAb2H1G2H5c1G1G3I3IXI9RPrhPesQqCQMRorEpZRTWFrOQfJoHWdIhxCyCAgDf3IVf3faiafWg3gjimh")
AspCoding.EnCode("XeFhEdYc9ivCXgxhwCYcXd3I2H5c5c4bXd1GYHLsWqT9ILD9v99QqRJqzQcRcJVbVchchbcfagkfECFh4bfeah5hnCvimhQi6gjgyiYCZfri7fyiZfEhXeFhrixhXeGh4H0iZe6f3G2H4bXd1G1G2H5c4bYHOQhr8OFRbRapD9frU9eLgrEWWrT9pQAW9q9s69A9VbCHhiagkfECli2HbC4izerf8ivizh5hZfRgAhkemgDe3hliQfainiFc3G9eag4H3I3I3I4bXdXd3I3I5btPyWLQMqSplp9qGr6WcuqQ")
AspCoding.EnCode("XQuPgQ6OerSOGJoPD9QPbQpQjoORqPSWyVqQiPcRfupPaR9qaQqQAO2bJfmhFi4HhcCHhixCzg6fDf1GQgXg6iYfth8iqhFCxCZfEhniliPezC3hri3fFhaCFc2brf6gjgag5hZfPe7fyiYeDe4gEgRgygni3GXd4b2H3I5c2H3I4b4cFpvRUpes9q9s7OyVDpGJpQUpWrbQiRlV79pqiPIqpsT9hcWdbgzhyCFiAC3Irf8iriAhxCYe8fmCFhriainiPiUf6gmhTH1I6gahXiUiYhvfYgHpkC7hYhGo4hjh")