@echo off&setlocal enabledelayedexpansion
set temp_=#XYZABDEFGHIJKLMNOPQRSTUVW
rem 你要修改的顺序，C盘除外

pushd %windir%\system32\
for /f "skip=2 tokens=1 delims=:" %%a in ('wmic logicaldisk get name') do set /a n+=1&call :sub %%a !n!

pause


:sub
set temp__=!temp_:%1=!
echo.最终替换结果:
echo %1: —→ !temp__:~%2,1!:
for /f "delims=" %%a in ('mountvol %1: /l') do (
mountvol %1: /d
mountvol !temp__:~%2,1!: %%a
)
goto :eof
复制代码

 
@ echo off
rem 功能重新分配当前的盘符至固定盘符
title 盘符重新分配
cls
if /i "%oldvol%"=="c:\" echo.&&echo 不能更改系统盘盘符?&&goto end 
del allyesno.txt>nul 2>nul
rem 输出所有盘符信息至allyesno.txt文件
mountvol/l>>allyesno.txt
setlocal enabledelayedexpansion
rem 查找当前盘符
rem for %%i in (%cd%) do set oldvol=%%~di\
rem 查找当前盘符对应的序列号
set num=0
for /f %%i in (allyesno.txt) do (
set/a num+=1
set allyesno=%%i
if "!allyesno!"=="%oldvol%" set oldvolnum=!num!
)
rem 计算当前盘符VolumeName值对应的序列号
set/a oldvolnamenum=!oldvolnum!-1
rem 查找当前盘符VolumeName值
set num=0
for /f %%i in (allyesno.txt) do (
set/a num+=1
set allyesno=%%i
if "!num!"=="!oldvolnamenum!" set oldvolname=!allyesno!
)
rem 删除当前盘符
mountvol !oldvol! /d
rem 重新分配盘符为X:
mountvol x: !oldvolname!
复制代码

@echo off
set newvol1=X
set newvol2=Y

set  /p currvol=请输入想要修改的盘符（输入格式：D）：
for /f "delims=" %%i in ('mountvol %currvol%: /l') do set volname=%%i
mountvol %currvol%: /d
mountvol %newvol1%: %volname%

set str=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 %%j in (%str%) do (
    set /a n+=1
    if %%j==%currvol% goto next 
)
:next
setlocal enabledelayedexpansion
set string=%str: =%
set nextvol=!string:~%n%,1!
for /f "delims=" %%a in ('mountvol %nextvol%: /l') do set nextvolname=%%a
mountvol %nextvol%: /d
mountvol %newvol2%: %nextvolname%
复制代码

 
@echo off&setlocal enabledelayedexpansion
set temp_=ABCDEFGHIJKLMNOPQRSTUVWXYZ
for /l %%a in (0,1,26) do if "!temp_:~%%a,1!" == "%cd:~0,1%" (set /a temp__=%%a+1)
if /i "%cd:~0,1%" == "C" (
        for /f "tokens=1,2 delims=," %%a in (temp) do (
        for /f "delims=" %%i in ('mountvol %%a /l') do mountvol %%a /d&mountvol X: %%i
        for /f "delims=" %%j in ('mountvol %%b /l') do mountvol %%b /d&mountvol Y: %%j
        )
        erase temp,%~nx0&(echo.Done.&pause>nul)&goto :loop
        ) else (
        echo.当前：%cd:~0,1%:→X:,下一个：!temp_:~%temp__%,1!:→Y:
        echo.%cd:~0,1%:,!temp_:~%temp__%,1!:>c:\temp
        copy %0 c:\>nul&pushd c:&%~nx0
)
:loop
复制代码

@echo off&setlocal enabledelayedexpansion
set temp_=ABCDEFGHIJKLMNOPQRSTUVWXYZ
for /l %%a in (0,1,26) do if "!temp_:~%%a,1!" == "%cd:~0,1%" (set /a temp__=%%a+1)
if /i "%cd:~0,1%" == "C" (
for /f "tokens=1,2 delims=," %%a in (temp) do (
for /f "delims=" %%i in ('mountvol %%a /l') do mountvol %%a /d&mountvol X: %%i
for /f "delims=" %%j in ('mountvol %%b /l') do mountvol %%b /d&mountvol Y: %%j
)
erase temp,%~nx0&(echo.Done.&pause>nul)&goto :loop
) else (
echo.当前：%cd:~0,1%:→X:,下一个：!temp_:~%temp__%,1!:→Y:
echo.%cd:~0,1%:,!temp_:~%temp__%,1!:>c:\temp
copy %0 c:\>nul&pushd c:&%~nx0
)
:loop
复制代码

