如何使用vbs进行alpha2 shellcode解密

小编给大家分享一下如何使用vbs进行alpha2 shellcode解密，相信大部分人都还不怎么了解，因此分享这篇文章给大家参考一下，希望大家阅读完这篇文章后大有收获，下面让我们一起去了解一下吧！

代码如下:

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)

以上是“如何使用vbs进行alpha2 shellcode解密”这篇文章的所有内容，感谢各位的阅读！相信大家都有了一定的了解，希望分享的内容对大家有所帮助，如果还想学习更多知识，欢迎关注编程网精选频道！