右键添加显示隐藏文件(转贴)

右键添加显示隐藏文件(转贴)
2012年01月15日
　　右键添加显示/隐藏系统文件和隐藏文件及显示/隐藏扩展名的选项
　　在日常生活中，我们经常会要查看隐藏文件，以方便操作，如果选择传统的方法，的确是太慢。如果把“[b]显示隐藏文件及扩展名[/b]”加在右键里，岂不是很方便？的确，最近我就这么做，的确方便不少。下面我就教大家如何操作：
　　第一步：新建一个文本文件，把下面文字原文贴进去，另存为SuperHidden.reg
　　REGEDIT4
　　[HKEY_CLASSES_ROOT\Directory\Background\shellex\ContextMenuHandlers\SuperHidden]
　　@="{00000000-0000-0000-0000-000000000012}"
　　[HKEY_CLASSES_ROOT\CLSID\{00000000-0000-0000-0000-000000000012}\InProcServer32]
　　@=hex(2):25,53,79,73,74,65,6d,52,6f,6f,74,25,5c,73,79,73,74,65,6d,33,32,5c,73,\
　　68,64,6f,63,76,77,2e,64,6c,6c,00
　　"ThreadingModel"="Apartment"
　　[HKEY_CLASSES_ROOT\CLSID\{00000000-0000-0000-0000-000000000012}\Instance]
　　"CLSID"="{3f454f0e-42ae-4d7c-8ea3-328250d6e272}"
　　[HKEY_CLASSES_ROOT\CLSID\{00000000-0000-0000-0000-000000000012}\Instance\InitPropertyBag]
　　"method"="ShellExecute"
　　"Param1"="SuperHidden.vbs"
　　"command"="显示/隐藏系统文件+扩展名"
　　"CLSID"="{13709620-C279-11CE-A49E-444553540000}"
　　[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced]
　　"ShowSuperHidden"=dword:00000000
　　"Hidden"=dword:00000002
　　第二步：另外再新建一个文件文件，把下面的脚本原文贴进去，并另存为SuperHidden.vbs
　　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.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\HideFileExt", "1", "REG_DWORD"
　　WSHShell.RegWrite "HKCR\CLSID\{00000000-0000-0000-0000-000000000012}\Instance\InitPropertyBag\command", "显示系统文件+扩展名", "REG_SZ"
　　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.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\HideFileExt", "0", "REG_DWORD"
　　WSHShell.RegWrite "HKCR\CLSID\{00000000-0000-0000-0000-000000000012}\Instance\InitPropertyBag\command", "隐藏系统文件+扩展名", "REG_SZ"
　　WSHShell.SendKeys "{F5}+{F10}e"
　　'如果你用万能五笔的话（输入法打开的时候会在输入框加打一个e字，并出来一菜单），请用WSHShell.SendKeys "{F5}"，否则用WSHShell.SendKeys "{F5}+{F10}e"疑似完美些。
　　'WSHShell.Popup "Here they are!", 1, sTitle2, vbInformation
　　end if
　　Set WSHShell = Nothing
　　WScript.Quit(0)
　　第三步把它们复制到系统的windows目录下，双击superhidden.reg，搞定，你的右键从此就有 [b]显示/隐藏系统文件和隐藏文件[/b]，[b]显示/隐藏扩展名[/b]的功能选项了。