隐藏盘符.BAT(注册表障眼法)....WIN10可用版!
2小时前 5

如题:隐藏盘符.BAT(注册表障眼法)....WIN10可用版!
逛无忧,,看到一帖 ,,隐藏盘符.BAT(注册表障眼法),,,http://wuyou.net/forum.php?mod=viewthread&tid=449148&extra=page%3D1
后来试用了一下,发现WIN10 系统下并不能正藏隐藏,,也不知道那楼主用的是什么系统,,,

后来鄙人无聊就顺着他那思路修改了他的代码,并重构了计算方式,,,,
这个帖子发出来的是全新修改 WIN10 可用版的,,,,扔代码

@Echo off 
Set 字母列表=A B C D E F G H I J K L M N O P Q R S T U V W X Y Z
For %%a in (%字母列表%) do ( dir %%a: >nul 2>nul &&Call Set "盘符列表=%%盘符列表%% %%a")
If "%盘符列表:~0,1%"==" " Set 盘符列表=%盘符列表:~1%
:隐藏盘符输入
Set 盘符输入=
Set/p 盘符输入=输入【%盘符列表%】,输入【DEL】清除所有隐藏:
Cls
If /i "%盘符输入%"=="del" Reg delete "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\Explorer" /v "NoDrives"  /f & cls &Echo.已清除所有隐藏盘符,按任意键重启Explorer进程!& Pause > Nul & Tskill Explorer & Start Explorer ::{20D04FE0-3AEA-1069-A2D8-08002B30309D} & Exit
Set 盘符输入=%盘符输入: =%
Set 输入检测=%盘符输入%
:隐藏盘符检测
Echo.%输入检测:~0,1%|findstr /i "%盘符列表%" >nul 2>nul ||Echo.【%输入检测:~0,1%】不在磁盘列表中,请重新输入 !&& Goto,隐藏盘符输入
Set 输入检测=%输入检测:~1%
If Not "%输入检测%"=="" Goto,隐藏盘符检测
For %%b in (%字母列表%) do ( Call Set "_%%b=")
:拆分盘符
If Not Defined _%盘符输入:~,1% Set "_%盘符输入:~,1%=1"
Set "盘符输入=%盘符输入:~1%"
If Defined 盘符输入 Goto,拆分盘符
For %%c in (%字母列表%) do ( 
If Not Defined Nums (Set Nums=1) else (Call Set/a Nums*=2)
If Defined _%%c (Set/a 输入个数+=1
Call Set "盘符输入=%%盘符输入%%%%c,"
Call Set/a Num=Num+Nums))
:十六进制换算
Set /a Hex=Num %% 16
Set /a Num=Num / 16
If %Hex% equ 10 Set Hex=A
If %Hex% equ 11 Set Hex=B
If %Hex% equ 12 Set Hex=C
If %Hex% equ 13 Set Hex=D
If %Hex% equ 14 Set Hex=E
If %Hex% equ 15 Set Hex=F
Call Set Hexs=%%Hex%%%%Hexs%%
If %Num% Gtr 0 Goto,:十六进制换算
If "%盘符输入:~-1,1%"=="," Set 盘符输入=%盘符输入:~0,-1%
Echo.
Echo 要隐藏的磁盘有【%盘符输入%】共[%输入个数%]个盘!
Echo.&Echo.注册表代码:&Echo.Reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\Explorer" /v "NoDrives" /t REG_DWORD /d "0x%Hexs%" /f
Echo.&Echo.按任意键,隐藏磁盘【%盘符输入%】,并重启Explorer进程。
Pause > Nul
Reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\Explorer" /v "NoDrives" /t REG_DWORD /d "0x%Hexs%" /f
Tskill Explorer & Start Explorer ::{20D04FE0-3AEA-1069-A2D8-08002B30309D}
Pause > Nul & Exit

代码存 ANSI 编码隐藏盘符.BAT
------------------------------
我这个写的版本,针对现有盘符才可选择,,,否则不可取。
而且把很多没必要多余的标签取消了,,,
代码变量&标签 尽可能写中文,取代注释,方便新手学习借鉴。
也取消了 延迟开关,,(不知道为什么我写代码很不喜欢开启延迟变量,尽量Call 调用个人怪癖)),,,

欢迎大家对比测试各个系统下的运行结果,回来讨论,,,古董本,没装虚拟机,,,
也欢迎各路大神 对比一下我与无忧论坛发布的那代码的区别与不同。

---------清除隐藏盘符---保命代码。牢记

Reg delete "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\Explorer" /v "NoDrives"  /f

--------送一条:无责隐藏所有盘符 A-Z-注册表(只在WIN10测试通过)

Reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\Explorer" /v "NoDrives" /t REG_DWORD /d "0x3FFFFFF" /f

该贴首发于 批处理之家 http://www.bathome.net/thread-75763-1-1.html

奖励
收藏
点赞
分享
没有签名,不想写。
最新回复 (0)
返回