`
bbo57bbo
  • 浏览: 12125 次
最近访客 更多访客>>
社区版块
存档分类
最新评论

右键菜单显示隐错文件和扩展名时报错

 
阅读更多

右键菜单显示隐错文件和扩展名时报错
2012年01月11日
     
  
  
  打开右键菜单,点击显示隐藏文件和扩展名时,跳出上图所示错误提示
  具体原因是因为脚本病毒,病毒想开机启动它,但是这个文件不存在,所以就有一上提示
  解决方法如下
  打开记事本输入
  'Show/Hide System Files by Herby
  Dim WSHShell
  Set WSHShell = WScript.CreateObject("WScript.Shell")
  sTitle1 = "SSH=0"
  sTitle2 = "SSH=1"
  if WSHShell.RegRead("HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\ShowSuperHidden") = 1 then
  WSHShell.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\ShowSuperHidden", "0", "REG_DWORD"
  WSHShell.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Hidden", "2", "REG_DWORD"
  WSHShell.SendKeys "{F5}+{F10}e"
  'WSHShell.Popup "Poof, they're gone!", 1, sTitle1, vbInformation
  else
  WSHShell.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\ShowSuperHidden", "1", "REG_DWORD"
  WSHShell.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Hidden", "1", "REG_DWORD"
  WSHShell.SendKeys "{F5}+{F10}e"
  'WSHShell.Popup "Here they are!", 1, sTitle2, vbInformation
  end if
  Set WSHShell = Nothing
  WScript.Quit(0)
  然后保存为“SuperHidden.vbs”,注意后缀名为vbs,不要写成txt了,然后放在C:\WINDOWS目录下就OK了。
分享到:
评论

相关推荐

Global site tag (gtag.js) - Google Analytics