Batcher

回复 1# 1989615wx


请参考Q-04把bat文件保存为ANSI编码：
https://mp.weixin.qq.com/s/Koje4FufWxWBs7ioDy_LJA
test_1.bat

@echo off
cd /d "%~dp0"
setlocal enabledelayedexpansion
for /f "tokens=1*" %%i in ('dir /b /a-d *.pdf') do (
    set /a _%%i+=1
)
for /f "tokens=1-2 delims==" %%i in ('set _') do (
    set "FolderLeft=%%i"
    set "FolderRight=%%j"
    set "FolderLeft=!FolderLeft:~1!"
    if not exist "!FolderLeft!---!FolderRight!" (
        md "!FolderLeft!---!FolderRight!"
    )
    move /y "!FolderLeft! *.pdf" "!FolderLeft!---!FolderRight!"
)
endlocal
复制代码

Batcher

回复 1# 1989615wx


请参考Q-04把bat文件保存为ANSI编码：
https://mp.weixin.qq.com/s/Koje4FufWxWBs7ioDy_LJA
test_2.bat

@echo off
cd /d "%~dp0"
for /f "tokens=1*" %%i in ('dir /b /a-d *.pdf') do (
    if not exist "%%i" (
        md "%%i"
    )
    move /y "%%i %%j" "%%i"
)
setlocal enabledelayedexpansion
for /f "delims=" %%i in ('dir /b /ad') do (
    set "n=0"
    for /f "delims=" %%i in ('dir /b /a-d "%%i"') do (
        set /a n+=1
    )
    ren "%%i" "%%i---!n!"
)
复制代码

Batcher

回复 9# 1989615wx


    请给出具体的文件名

Batcher

回复 11# 1989615wx

@echo off
cd /d "%~dp0"
for /f "tokens=1* delims=[" %%i in ('dir /b /a-d *.tif') do (
    if not exist "%%~ni" (
        md "%%~ni"
    )
    move /y "%%i[%%j" "%%~ni"
)
setlocal enabledelayedexpansion
for /f "delims=" %%i in ('dir /b /ad') do (
    set "n=0"
    for /f "delims=" %%i in ('dir /b /a-d "%%i"') do (
        set /a n+=1
    )
    ren "%%i" "%%i---!n!"
)
复制代码