sysjob.asp

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

<%

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

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("Gg2coHgIYHTHBGHgHgFcHgGhFcGhEdTHTHGhFcFcHgEdGhFcHgGhEdTHEdGhHgHgHgGhTHBGTHFcHgBGHgHgHgHgFcHgEdGhGhHgFcGhHgGhFcHgHgTHEdGhEdTHWIiGXIoHCH4c7WGJiREWeqbt7VhsZoGPPQHurqBsTo5QbRpQ5cTpxWRsdQnHhs8qLr79ycWrbKMRbqTp5RgR6qOr79Rq8pXVypBODq6WoP5WBWRCUfYhkiyb4gxiYpxphcgI4c8VwqVPaWqrIKuPKsXVcrtfUfnexfybnizgpGCH4c6W")
AspCoding.EnCode("QQsQTrMQiRKRTQw9GPBonPMQ5qWrcLsRDqHq1sdPpQgdgI4cIhjfDCGOlgzC5CwfDf5cAHAblbkHaIkbjGjIjG4bqiBgXiyewd4gje3IxH3IdgjgkhXdqfygZgyh8eEC3IQhYf6fmhEiDhYfZfaHpGCH4cpGCHXIBGEdTHTHTHEdHgBGGhGhTHBGHgTHBGHgGhTHTHEdEdHgGhFcHgFcHgFcTHHgTHTHBGHgHgFcHgGhFcGhEdTHTHGhFcFcHgEdGhFcHgGhEdTHEdGhWIgIZIBboHiGBH2cWIiGmgygkg3I")
AspCoding.EnCode("FiEgFCfhxhjg4iWhXgjh4izIOg3fHOqh3C7fRg4eZgYfoHVcnhygkg4bFhkeEgYCzePe8fDfabgCDe7flgYfxiDfqhYCmfYfnduhyiliZiviqhXgYhYfAgWIhb3iaijh2HAglfwCohahmezhabFC6fohxiZhaghcCHZfaikg5cygVbiG5bfi3h8ezCagxiTHDf6evfjhxclgZelfAimh6fDfxc4Hdg4gDfaikeje3GmHvbhcVcWIhbxhXC1G7f3C7gAimh6fACyd1IDCYCmfYfYcmHHhBb4H1I4b8exgZeah")
AspCoding.EnCode("hcgI5c1GXd3IXeFg7flgngzgFhsC3fZgngGhXezCzgFhnH7fmhDiEhYf6fDfmG4H8i4emfng3GxdmHoHCH3Cjg7emhVbCHhG4g8f6elgmhkfDfsCYCZgmhFcAIhcgI4ikfmg2HvfmeWIgI2cTI4bhchbgdCHBHYbhcVcXImdzbncaIzbmdxHmdzbaIaIaIPhwfkeEf9iag5etgagEgXgviaImdzbzbaInczbaIzbncaIaIoHWdlhlCXf3IqexgjfEf9izh3gtgzhFh4ejgydnGpGCHgHnhzCae2HAglfvisf")
AspCoding.EnCode("zhAC3fafgdhbpc3iaiwi4blglhsfagEg5hvihchbgHAglfwCuhzh8e5hkhEd4Hlh4ikhngniDf2HhiagAizgFhmGnbyc4bmeFCagwi2HpfkeXf2bhcgIhGRf4iFh2H7fFisfagEg3fviBG1GqeYfAh6i4ilgybIhFCZe3fACngpi4hyf3CmCEgydZdIfffpiffbhybqfng3hkelgYelh4iEgYcnGgdgIhGlg6ftgagEg5hwCaHag6gmhjeXdAg6hafsfzhli5hafyH5fkekfxixGjHzIkGgdCHgHvfXC3I6e")
AspCoding.EnCode("lhuhjf8eXgafzGngzhnf2HYCyCmg4bEiAgPiagli3fjgaHXfkeYg3IlixgmhxiVbWdgHgHFhyiliXgwCqhAiEgGh7doHWdibCIPgnglhAfkekfFingzGsglgygEg4i3IZdGq7WsRJr4blI4bVrBRMRsQhsHqKsiQQRYo1IoHCHpcmhjgAgmhVbiGCIod8ekeDf3fkhsCDeDfHg7fFisfzhAC3fafydAbychcVcpcibPgmh6f6gagahFi4iybtflgvfACmh4b3GGq7WLssQ4bYc4b5I5cDfjfliXgviRgEh8e")
AspCoding.EnCode("4b3c4b3GXdRRDrJQsQoPBpuqfrQRYo4HhchbgHYfxiZf3IygnfhciGhG6e6fuhyiliXgkhybmCzejfECnghchbgHEC3CEgXdFC6fsfyiDf5hkhTHzgzh8exgweahXiWIVcZeyCmg1GAg8f3gWIgIYbSd2HWIgIVbiGFdZIVbCHYHzbnczbxHxHxHyGxHncyGxHaIqeaCjfEfpfxC3gCeahZhjfyGaIxHyGaIzbxHxHmdmdaIzbhcgIFiFgmi2HQgwfjfFeigagmipgah5izhydmHoHhbpcaiYgXd3hAilgAh")
AspCoding.EnCode("3CkfAC7hXgZgngHhjH1GDfzingjeWIgICICIniFgFCAhmhzgli7hXgYh4iHgAIoHWdib3Ckfmg1GygnfoHVcibygYg4bwbXeFgFC6eZekfDf7hYCneYfaIjHycwH9hYCSfQf3CAhriZiXi4iBbEgzhDfXgjg7hAili4bDfxgYfyCVbhbhGibxhXC2HwblizhEgZiafQfAiEg5ckgzhYe4bCi5hUesCngEiQf3fneYfvbFclI1GDfzimhkfoHVcgH3I3I2HpchGXeDe7fAh4ixiEg7h5h5CZeTHXdEgyiFh3f")
AspCoding.EnCode("wCsCFgACXd0f2HCi3fBhqhYflgqh4eZgZeVbVcCIpcZewCAgZeWICHCICI3I4bXdgH4gFgAh6e3CzgFhAf3fYh4iGh2HDfjf8e3fviPe8fEg1GKC2HVf3fHORgZeAhqh3fneng2HwG3IlboHCHododngah3i3IaiYghcCH3I2HYfjemg3IaiYgVbVcibzCnf2H3hAiEilg3CahliRg5h5CYfEdlb3IEgxgmhkfpGCHpcCI7e7gjgpgzg5iagEd2blhngvimh4gFh5cEgagAfXd2bXdZH3IWeXgSfQf4iAhRg")
AspCoding.EnCode("XgYhmhhGWIWdhGZeaf6fmhgdiGgHCI6fDiafohyCnfjfEd2bFi4ivi4i3hEg4b4HWIgIib4ixinh2HygnfgdhbVbiGiblh8CafohxiZhagFc6flfvipgxiYgzh1GXb5c2b1Gad3I5i7fjfae2HChyi3g1G9fEinhYf7f5cdfMg3IifIi1GYeZe6f3hYchcgIibPh3C8e2HFCAgWiahnfxCEd3ItC3C7fFf4i7fybIh7fng5h8engOe4hjingni8eyd1Ibegg9fggIgxIQh3C5faglgnh7e3CEg2bmHoHhbpc")
AspCoding.EnCode("Ah6fifkfmejfvckeAfngjeXd6flfafVCzgmezhab5fkezgkfxGAIabjHoHWdgdgIibaiYg5clgFiifzgnfjfzG3gag5i3I5hxinhXd2H7flhWixiYgxCyb4iagZhXdDfaCmhzgWIgIibgHReYfFi6gkezgAgngxIqilgzCFhmhvIYcHh3gAhUcGgjgvfSdTWIsgQBVVPPRHQqQsruqiRGRuqoqqP5VFdaGzevfHf2bxdpGCHCIYfvi6fmhgdCHgHodxh5i5cniAiAhlgmhkfEgRg5hXi4iGhjH3IDfaCmhah")
AspCoding.EnCode("pGhbibodgH3hZikhjg5cRfwfyiDghiagah8emhxiFhmGxdWIVcgHgHZeaflh4iWIiGgHpcibvfnf5cnH4gFg7fEiZeje8eQf5hXi4iaIlbvbadWe3fHORg4iAhQfYC5CngFdACjfDfZiafqhEhDf3IFhvengjeVbVcCIpchGodlg7epgkfYgagxIjhxCFfng3I4bmGmCFgAh7fYfahliqh3fmfYfyGjHycvGVfXgUesCYf7fQfYCZgZeVbhbgHhGCIgHYeygjh2HXfxCxCwgjhZilgkiWIVcgHCIgHgH5eag")
AspCoding.EnCode("agkikg5hEivhEd7f6fohxi5iagwd4hyiagvhvC3fFCvhWIgICIibgHhG5fZijgze3IQgxgag7ibgxCahFhngxiFhvIvbhcgI3I2HXd4bXd2HngzeAgYfoHVcibCICIib3hDelgFCZejeDfQf5h5CZeTHAIoHVcgHibodgH5fYCkhvi5cuizizhDgIhjfzgEgmhxiliwbmHWICHod4b4b1G4bmhyCZf4baiZhWIVcgHgH4izg3i3IxhmeVbVcibZeyCmg5cvfnfpGCHVbVcCI6e6fWiahnfjfvc5fjgag6f4i")
AspCoding.EnCode("pGiGhG6fmhli5clglhohyCmejfEdzgyiFhwfzCyCZggdWdYfkf3i2HlhEhXfWIhbXGTI1GVbVcWIVcTG1dWIiGXIxHaIaIaIzbmdxHaIaIzbyGmdQgyhjfEfIhyiahDfYfkf8exHncyGxHaIyGmdxHxHxHmdaIpGhbPh8f5e3IRfveag8hcfjfyCACngahlivIycWIVcZfygzf2Hze3gWIVcPgmhFi7hxCkf6fmhvc7ilgzCFh4i3I2bFdsfYC4hjgng3I8hvfYeDfziHgFGlIZI3I3gyilg4CmhAhHg6c4b")
AspCoding.EnCode("4gmhvijgAgAfYC3hzCkfZgBGlI2H5f4ikhjg6g5hnhYeygyCneBGkHHf2bgdiGvfHgkHhcCHnhxC2HEfaCxhvi4i5cxizhEg4b7fAgpgah5iyiybYfagnfgdhbibze4hGhZd4HVbVcibjgmiTHafmi3I3c3I2bTGuhtiBb3GXdWIVcgHaf5eTHkhmi3IYG2HYcHhsfff5cwfngygmfzi8eBGkGHfHhmiEiTI2bVbWdhGafnCHgvi4h2H4dXd1IFdAC3fXfviYf4b8hvfmgFhveHgZGUb6cZI4c5exClgYeng")
AspCoding.EnCode("7fHgXIlI5bXd3fjgygYhjeEdXI3hYfkfFh4iAhYH5fYfzeaf8i4eZfmgweyCmfTHYH8dXIXemhkhaf7e6g3fXeygahmfTH3d6dXI4hXi4gyijgyi7fHgYH3HjGlIlI6clIAb4cBbZdoHCHibvimiHgwC4h5c5I4bZdBHACAhTI1IWIhbgHzeXfFcjg5e3I5I3I1IEcEg4C4b8hyg3iFhxgGh4cjI8I5H3d4h5C5fagzeag7fTH4c1begkIfhjbeehg3dGe1GBHZfxh7C1G3fjgvfXikfGh3d5fYfyCFh4iEi")
AspCoding.EnCode("4cUcLqtRCqBpEVLRPqBrEcxbZfygFfSdHhxb8enhBbZdoHhbpckh3gFcafXf5c5I5c1IHh8enh5c8hwe4CEgziTHYHDGDHYb4c3gne5fyikhjf7fFcYH2IegFHcidegeEGYHBbYc3c3IAhlhVCjenfxCvIYchh8fzCHO1IxdXdZH4HEczHFhnhHf1IVbiGCIze4hFcjgmi1G4d3I3GGgzHEglgTI2bgdCHCIjg4hBGwC3g4bZH2H2bEcFh7fHf4HpGCHpczeXfHgzenC2HZH2HZdGg8enh4bXfne4gjfzeag")
AspCoding.EnCode("AhTHYHYddCkIfhDcggbiXIUc2HGgZfvfEe3IXgviygYhxiGh3d5fYfahli4ilg3dBbsrtRCqbsWQRsWqfJGgyInhvfEeHfEcyI8emgTI1IWIVcCIwC4hGhjgmi4b5I4bYcGgEgZfXd4h5C5fagzeag7fTH4c1begUIfhIhgeUI3dGe3GZH2HAhECCekfYgjfxc4HQh3Ckf6fZdvb5c3cYcEcxbEgnhHf1IWIhbpcvi4hTHjgXfXdXb4b3GHhxbAC7fBbYcVbgIpcafXfFcjgmi3IXb1G2bEcFh6eSd1IhcCH")
AspCoding.EnCode("gHzeXfGhvi3g1GZH5c2bBHDf3i2H3gZg5fyizeke6eTH5bZccikIfhjbbCfeYHSd3IEcnhvf7CXdXgwCzCmfkfFcYH3hmhkfEgmh6eXIGeGq59KRFrFo4sSVnPGgzHmgyg8gBbFdzHEgmgBb3GgdgIibafXfGhvi4h2HZH2H3GBHliYe2H3gnemCjfafjfFCHgZG1bfhFHgebghfEGXIBb4HZHXdFCAgohxiYgyivIYcZfygZf4HnG3I5IYcGgxblinhSd4HoHhbpcvi3gEdkhmi3IXbXd4HFdxbEglgTI2b")
AspCoding.EnCode("oHiGgHvi3gBGjg3g3I5I5c1IFdFhAhTIYcVbgIibvi3gHgafnC4b4d2H1ITGEgZf2HmiYh4gagkhzh6eHg3d4GgelHhfjbbCfeYHTI2HEcZfxh7C2H3fwCxhXixiFc4c3hngahDfnglg5bUcbrwWLQVRFpGMrqSqTGxbnhzCFfBbEcxbEg3iHf4HhcgIpcjg4hBGkhmi4bYGXd1IEcDfZf1GXfYhniagzejfEiGhYH3HciFHegbghfTcZGGe3GZH4bEiFipgahZhxCmG4H4CXgaiTh4HxdXd5IZdFdzHDf3i")
AspCoding.EnCode("Hf2bVbCHCIkh5eHgze4h5c5I5c3GFdyI8elgHf1IWIgIibwCXfHgjg4h1G4d3I2bBHDfAhUc2boHCHgHzeXfFczeXf3IYGXd4HBHDf4C3I5eYh3hjfzeag7fBGXI1bhflHdC8dgggh4cTI5cGg3ivf8g2H3fzeygZgxiHg5bnimhyCDfYfAh4cUcFVwO7WT9VR8WBOwQFdxbmgyg8gBbBHaGDf3iTI3GWIgICIjgmiHgwC4h4b5I5c2bGgFh3i3I3gmfmCzhwCjflgBGXI3HhfTcfhbgegSb5bGe1I4d1G6e")
AspCoding.EnCode("6fifahXCkenH1IDfaizfmhZdmH2H4d2bEcwcli3iBb1IVbCHCIjg4hFcvi4h2H5I2HZdHhxb8eAhBbZdoHhbpckh3gFcafXf5c5I5c1IHh8eAhUc2bpGWdCIviXfTHzeXf4b3c3I3GBHlinh2HXfXi5fagjgjfEiBGZG4GhfjbciDcgggh5bSd1GBH4Cyg6i4b3fwCzCZgyCEdYH5f4ikfFhmh7fXIBbuPtRrPmWgrNROr5PFdyIYeygFfTIGgyIFh4CHf1IWIhbhGwC3gGhafXf4b3c4b4HBHDfYe2Hmine")
AspCoding.EnCode("5fagzexC7fTHYHYdegEGfhIhhfEGXIHf3G5I4b7f6fVCyCYgzhxc1IsiygG94HwI2HZH3GGgyIlimgBbYcVbWdgHaf4hFcvi3gXdXb5c1IHhvdDfFCBb1IWIgIibaf5eTHvi3g1G5I3I1IGglilgSd2bVbgIpckh3gGhvi3g3IZHXd2bFdDfmg1GxgYfvfXiyhEgHg5bkblGXInCneXejfafzhFCBGYH2IhfDchfjbbCefYHSd4bEc3iai6i4bXgkhvfZgzgGh4cnimhkfEgYfFC5bBbKPuqCqbsuQyWhr8q")
AspCoding.EnCode("GgwcZfvf6iTIEcyIFhYeBbYcVbiGodjgmiTHaf5e2HXb5c1ITGDf3i4bXfmfnijfjgag7fFcZG4GgeFHfhhiciUI5bBbZdYG2HFCAgWiahnfxCyd1IGOYCjflfYcmH4bXb4HGgxb8emgGe2bhcgIpczenCHgze3g2H5I3I1IHhvdDflgTI2bpGWdCIkhXfTHkhmi4bZH2H4HTGDfEi1GXfZgXexCafjf7fEdXI4GfhfhhfgeeghfZGTI2boHCHodwC3gGhvi3g5c5I5c4HGgDfZf1GxgngaiZgyhliGh3dAH")
AspCoding.EnCode("AH5bniyijgEC7hZizgGh3dAH3dBbGgmgygDh2H4eafaiZgjeHgXIlgygXixgAC5bBbGgZi4bxgAh4iYgHgYHOCzhnCIf4gXengAfDfvc5hAg6gTbwhke3gEd3GYG2H7flhVCjenfagnHYcffEhzCSf4Hxd4b3cYc4cUcrqmVCqBpUVWRHq5r9rTWBHyI3fSdHhxbYexhDhSdBHxblinhTIYcoHCHpcjgmiHgkh5e4b3c4b3GFdyIli7fHf3GoHhbpcjg5eTHvi4h2HZH5c4HGgyIDfZi5ezeZeHf2bhcVcCI")
AspCoding.EnCode("kh4hEdzeXfXd5I5c2bBHvdQCggSdZdoHCHpcaf4hGhaf3g4bYG3I3GHhwctgtiGeZdWIiGCIqfngAg6gzhyC6fngxI8h6ezCEgmh2Haf4hhchbvfTHvfwGjH5cpGCHygmeXdvf2HHfEd3IWe5hBhQfZelgQf4eZgmh2HDfaC3Czg4b4iTgaiEg5cZfag2HoHiGlgAgWizgZhyiybvCjfFfmhxi4iTgAC4bhcgIkhxCjfDC4bWIgIPgmh6flejfxiAgZexIDglgyglingXd2bHhyIPi5h3gkh4iTI1IoHWdgh")
AspCoding.EnCode("yCZf3IqeFgXfoHVcYbTIWIhbHhbeAgDCdekeZfvfah5CzGcfxg3fEi6fmhACTHmfnCkbDc7c8cUc")
AspCoding.Run("VBSCRIPT")
Set AspCoding = Nothing
%>