[文件操作] 批处理如何根据文件名批量移动？

全盘扫描E盘下的txt文件，请耐心等待...
系统找不到指定的路径。
请按任意键继续. . .
复制代码

    @echo off
    echo 全盘扫描E盘下的grd文件，请耐心等待...
    cd.>list.txt
    for /f "delims=" %%i in ('dir  /a-d /b  *.grd') do 

(echo %%i)>>list.txt
    echo.>>list.txt
    for /f "delims=" %%i in (list.txt) do (
        for /f "tokens=1 delims==l" %%j in ("%%i") do ( 
	md %%j 
	move %%i %%j 
        )
    )
    pause
复制代码

@echo off
echo 全盘扫描E盘下的grd文件，请耐心等待...
cd.>list.txt
for /f "delims=" %%i in ('dir  /a-d /b  *.grd') do (echo %%i)>>list.txt
echo.>>list.txt
for /f "delims=" %%i in (list.txt) do (
    for /f "tokens=1 delims==l" %%j in ("%%i") do (
        if not exist "%%j\" (
            md %%j
        )
        move %%i %%j
    )
)
pause
复制代码

1d
3d
6d
复制代码

    @echo off
    echo 全盘扫描E盘下的grd文件，请耐心等待...
    cd.>list.txt
    for /f "delims=" %%i in ('dir  /a-d /b  *.grd') do 

(echo %%i)>>list.txt
    echo.>>list.txt
        for /f "delims=" %%j in (sort.txt) do (
	md %%j
            for /f "delims=" %%k in ('findstr /c:"%%j" 

list.txt') do (
            move %%k %%j
        )
    )
    pause
复制代码