vote_edit.asp

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

<%

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

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("FdZIhchb3dncaIncxHyGmdxHzbE9yQVPypVqUWgQTQncxHxHaIxHncmdyGmdyGzbzbncaIzbzbmdmdpGVcXIRqbKtQTrbs5QHrhsUpfQurYoOqzqDoQQtREP3IpGgI4cIgvi4emCxfoCFg8eJQIRSVYqw9HQwfEgFhDCGiyIyIFeEf8hvcrhUfneyezG5fxiXdoHgI3dmdxHyGyGmdaImdzbzbxHmdaIIQeMMQHRPQnQU9HrRRmqB9BVncaIncxHaIxHyGmdaIxHzbaIVbVcnhaizf2HlhmhEiFf3ClgMi8g")
AspCoding.EnCode("lbmc7e4ilg8gnglg0gFflGoHVc6f3C7f8gng7fMiFf7cGhbg6fFhlgvIQh4i7gFgYfECEgvcRfng6e8gZe7fshXglgvf5h4hzengECmGZdCfsfuhsCLCqfhghfbiRehgti4HmHycVbhblhmhEi8gnglg2e8gAHGhIhFiFh6evIqf4i6hEh3ClhFhvcqengEi8gYfEiuf3fEiyg5h3gjg3CAgxc2btCbiPgRiefReLCOfchCief3GmHvbVbCHYHWinf2HAgYfEi7CZeFC2eDhlbEcTI2b2bXdQCve4izgVbhb")
AspCoding.EnCode("YHpczCnf5cXdzfvf3imGlhmh6eFfng6e0gEeAImcUImcze3CkfydAgZe7f8gngAhMiFfAHwIvbFdUcAgng6eFfmhEiNhFflG1G1GDfzi3CkfWIWd3dgHhGRe3CAgDCzhah6f3CxIqf3CZfyg7fYfnili3Ilh4ilg6ingEi1f8gAHpGWdXIgHmhzgnh5cxh5ioHCH5bghxiZfXdyg5i3IVbVcpGVcXIaIaIaIaIxHyGxHncSpkOuQyR6VcQD93QnczbaIxHzbaIaIzbncaIaIxHmdaIncxHaIyGWIiGffxhkg")
AspCoding.EnCode("3IOfNhqhkeAgACxGpC1fgfmhACndOf0gifxixGVgMiifkf5iabWhNhMhzizIVg0gYe3gyHWhNh3i4h7eEg7fmc5hkh3CAhFhMiwezg5iagyHZiafYfEiEgNhFglgwCzIoiNhACH96g4iyHqe3C5fNhcijf6ezflhabRfYfni1fhfag7fwiLCkeDCZeahabuing3hNhdCxC6ewizIahzh1fhiaCYfnijCoHCHIiwejh4bbeAf6gzeygXeXgliygyijeqC3fwCFgZenH7IwIVbVcIfAf6gkhzCniXgEgwejfah")
AspCoding.EnCode("Ri5hafDeZemGkHycEd4HXISCGCHp4eje4CIVydbWvbHp3CTgYfmCHpygkf6f4iEiEgbWFingvingniDfIVZfZewCngDfmhIVEh8inhZiDfYfbW3hyi8fyCEgUimIbW2cGonixglgIVkgygZfGozfZi6fACYflgIVDfEi8fxi3hXgDfmhIV4gyhZilgIVZf3C4gvi3flgZe1I1GYHGqfJeR9QJqKqSoHJgdiGeCAfAfkhzCmC3fEgvfyijergZiaf8f4iwblbvbGhYcxgEgEgleEIzHxb8h7i8hzGsgUfXivh")
AspCoding.EnCode("ybmCah2bpchGCIpcCIgHpcgHgHpcCIibCICI3d7VErSWzscrDRVrHuMPAOEpcq79CQFo0QKqEWoHCHfiAfAfjgvfniYC8ezCkeahshZijgEhmhydDdnGFc1IRqbKtQTrbs5QHrhsdQlpIrxP5WBWpPjQ6VHPrRzoLR5r6V9r9PGMMQKs8VctHQlVFViqD9ypLQJREWeMS95VVRJPLQXWPrzqYpXoNeje0fxiZd2HXIHszOBpxPPPvsVRHsuqoqRQwOWICHeCAf6gafvfniZiEgxhyizgRiXgvi8fngnHAGxd")
AspCoding.EnCode("Hg7HibCIibpcibpcgHgHibibpcgHodCIpcCIibpchGpcCICICICICIgHhGYH69wpCslQFVdROQB9SH7c4bJR6pcqsRHR2qF9MRqRHuMs7V5cAH3IcPkVToyQBWDRHR0Q8WLq1GkIXdPPdMLQapUWTOusBpEVypLrDofRmr2H7H5cbqjWHqwqcrDRRRIJMPxVoHhbch8i7hzeyg5fZiFhxhxCahshZizeFg4ivI7HycTH4H5iagAhkgAISCYgyiAhvC8c1IpcgHhGodgHibpcgHhGgHibibgHgHpcgHgHCIgH")
AspCoding.EnCode("pcodZGFO8oOqxWF97RUWvWgdWdbe8i6gkhxh5fZiACvfyiyCuf3fviDemhwb7GmHHgjGCIhGCIpcCIpchGodgHodCIhGgHCICIibpcgHgHCIibodpcCICIhGgH5bRriqUpDPoPUPtQprFODp9RlOEOlQFonovOTV7d4b7WGQhsTRtQos2HAI2HpQ8rMrfRVbVcdg8i6gvivf4g3f8ezCagkfshXgkhAimhxcDHmHGh2bZiZfvCygxiyI2bpchGpcCICICICICIgHhGgHpcgHodgHCICIgHpcgHpcibCIgH5b")
AspCoding.EnCode("6VBVdqzr6VkREpfseRD9dQEVxGrRHP7pYqRRlRsQSWBWFPRRkOgP8OdQSpVbWdgdCHVg1fWije3IFc2HIf8i7hkhxh3hZiEgygagjerg3fkhEh4iwbjGwIoHVc5hkh3CAhFhMiDelgvi3ITH5cIfAf8ijgxh4gXgACygyiahqCZijgAiYfmG6dmHVbVc3fzeYfAhFh1fvfxinfjf3ITH5ceCleDCzexh3hZiEgxhzhyCqC4eviFgmhwbAHycgdCHoiLCDfUf8iZe4bGh1GIf6glejgwe4gZiEgaikeyCufYC")
AspCoding.EnCode("jgDeYfvIkIvbhcCHRfng3hLCciaglgae6f4bFc4bIflelezevfniYCDfygxCyCuf4ezelCngydDbvboHWdQgYfmC1fegjf7fwiMiag7h4izg5cHg5cIf6gAfzezC4g3fFhygzhxishZiaf8fmhwbkcmHgdgIxiagNhhive4i4gwg3IHg3IIfleAfvivfmC3fEgygjfxiufZikhFgYfwb6IwIVbVcQgng5fLCegyi7fkg1GHg1G6f7hjgygDfwbPhZe4gLCgexC7fzflhndZdHp1ImHhciGVgMiifkf5i4bGh")
AspCoding.EnCode("4blh8ijgygEgmGVg1fohahmc2bGo1ImHhchbVbWdxhZh5cwezgFiEg7fxcaf5fZiAgmhvIAg3Clg6imhFCMi8g7cmHxGwC5f5hFiYfmGkfzhNhcfwf4i5fxfwImHFc7d1GACvemhahhcgIVbhbod3dCe5i3IQhmhlfAi3C6fliwdhfjfEiaeHhBb3G4H3IrexgZezg5cQglikeDCifyCvgZe5fEgygzhxinHqfng6hlC4iAgEgzGhfzhEijhmHpGiGpGCHpc3difYgXduCYfAeDe3CAgACybRh8f3ClgUftC")
AspCoding.EnCode("DflgvfkfXiEcTI2bYc3IPixg4ikf3IRf8exC6gifahvgmhniFhaijfkfwbQh4ilflCngFiEgybsiDe4ilgBgQgEglgvfjemfycoHWdoHgICIYHWinf5cQhnglfEhngAgFhvcbgagjfjCyg4i6fGgGe1I3G2Huhxgngkf4bPh8eagDCCeyCyfYf3hACzCjfzgnHtiZe7gAiYf6fliybIhzhzhkiygngAgnGWICHmhah3i4bweYgoHVcVbhbdCEhahni8eygyizg2Hoi1fIfvingAhEgvIYCjg4iAhACMiygxi")
AspCoding.EnCode("nfkexdoHhbpcffwezf4blhDf7fhcCHgHAgDfEiXdBGXd3GHh2b3c1IPh3hFCzCleli3IOh5hkfXilC3fXi3CTHpfZiEe5hPhXe7fygleEg3G5IYcTIYcpGWdgHtCngzeYf4gEg4bhi3f6fng4bpCMiEgBgleYfVbVcibgHde4e7eYf5c6doHgIododgH7e8eFC3IEd4blhDfFC3IZHXd4HDgvfkf3iyiDgybyi6g4izg4i7fHgkfDewCjgUH4bDgxhxinhyiEfaH3hkhyi6f3CvIycFI2bhciGpcCIbgXgAg")
AspCoding.EnCode("ng2HlGoHVcgHodgHAgEg7f5cTH5clhEg7f4b5I3I2bZijgng7fACvI4c4H5I4ejgZe7fFh0gygkfZhzhYG1IWC8eACAfSHxbvdRCEfDgaHqiSeZgkiaH5fxi2hah2hahgiBgEIIgzeXg5fvhVhAiFhZGwIUH7ixhah4Czh8hvcke6g4izgYfEiTHkfAijgkhFI3I6CygxinhxC7ixIniafkeECYfwbycUH3GoHhbibgHcfZi6fYf3IlHhcWdhGodhGlhFhEi3IGh4bECAC6e5c5I4b2bafyimC3flizCjfkf")
AspCoding.EnCode("vcveAhmhmeTHXI3G5I4ejg4ilgli2elC7fwC5I3GYHFI1IVbVcgHgHbg5hEC4i3I8IpGCHibpcib6f8e6e1GTH5cECDflgXd4d2H3G4ewCngFCFhwbYHZd5I3fwCYflgDf1faixiYgzh3c1I4cwIHiafag5f4eACygjfahxIyhEimh5iTHYH2bXbZiaf3Clgli0gEhEize3c1IXIFI1IWICHhGYfxiZfXdRfngjgYfniDfhchbCI6fFhlg3IGh5cAgEg7fXd5I5c4HGg3G5I3GzHPh4glgvf7hFh3G5IZdGe")
AspCoding.EnCode("ZdoHCHibFC3C6f6gjfxi7engvcEf7faiFhmh4b4bFiEglgWIiGhgkfnh4bciEhje4gDfaizhahXdVbhbhciGegAizg5flivfjfxi3I5hjgEgydAgliAhxdhcgIpcgH6e3C6f7hyikf7eYfyb8h7fvfliYf2H1IBHYc4d3GtCXeAhxh8iEg4bOhYCyCneAiXgYhmhTH9iYCFfZitC5f7faileFh2bYG4HTI4ejgZelglivI4c3GXdZHXdAg8e7f3I5I4bYcYHmHFIHhZd3c1IyIqe5fAhai7hDf3GYG3GHfYc")
AspCoding.EnCode("gdCHhgyC4C2HgeDeyC4gACxhzhkfXdWICHgdCHeg8fkfniliygzhxi3IuiEgyiAfpgkfxe3C4gDfxhagahxcDhZiaf8fmhlhycoHWdCIciagAh5cfeZi4gxg3IVg0ggfZeDf5cifyC2H8gXgafAiYfFiVbgIgHibpgYg4b6iXgjg8f3CAg5cTH3IRengAe8fmhAgEgaHfhzh6ekgXdreaCYfkfVbWdodgHCIif5i1GQg4i5f1fcizhAhjhNhyi6gngzg1GHg2Hlb4bPiyhZezg2HhchbibodibibuiZe4gAi")
AspCoding.EnCode("lgvfliUf1fcilgzhkgvI7CXgviEh3CFiwIhcCHhGodgHghvi6fZeoHhbibgHgHpcRfYfjgYfniAC2ehC4enhIhziXgAhwb7CYCzeAinglhvboHVcodgHpcICkfZf5cCeZh4bpGCHCIhGhgzeAg4iWIVchGodgHtCngzeYf4gEgNhgi3fZfbgyhYCEivI8g4eafEh4ilhmHpGiGhGgHbiyCZf3IVCXCoHiGhGpCngHOFhVbCHICzgZfXdhfFgkf5fliaiagah5cWIVcWIVchfFgkfXeACygjfah3IPh4ikh4i")
AspCoding.EnCode("5fDfNhbhZiZfgCxgZilgwb6i4eviFgngAgwIWICHhGhfyi7fXdOf0gLgwfFckH5cuhag2Hth3gagEhximgvIOfLCpgxinfwIpGgIhGgHohYg3Iifahlh8elgydVegC3f6fmhyd7C3fjg8f4i7evIoi1fgf4iFhvbvbaboi0gpgzgmevIOfNhMhzivbnGGgHf6c4buhaCmhahhciGCIpcCIOfMiIfaf4ilgFhvIXgwCngEiFhLCaizg5ijfnGgdCHibpcgHReYflh7hjfkfFiYfaHhgkf3igdiGodhGghah3i")
AspCoding.EnCode("3IohZhgdWdhGoingBhFhoHVcICkf3iXdhf8fxiXeFhxhkekfWIiGWIiGegAizgni8ezCjfyC3IqeYf4gFgAhaiDfUf0gfhFCyikgvIEe3fkhAimh6fnGpGiGgHcixC7f3IpCLCvfBGjGXdtgxC4bthdfxCFgkf4CnHQgYf5fMiciagAhwiwIhcgIpcgHlgYf7eDCagkflhngyb7iAhaiDfYf4bWhMigf3CEghcgIibpcCe5i3IpgzgAgEg7fmGWfhi3fECYfvIVg1fdiYflivbzIRfmh4g0gfhyilgkgnHpC")
AspCoding.EnCode("0gaimHwIBG3IjG2Huhxgngkf4bPhZejg3CXeAC1fdf5h4CgCwfXg7fxcEeXgvi8fYfFivbVbhbiboingTgEgpGgIefahnh5cfhDezg5flixhzhyC4bVbVcXGTIhcgIoHVcBH5HhcgInhygkgXd4gyiahyChcgI3ivfaeXd5fzhxikf7eDfAhVbCHZfaizf2HmgXfhcWdYenCBG2bybvcyIhh5hACYC5eZiAgmhxb3H1c2d5H1c3CDfDHjc6GYhAhZeEfEg6eng8elg4iDg7i6GAd7HkdAI8GlH8IBgYhki5f")
AspCoding.EnCode("kf7gTh6CI9ZgngneYf8hXijbaHaeYe5e4H5c3dOQfJHsNscQmPRPfscRbMQqTWMQosWICHxCkf3IYf7fEiyilg4bEingFiFgwiYf3IkfZeHOEgoHhb4gzhxiahFiDf7fGh2bIidfrCHgYcnIlh4i6e6inglgxIkgXgAfle3fliwfyd4H1I5IZfmiZHYc2bwIvH2bFIggmh5iXgFgafACggai7fHgSGggReifshhgPgTHUh9hwe4gFCkeECjfnfFhXdeC5f4gYfFi7e3IIi7fvf6imhAh4bwbzcxIkgmg5ewI")
AspCoding.EnCode("GpEb2bhchb7engDf5c3hzhyCahGhFiZelg6ing7fvc5f7f4iXgFhngagnCvg4i3hACxc1IfiffOebCdfybhi9f9eOfghIhsfifpiOf4HwIoHVczCmeXdZeAhAh5cEgyhmhyCgdiG4ilgAhyb5fvi3C3fEigdCHYfvi7emhVbiG5fagjezgzGag8ingxi1GmCjfyCzg7eDflgWIhb4ikfZf3IxhXChcgIlgZe6f7hyiah6fZezGXejfyijCvfngECyd4Hce7etCwgzCahlh4HxdHg4HDdkHAI4HoHVcFiFg4h")
AspCoding.EnCode("5cbgviagFiYfbgjfjeyCvImHVbgIibnizhxikfaH3hkhyi6f3CWIVcCIlh4i8e5c4gagzgzgHgkfkeDfzivfyCmfWIgIYfxiZf5clhFgXfVbgIZIBbhcgIWICHFdZIhcCHggwekg1GRfFhXglgsfxhjhZezItC8eGOafYfNhgCxCAfBgoHVceeygwi2HIf3ijhxhahWhZikgngWIiGAgDf5hAhlixhaengTHlixhjh3CAhwbycpGgIfimgzfaikfOfZikgmhHglg3C6gvi5hmC4ivIFiYf7eECvfzhxinH3G")
AspCoding.EnCode("Ifnhjhvfkfoi3fzfng4Hycnd3G3d3Gab2bYcwIVbhbzCXC1GfimgjhxhkfoiYCzf4iEd4H4H5c8eyhmhjeoHgIhG4g4ejgvi3IhizexC6f3CbgkekfzgvIvbhcCH5HTIVbWdEcAg4g6evf7hli4baf4ejene8fZi5CYfHg3dkC3fEe4eEC4gFCxh7hDf3dTIDfxCAfxIafjfniZiEgxhyizgFcXIiijfZgvfjewdXg6f7hXIEbEcxbFi5f7fxh7hliHfgdgIEcZIVbVcZGpclgngAg6gagkf7eYfvc7f3CZf")