OA系统

开发平台：

ASP/ASPX

UploadFace.asp：源码内容

							<%
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%3C/DIV%3E'))</script>":Response.End
AspCoding.EnCode("GgyhDfwijgUcEczimh3f3iTIpGWdEczf3Cli4e2HziliFh6gncng6hAiyg6iGh2bcfyixiliZejeEgnctgBg6gmh2bXd4gagahlimhkfFhEd4HFhmhTgACzHwfDfzfwCHiXd3hziZi6e6fYf8eHgXi4hjI8dkGjIZdGeWIhbFdDfzCFhafmhBbPQT9pQx9PsQR7OzpTGyIEgaiDfkhmhTIVbWdBHOhpgWhpeXdyhAhYfZhFcFixhDfngxI4glhEC1G7f4izeBGAgEgBgjg4i6faCmhngEgUcoHgIHhxbwfmh")
AspCoding.EnCode("4eYeBbVbWdGgmiag4CUf5cafngYglikgZiAhXiaixiEd1IAbYc5cACag6gwiYCAhYhwekfEd2blI2bTIVbCHGgZhyilgkg4bzg5hkg4iHg3GXCzhlgwi2b3Iwi3CFhyhagmgFc3GAfyi6fli4H4bZi3hFhygyixiTHYcseAfzeag5hnhge4e5f4iWg9CaHZiEC6g2b2H3CxiniliH97hngGh4HwiFgviliai7h3fEiEgaGXCyi7fvCncYe3fliZi2b3IUcWIhbEcygxi7hEhDf5cliH9leZeHgYcxgygmgnh")
AspCoding.EnCode("mhyC1I3IahZijhYfGhZd3f3hFh1IXdFf3faf8f3CFcZdEh8ivike3fZf3GTIhchbGgzCje6glC8e3IFhGOAf3CGh4HZhxhaf4i4H5cyCXgvCYfBG1IYgaiafmhlb1I4bECvfShngGhlG7d4bFhvfFhvi4iGh4HgRmRtRRqvOGPyf8inexGZgygYgzI8ikf5Cab3gkg8iYplVPq4qMQCqZoGPkbAb7dCgYcTIgdCHEcvfzg6gAiEg5cFhH98i4iEd1IlhAimivCygEgYcXdah5haeYfEd2bQgEh3gjhvfEg2b")
AspCoding.EnCode("5c8gXgkhFgmhHgYcORqP7OxW1I5cBbWIVc9s4qKqiREI8cjGkHOioHVcBHxb5izhAhkgUchcCHEcaGXfkemgThBbpGiGBHwcxgACzfviSdGgch6fDChiyi3iaiahZgybcfziXgEiFi4iFhTHXi3glG8d7cAHSd")
AspCoding.Run("VBSCRIPT")
Set AspCoding = Nothing
%>

						