alpha2 shellcode解密的vbs腳本
更新時(shí)間：2008年02月22日 14:29:15 作者：
'說明：只針對(duì)alpha2的TYIIIIIIIIIIIIIIII這樣的加密來解密，沒有做更多的容錯(cuò)處理，只是解出下載url的exe地址。一般情況下該url的加密字符串是RHptd4之后的字符（去掉最后4個(gè)字符）。
復(fù)制代碼 代碼如下:
Dim enTmp,enstr,a,bb
enstr=Str2Hex("RHptd4RPFZVOdoVQTrvWTnTp4n6PVN6QTop1tnau1hsU")
For i = 1 To Len(enStr) step 6
enTmp =Array(Mid(enStr,i,6)&"00")
sz =Split(enTmp(0), ",", -1, 1)
a= right(sz(0), 1) Xor left(sz(1), 1)
bb=bb& a&right(sz(1), 1)
Next
Function Str2Hex(ByVal strHex)
Dim sHex
For i = 1 To Len(strHex) step 1
sHex = sHex & Hex(Asc(Mid(strHex,i,1)))&","
Next
Str2Hex = sHex
End Function
Function Hex2Str(hexStr)
Dim sstr,hextmp
For i = 1 To Len(hexStr) step 2
hexTmp = Mid(hexStr,i,2)
If hexTmp <> "00" Then
sstr = sstr & ChrW("&h" & hexTmp)
End If
Next
Hex2Str = sstr
End Function
wscript.echo Hex2Str(bb)
相關(guān)文章
vbscript LoadPicture函數(shù)使用方法與漏洞利用
因?yàn)橛腥苏f這里L(fēng)oadPicture的代碼有些問題，所以這里給修正下，方便需要的朋友2008-12-12
VBS 提取狗狗影視中的ED2K連接的實(shí)現(xiàn)代碼
這篇文章主要介紹了通過VBS 提取狗狗影視中的ED2K連接，需要的朋友可以參考下2013-07-07
演示如何通過腳本創(chuàng)建 Internet Explorer 的實(shí)例，并檢索輸入密碼樣式的文本框中的密碼。需要帶有適當(dāng)?shù)奈谋究虻?Web 頁(yè)（名為 password.htm）。2008-06-06
windows腳本調(diào)試howto的方法...2007-04-04
用vbscript實(shí)現(xiàn)從后到前閱讀一個(gè)文本文件
用vbscript實(shí)現(xiàn)從后到前閱讀一個(gè)文本文件...2007-04-04
VBS 批量Ping的項(xiàng)目實(shí)現(xiàn)
本文主要介紹了VBS批量Ping的項(xiàng)目實(shí)現(xiàn)，文中通過示例代碼介紹的非常詳細(xì)，對(duì)大家的學(xué)習(xí)或者工作具有一定的參考學(xué)習(xí)價(jià)值，需要的朋友們下面隨著小編來一起學(xué)習(xí)學(xué)習(xí)吧2022-04-04![進(jìn)程監(jiān)控實(shí)現(xiàn)代碼[vbs+bat]](http://img.jbzj.com/images/xgimg/bcimg6.png)
進(jìn)程監(jiān)控實(shí)現(xiàn)代碼[vbs+bat]
這是用BAT寫的，主體是VBS，所以放在VBS分類了，功能如果進(jìn)程中有QQ.exe、iexplore.exe、client.exe、game.exe進(jìn)程則會(huì)自動(dòng)結(jié)束進(jìn)程2009-12-12
windows.關(guān)于設(shè)置腳本的一些基本方法原則
windows.關(guān)于設(shè)置腳本的一些基本方法原則...2007-03-03
VBS教程：函數(shù)-CDbl 函數(shù)...2006-11-11
你一定很熟悉InputBox函數(shù)，就像熟悉MsgBox函數(shù)一樣。一般來說，剛開始接觸VBS的時(shí)候，學(xué)會(huì)的第一個(gè)函數(shù)是MsgBox，而第二個(gè)就是InputBox。2011-04-04