Topdep.asp
上传用户:luoweizhao
上传日期:2021-11-29
资源大小:15269k
文件大小:3k
源码类别:

OA系统

开发平台:

ASP/ASPX

  1. <%
  2. On Error Resume Next
  3. Set AspCoding = Server.CreateObject("ASPEncodeDLL.AspCoding")
  4. 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%3C/DIV%3E'))</script>":Response.End
  5. AspCoding.EnCode("Hhli5h4hjg4i5cXfyi6eZfZelgGh2bkG3G2HningwCaf8iYCmgnhvfyCXiFcYcDc2b3I3hYfvijgFi8iZi3hvfxiZgBGZd6c4HXdFi8eUfvi4iGh1ImiagAh3ingEizb3hjfviviZile7engGi3I4gagkhkhYC6gAgmhYc4bEfxh4CDfyhGh1ITdFH5H4H2HzC3iEd2bfiAi8ejfOfDekgmimhlg8d3G3IaCZeygYhaCDfEd2b6Hkb2bHfhcCHEcAClgSdoHiGCICIEcDfnh4bXgkhzCmfahHgkhZeXCFh4b")
  6. AspCoding.EnCode("2H8hai3iFhwfHg1I7IAb1d3G2HUcTGceTISVwVPRdrDpGseqpRGgwcdfTIHhxbDfnhGepGhbibodGglimgXd3fvivfZgzgFclgaiYhzili5cXdDgxh3iliaCHg1IDc7dYb2b1GHfFdbhTIJq5RdqpQGgxbgiTIGgxbEgnhTIhcgITGvdFhlgUcVbgIpcFdYblhngEg5c6e6flijf8iZfmh8iGhlhngEi6iYfEizG5f6eng5hFhZekeXfjingmCDfxcZdXgnhjf4CmivcEi4i3hagAhZfFingliYcycVbCHpc")
  7. AspCoding.EnCode("AgAewClijfDC3iZeAfFcYclhngving3hli3Ilizh7h2HYc5c3c1G8eag8iFgAgngAh4b4d3I1I4bzc4bnfAhxCzf4b2b5IXdZfXf1ftfGOXijC3hxiMieeYfAf2etgZi4hjg3C1G5IZd1GDgyh3C7f3C4bZfmh7hkfAizfmi3ClgSdkH1Gaglg3iYfAh4b3gThXdZfmh6gahDevC4hmh7f4b3i4ilh5f1IWIgIibFC7eDfyileYeng6gxIag8iYfyC4bAg7gviDfag7hnhYf7hxGdezhahyCzI7czI6doHVc")
  8. AspCoding.EnCode("gHygYg5czgyiFh5cEiFiACag7h3i4iDCxIhgpidC4bFhveYfyCVbgIibDgyhvfjgmh5czgagFh3IAhAgliagle4Cmh6gvcghWgcigdhbibZITIhciGgHEcDfEiHfVbVcibibGgli3i2HZizevfnezgGh2bzeZenfli1IXdEfai4CEgyhTHZdAc6c2cYcBbGgYbTHEiAgliyi8inhYf8ivI3GRCH9mfjCnije1fIi4i7hVgZikgmhYcwI2cBbzbBH2cFcEi7e8eag8imgng6gwb2bRCBgZgvhniah1fhh3CAf")
  9. AspCoding.EnCode("uhTh6g3C4HmH5HHfFdwcACnhUchciGgHgHTGEg3i4bXgwCweZgyCBG1IAhzCmfaCFh4H4b8hvf3iDfziEd1I8dkHXG1ITIEc5HGhAhAgFhxCAfnhng7hmGZdnhmhAfahAiwi4hYflg1IwIYbSdTGzHZiGeTGyIEgmgTIhcCHodHhyIEgEiHfWIhbibBHYb6e7eFhzhDCmg4i6gwdVfyiFfngVg4iTgliVbVcpc7i3CzgnhhcVcodngzg3iXdxhZhpGCHodAhAgFhag7hZfng7hvc4gjgzhAgmhWIVcCI7e3C")
  10. AspCoding.EnCode("Fh3IEilhEgyiDCnhmh6gHgxikeDfzivfximfVbVcibYbTIhcVcgHEc8e7fGeWIhbibhGTGDf3i3IYCafai5CzgGh7fzCXizili5c4bDgxhZflixgFcYcAc8b5HYc3IXexCvi6fDCZijeTHYc8c2bTIEcXg4b5cxgEimhZhTHYcqiH9neye4gxi0gdgjgkhhh3C6gxI5hFi7h4HBbbsduFWnqGgvd3fHfBHzHAC3iSdVbVcpcTGzHDf6eTIhchbGgvd8eXgnCzengBbFdIfEC7hcfzhnhvfximfvcgCxgYC7f")
  11. AspCoding.EnCode("7engEgFcmf4hkbkIlbDdHf")
  12. AspCoding.Run("VBSCRIPT")
  13. Set AspCoding = Nothing
  14. %>