[文件操作] [已解决]BAT能否将根目录下的文件创建并移动到对应的子文件夹[附半成品代码]

@echo off
for %%a in (*.jpg) do for /f "tokens=1-4 delims=-" %%b in ("%%a") do (
if not exist %%b md %%b
copy "%%a" %%b
)
复制代码

@echo off
for %%a in (*.jpg) do for /f "tokens=1-4 delims=-" %%b in ("%%a") do (
if not exist %%b md %%b
copy "%%a" %%b
)
复制代码

@echo off
for %%i in (*.jpg) do for /f "tokens=1-4 delims=-" %%a in ("%%i") do (
    if not exist "%%a-%%b-%%c-%%d\" md "%%a-%%b-%%c-%%d\"
    copy "%%i" "%%a-%%b-%%c-%%d\"
)
pause
复制代码

@echo off&setlocal enabledelayedexpansion
set "ph=%~dp0"
for /f "tokens=* delims=" %%i in ('dir /b /a-d *.jpg') do (
    set "str=%%i"
    for /f "delims=" %%j in ("!str:-=\!") do (
        set "str=%%~dpj"
        set "str=!str:~,-1!"
        set "str=!str:%ph%=!
        md "%ph%!str:\=-!" 2>nul
        if not exist "%ph%!str:\=-!\%%~nxi" copy "%%i" "%ph%!str:\=-!\!str:\=-!*.*"
    )
)
pause
复制代码