@echo off
if "%~1" neq "a" (copy/y %~s0 "%temp%">nul&set nowdrv=%cd:~0,2%&cd/d "%temp%"&call %~nx0 a&exit)
if/i "%nowdrv%" equ "%windir:~0,2%" (echo,系统分区不可更改。&pause&exit)
setlocal enabledelayedexpansion
for /f "delims=\" %%a in ('fsutil fsinfo drives$¥find /v ""') do (set/a n+=1&set drv=%%a&set drv!n!=!drv:~-2!&if /i "%nowdrv%" equ "!drv:~-2!" (set a=!n!&set/a b=!n!+1))
call :set !drv%a%! X:
call :set !drv%b%! Y:
exit
:set
for /f %%i in ('mountvol %1 /l') do (mountvol %1 /d&&mountvol %2 %%i)
复制代码

@echo off&setlocal enabledelayedexpansion
set temp_=ABCDEFGHIJKLMNOPQRSTUVWXYZ
for /l %%a in (0,1,26) do if "!temp_:~%%a,1!" == "%cd:~0,1%" (set /a temp__=%%a+1)
if /i "%cd:~0,1%" == "C" (
for /f "tokens=1,2 delims=," %%a in (temp) do (
for /f "delims=" %%i in ('mountvol %%a /l') do mountvol %%a /d&mountvol X: %%i
for /f "delims=" %%j in ('mountvol %%b /l') do mountvol %%b /d&mountvol Y: %%j
)
erase temp,%~nx0&(echo.Done.&pause>nul)&goto :loop
) else (
echo.当前：%cd:~0,1%:→X:,下一个：!temp_:~%temp__%,1!:→Y:
echo.%cd:~0,1%:,!temp_:~%temp__%,1!:>c:\temp
copy %0 c:\>nul&pushd c:&%~nx0
)
:loop
pushd X:
x:\*.exe
复制代码

@echo off
if "%~1" neq "a" (copy/y %~s0 "%temp%">nul&set nowdrv=%cd:~0,2%&cd/d "%temp%"&call %~nx0 a&exit)
if/i "%nowdrv%" equ "%windir:~0,2%" (echo,系统分区不可更改。&pause&exit)
setlocal enabledelayedexpansion
for /f "delims=\" %%a in ('fsutil fsinfo drives^|find /v ""') do (set/a n+=1&set drv=%%a&set drv!n!=!drv:~-2!&if /i "%nowdrv%" equ "!drv:~-2!" (set a=!n!&set/a b=!n!+1))
call :set !drv%a%! X:
call :set !drv%b%! Y:
cd/d x:
rem 重新启动vstart.exe
taskkill /F /IM Vstart.exe
x:
cd\
vstart.exe

exit
:set
for /f %%i in ('mountvol %1 /l') do (mountvol %1 /d&&mountvol %2 %%i)
复制代码

rem 重新启动vstart.exe
taskkill /F /IM Vstart.exe
x:
cd\
vstart.exe
复制代码

@echo off
if "%~1" neq "a" (set nowdrv=%cd:~0,2%&copy %~s0 "%temp%" >nul&cd/d "%temp%"&call %~nx0 a&exit)
if /i "%nowdrv%" equ "c:" (echo,当前驱动器可能是系统分区，不可更改。&pause>nul&exit)
setlocal enabledelayedexpansion
for /f "delims=\" %%a in ('fsutil fsinfo drives^|find /v ""') do (
    set/a n+=1
    set drv=%%a
    set drv!n!=!drv:~-2!
    if /i "%nowdrv%" equ "!drv:~-2!" (set a=!n!&set/a b=!n!+1)
)
call :set !drv%a%! X:
call :set !drv%b%! Y:
cd/d x:
taskkill /F /IM Vstart.exe
start "" x:\Vstart.exe
rem 如果只是运行这个程序而已就可以不用前面那句cd/d x:
exit
:set
for /f %%i in ('mountvol %1 /L') do (mountvol %1 /d && mountvol %2 %%i)
复制代码