【已解决】BAT代码怎么写，批量放置每4张图片到顺序文件夹？

wqj · 发表于 2023-12-10 20:48:35

已解决，感谢大神帮助！

wqj · 发表于 2023-12-10 21:36:42

回复 15# ShowCode

拜谢大神！

wqj · 发表于 2023-12-12 09:17:22

本帖最后由 wqj 于 2023-12-12 10:07 编辑

回复 11# ShowCode

大神麻烦再请教一下？文件名换成这样，您写的代码怎么修改!
新0001.jpg
新0002.jpg
新0003.jpg
新0004.jpg
新0025.jpg
新0029.jpg
新0058.jpg
新0112.jpg
新0113.jpg
新0116.jpg
文件名始终保留4位数字

@echo off
cd /d "%~dp0"
setlocal enabledelayedexpansion
set "MaxNum=2"
for /l %%i in (1,1,10) do (
md "%%i" 2>nul
set "FileNum=0"
for /l %%j in (1,1,100) do (
      if !FileNum! lss !MaxNum! (
         if exist "新 (%%j).jpg" (
            move "新 (%%j).jpg" "%%i\"
            set /a FileNum+=1
         ) else if exist "新 (%%j).jpeg" (
            move "新 (%%j).jpeg" "%%i\"
            set /a FileNum+=1
         ) else if exist "新 (%%j).png" (
            move "新 (%%j).png" "%%i\"
            set /a FileNum+=1
         ) else if exist "新 (%%j).bmp" (
            move "新 (%%j).bmp" "%%i\"
            set /a FileNum+=1
         )
      )
)
)

ShowCode · 发表于 2023-12-12 09:40:35

回复 18# wqj

请按照2楼的步骤操作

wqj · 发表于 2023-12-12 10:09:31

回复 9# ShowCode

   大神麻烦再请教一下？文件名换成这样，您写的代码怎么修改!
新0001.jpg
新0002.jpg
新0003.jpg
新0004.jpg
新0025.jpg
新0029.jpg
新0058.jpg
新0112.jpg
新0113.jpg
新0116.jpg
文件名始终保留4位数字
@echo off
cd /d "%~dp0"
setlocal enabledelayedexpansion
set "MaxNum=2"
for /l %%i in (1,1,10) do (
md "%%i" 2>nul
set "FileNum=0"
for /l %%j in (1,1,100) do (
      if !FileNum! lss !MaxNum! (
         if exist "新 (%%j).jpg" (
            move "新 (%%j).jpg" "%%i\"
            set /a FileNum+=1
         ) else if exist "新 (%%j).jpeg" (
            move "新 (%%j).jpeg" "%%i\"
            set /a FileNum+=1
         ) else if exist "新 (%%j).png" (
            move "新 (%%j).png" "%%i\"
            set /a FileNum+=1
         ) else if exist "新 (%%j).bmp" (
            move "新 (%%j).bmp" "%%i\"
            set /a FileNum+=1
         )
      )
)
)

ShowCode · 发表于 2023-12-12 10:23:43

回复 20# wqj

我写的代码不需要你重复的发出来。因为这对于我理解你的需求没有任何帮助。
我只需要知道需求是怎样。哪里的文件名换成这样？移动之前还是移动之后？
文字加截图描述清楚你的需求就够了。
具体步骤请看2楼。

wqj · 发表于 2023-12-12 10:42:11

本帖最后由 wqj 于 2023-12-12 10:44 编辑

回复 20# wqj

将类似于代码中这样的文件名 "新 (%%j).jpg"更换成下面这样
新0001.jpg
新0002.jpg
新0003.jpg
新0004.jpg
新0025.jpg
新0029.jpg
新0058.jpg
新0112.jpg
新0113.jpg
最小的文件名编号新0001.jpg 最大的文件名编号新0999.jpg 共上千张图片，每两个放一个文件夹，怎么在文件名序号前加0不会修改，没表述清楚，抱歉！

wqj · 发表于 2023-12-12 10:45:35

回复 21# ShowCode

将类似于代码中这样的文件名 "新 (%%j).jpg"更换成下面这样
新0001.jpg
新0002.jpg
新0003.jpg
新0004.jpg
新0025.jpg
新0029.jpg
新0058.jpg
新0112.jpg
新0113.jpg
最小的文件名编号新0001.jpg 最大的文件名编号新0999.jpg 共上千张图片，每两个放一个文件夹，怎么在文件名序号前加0不会修改，没表述清楚，抱歉！

ShowCode · 发表于 2023-12-12 11:15:47

回复 23# wqj

@echo off
cd /d "%~dp0"
setlocal enabledelayedexpansion
set "MaxNum=2"
for /l %%i in (1,1,10) do (
md "%%i" 2>nul
set "FileNum=0"
for /l %%j in (10001,1,10999) do (
set "FileSeq=%%j"
set "FileSeq=!FileSeq:~-4!"
if !FileNum! lss !MaxNum! (
if exist "新!FileSeq!.jpg" (
move "新!FileSeq!.jpg" "%%i"
set /a FileNum+=1
) else if exist "新!FileSeq!.jpeg" (
move "新!FileSeq!.jpeg" "%%i"
set /a FileNum+=1
) else if exist "新!FileSeq!.png" (
move "新!FileSeq!.png" "%%i"
set /a FileNum+=1
) else if exist "新!FileSeq!.bmp" (
move "新!FileSeq!.bmp" "%%i"
set /a FileNum+=1
)
)
)
)

复制代码

wqj · 发表于 2023-12-12 12:43:54

回复 24# ShowCode

完美实现，对大神五体投地拜谢！

wqj · 发表于 2024-3-19 20:11:32

回复 24# ShowCode

大神，上述代码，如果文件夹已经存在，怎么修改代码？

拜谢！

ShowCode · 发表于 2024-3-20 21:54:21

回复 26# wqj

哪个文件夹已经存在？那种情况下24楼的代码结果和你希望的结果有什么差异？

wqj · 发表于 2024-3-21 13:22:57

本帖最后由 wqj 于 2024-3-21 13:57 编辑

回复 26# wqj

wqj · 发表于 2024-3-21 13:56:43

回复 27# ShowCode

大神！ 24楼的代码，如果不用新建文件夹，就是文件夹已经存在，仍然两张照片放一个文件夹，怎么修改代码？拜谢！

qixiaobin0715 · 发表于 2024-3-21 16:15:52

回复 29# wqj
表述不清楚，要靠猜。是这样吗：

@echo off
setlocal enabledelayedexpansion
for /f "delims=" %%i in ('dir /b /a-d *.jpg') do (
set /a m+=1
set /a "n=(m-1)/2+1"
move "%%i" "!n!"
)
pause

复制代码

		自动登录	找回密码
密码			注册

[新手上路]批处理新手入门导读	[视频教程]批处理基础视频教程	[视频教程]VBS基础视频教程	[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动	[批处理精品]CMD命令50条不能说的秘密	[在线下载]第三方命令行工具	[在线帮助]VBScript / JScript 在线参考

[文件操作] 【已解决】BAT代码怎么写，批量放置每4张图片到顺序文件夹？

评分