从品牌网站建设到网络营销策划,从策略到执行的一站式服务
小编给大家分享一下如何使用vbs进行alpha2 shellcode解密,相信大部分人都还不怎么了解,因此分享这篇文章给大家参考一下,希望大家阅读完这篇文章后大有收获,下面让我们一起去了解一下吧!
创新互联是一家专注于做网站、网站制作与策划设计,威信网站建设哪家好?创新互联做网站,专注于网站建设10余年,网设计领域的专业建站公司;建站业务涵盖:威信等地区。威信做网站价格咨询:18982081108代码如下:
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解密”这篇文章的所有内容,感谢各位的阅读!相信大家都有了一定的了解,希望分享的内容对大家有所帮助,如果还想学习更多知识,欢迎关注创新互联行业资讯频道!
成都网站建设公司地址:成都市青羊区太升南路288号锦天国际A座10层 建设咨询028-86922220
成都快上网科技有限公司-四川网站建设设计公司 | 蜀ICP备19037934号 Copyright 2020,ALL Rights Reserved cdkjz.cn | 成都网站建设 | © Copyright 2020版权所有.
专家团队为您提供成都网站建设,成都网站设计,成都品牌网站设计,成都营销型网站制作等服务,成都建网站就找快上网! | 成都网站建设哪家好? | 网站建设地图