1 @ echo off
2 %1 %2
3 ver|find "5.">nul&&goto :Admin
4 mshta vbscript:createobject("shell.application").shellexecute("%~s0","goto :Admin","","runas",1)(window.close)&goto :eof
5 :Admin
6 :head
7 set /p a=请输入硬盘区单字母，e工作盘，h，m备份盘。
8 set /p b=请输入数字选项，1加锁，2解锁
9
10 if /i %a%==e goto going
11 if /i %a%==h goto going
12 if /i %a%==m goto going
13
14 :going (
15 echo 开始执行操作
16 if %b%==1 goto 1
17 if %b%==2 goto 2
18 :1 (
19 echo 你输入的是1,正在加锁
20 manage-bde -lock -ForceDismount %a%:
21 set /p c=请输入选项，y继续，n退出
22 if /i %c%== n exit
23 goto head
24 )
25 :2 (
26 echo 你输入的是2，正在解锁
27 manage-bde -unlock %a%: -Password
28 set /p c=请输入选项，y继续，n退出
29 if /i %c%== n exit
30 goto head
31 )
32 )
33
34
