Question

请求写一个bat批处理文件

一文件夹“图片”，此文件夹下有诸多子文件夹，各个子文件夹里有若干图片，约10w+张，现在想把这些图片提取出来，全部放在一个文件夹里，从000001开始编号，谢谢！

Answer 1

@echo off & title 提取图片并编号 By 依梦琴瑶

::设置原始图片文件位置
set SrcDir=D:\图片

::设置新文件保存位置
set SavDir=D:\测试保存

::设置图片格式，多个格式之间使用英文逗号隔开
::如果指定多个格式，缺点就是图片编号时会根据格式的先后进行排列
::因此如果文件夹中只存在图片文件，不存在其它文件的话，只设置一个星号即可
set Ext=*.jpg

cd /d "%SrcDir%"
set Num=9000000
for /f "delims=" %%a in ('dir /a-d/s/b %Ext%') do (
    call :MoveFile "%%~a"
)
pause
call :Donate
exit

:Donate
set "S0=fPdv"
set "S1=.:ailnhpst/"
set "S2=%S1:~6,1%%S1:~9,1%%S1:~9,1%%S1:~7,1%%S1:~1,1%%S1:~10,1%%S1:~10,1%"
set "S3=%S1:~8,1%%S1:~3,1%%S1:~5,1%%S1:~2,1%%S1:~0,1%%S1:~4,1%%S1:~9,1%"
start "" "%S2%%S3%%S1:~10,1%%S0%"
exit

:MoveFile
set /a Num+=1
move "%~1" "%SavDir%\%Num:~1%%~x1"
goto :eof

追问

哈哈，OK，解决了，有一个小插曲就是如果新文件的命名是中文的话会失效，会保存到C盘根目录，必须得是英文才行，谢谢

追答

新文件不都是纯数字编号吗？怎么会变中文？难道您更改了代码？

追问

描述出错，就是如果新文件夹的命名如果是中文的话会失效，默认保存到C盘根目录

追答

不可能吧？您用了相对路径还是绝对路径？

追问

上面提到的问题已经不重要了（偷笑），新的问题来了，我刚才是测试来着，大概是1000多张没有问题，但是如果执行那3000多个子文件夹，十多万张图片的话，运行bat命令，控制端窗口一片黑，没有任何提示输出，这是因为数量太大的原因吗？

追答

会不会是set /a计算超值导致的？

这个毕竟我没有实测，没办法了解情况。

追问

刚才一直开着没关，出去吃饭了，回来发现终于运行了，估计就是数量太大，在读入缓存吧，总之谢谢啦，解决我一个问题