windows10系统多分区加解锁bat

@ echo off
%1 %2
ver|find "5.">nul&&goto :Admin
mshta vbscript:createobject("shell.application").shellexecute("%~s0","goto :Admin","","runas",1)(window.close)&goto :eof
:Admin
:head
set /p a=请输入硬盘区单字母，e工作盘，h，m备份盘。
set /p b=请输入数字选项，1加锁，2解锁

if /i %a%==e goto going
if /i %a%==h goto going
if /i %a%==m goto going

:going (
echo 开始执行操作
if %b%==1 goto 1
if %b%==2 goto 2
:1 (
echo 你输入的是1,正在加锁
manage-bde -lock -ForceDismount %a%:
set /p c=请输入选项，y继续，n退出
if /i %c%== n exit
goto head
)
:2 (
echo 你输入的是2，正在解锁
manage-bde -unlock %a%: -Password
set /p c=请输入选项，y继续，n退出
if /i %c%== n exit
goto head
)
)