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


右键菜单显示隐错文件和扩展名时报错
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了。

猜你喜欢

转载自dq630dq.iteye.com/blog/1359063
今日推荐