右键菜单显示/隐藏系统文件,扩展名


1,新建一个文本文件,把下面文字原文贴进去,另存为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

2,再新建一个文件文件,把下面的脚本原文贴进去,并另存为SuperHidden.vbs
'Show/Hide System Files

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"
'WSHShell.Popup "Here they are!", 1, sTitle2, vbInformation

end if

Set WSHShell = Nothing
WScript.Quit(0)

3,把 SuperHidden.vbs 文件复制到系统的 X:/windows/system 目录下(X 为你的系统盘符),双击superhidden.reg 将信息导入注册表文件。这样在桌面或文件夹的空白位置单出右键,就会在菜单中看到 [显示/隐藏系统文件,扩展名] 的选项了,点选后自动刷新文件夹,无需手动刷新。

 

« 
» 
快速导航

Copyright © 2016 phpStudy | 豫ICP备2021030365号-3