隐藏盘符.BAT（注册表障眼法）

cutebe

安装了Ramdisk后，不想看到内存盘。

1. @echo off
   
2. 
   
3. :inp
   
4. cls
   
5. set Drv=
   
6. echo 输入数字“0”取消隐藏，输入若干字母隐藏相应的磁盘。
   
7. set/p Drv=输入磁盘(如：EaF)-
   
8. 
   
9. if "%Drv%"=="" goto :inp
   
10. if %Drv%==0 set TT=00&goto :hidrv
    
11. 
    
12. ::小写换大写顺序输出并剔除重复
    
13. set mat=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
    
14. for %%d in (%mat%) do (
    
15. 　call set _%%d=
    
16. )
    
17. :lp
    
18. if not defined _%Drv:~,1% set "_%Drv:~,1%=1"
    
19. set "Drv=%Drv:~1%"
    
20. if defined Drv goto lp
    
21. set n=1
    
22. set n10=
    
23. set Dnum=
    
24. for %%m in (%mat%) do (
    
25. 　call :setn n
    
26. 　if defined _%%m (
    
27. 　　call :sshow %%m Drv Dnum n2 n10
    
28. 　)
    
29. )
    
30. 
    
31. ::显示
    
32. echo.
    
33. echo 要隐藏的磁盘有%Drv%，共[%Dnum%]个盘。
    
34. 
    
35. ::换成十六进制
    
36. :reg16
    
37. setlocal enableDelayedExpansion
    
38. call :A %n10%
    
39. 
    
40. ::注册表二进制数值表达方式
    
41. ::T3换BIN
    
42. set TT=
    
43. :bi
    
44. set/a x+=1
    
45. set Tn=0%T3:~-2%
    
46. set Tn=!Tn:~-2!
    
47. set T3=%T3:~,-2%
    
48. set TT=!TT!!Tn!
    
49. if not #%T3%==# goto :bi
    
50. 
    
51. ::隐藏磁盘
    
52. ::-=核心代码=-
    
53. :hidrv
    
54. set TT=%TT%000000
    
55. reg add HKCU\SoftWare\Microsoft\Windows\CurrentVersion\Policies\Explorer /v NoDrives /t REG_BINARY /d %TT:~,8% /f
    
56. 
    
57. echo 结束explorer进程生效。按任意键结束并打开我的电脑查看
    
58. pause>nul
    
59. tskill explorer
    
60. endlocal
    
61. start/min "" explorer "%~dp0"
    
62. start explorer ::{20D04FE0-3AEA-1069-A2D8-08002B30309D}
    
63. 
    
64. ping -n 3 127.1>nul
    
65. goto :eof
    
66. 
    
67. ::调用标签
    
68. :sshow
    
69. 　set %2=%Drv%%1
    
70. 　set/a %3+=1
    
71. 　set/a %4=n/2
    
72. 　set/a %5+=n2
    
73. 　goto :eof
    
74. :setn
    
75. 　set/a %1*=2
    
76. 　goto :eof
    
77. :A
    
78. 　set str=0123456789ABCDEF
    
79. 　set T1=%1
    
80. 　SET T3=
    
81. :B
    
82. 　set/A T2=T1%%16
    
83. 　SET T2=!str:~%t2%,1!
    
84. 　SET/A T1=%T1%/16
    
85. 　SET T3=%T2%%T3%
    
86. 　IF %T1%==0 GOTO :EOF
    
87. 　GOTO B
    

复制代码

a583091790

感谢楼主分享 希望有用。

win98se

感谢分享

a66

看看

it323

感谢分享！

ewq11111

感谢分享

smile_z

感谢分享

wn168cn@163.com

支持原创

2010天月来了

这个论坛里的那个多年前的文件管理器的操作更直观。

http://bbs.wuyou.net/forum.php?mod=viewthread&tid=275304

benbert256

感谢分享

ebaqiang

这个好，感谢分享