【已解决】批处理如何获取当前文件夹中1.txt的命名规则，对当前图片/视频进行命名

zxy0199

原文件
img202504237622.JPG
img202504237623.JPG
img202504237624.JPG
img202504237625.JPG

1.txt文件
手机1
手机2

结果输出
手机1-img202504237622.JPG
手机2-img202504237623.JPG
手机1-img202504237624.JPG
手机2-img202504237625.JPG


用ai写的代码报错了。。。求求大佬

1. @echo off
   
2. setlocal enabledelayedexpansion
   
3. 
   
4. :: 步骤1: 读取1.txt的命名规则
   
5. set rule_count=0
   
6. if not exist "1.txt" (
   
7.     echo 错误: 1.txt 文件不存在!
   
8.     pause
   
9.     exit /b
   
10. )
    
11. 
    
12. for /f "usebackq delims=" %%a in ("1.txt") do (
    
13.     set /a rule_count+=1
    
14.     set "rule_!rule_count!=%%a"
    
15. )
    
16. 
    
17. if %rule_count% equ 0 (
    
18.     echo 错误: 1.txt 中没有找到命名规则!
    
19.     pause
    
20.     exit /b
    
21. )
    
22. 
    
23. :: 步骤2: 收集支持的媒体文件(按修改时间排序)
    
24. set file_count=0
    
25. for /f "delims=" %%f in ('dir /b /o:-d *.jpg *.jpeg *.png *.gif *.bmp *.mp4 *.avi *.mov *.mkv *.flv 2^>nul') do (
    
26.     set /a file_count+=1
    
27.     set "file_!file_count!=%%f"
    
28. )
    
29. 
    
30. if %file_count% equ 0 (
    
31.     echo 没有找到支持的图片或视频文件!
    
32.     pause
    
33.     exit /b
    
34. )
    
35. 
    
36. :: 步骤3: 循环应用命名规则
    
37. set index=1
    
38. for /l %%i in (1,1,%file_count%) do (
    
39.     set "filename=!file_%%i!"
    
40.     set "ext=!filename:~-4!"
    
41.    
    
42.     :: 获取当前规则
    
43.     set "current_rule=!rule_%index%!"
    
44.    
    
45.     :: 生成新文件名并重命名
    
46.     set "new_name=!current_rule! !filename!"
    
47.     ren "!filename!" "!new_name!" 2>nul
    
48.    
    
49.     :: 更新规则索引(循环)
    
50.     set /a index=(index %% rule_count) + 1
    
51.    
    
52.     echo 已重命名: "!filename!" -> "!new_name!"
    
53. )
    
54. 
    
55. echo.
    
56. echo 完成! 已处理 %file_count% 个文件。
    
57. pause

复制代码

wanghan519

powershell可以试试

1. $a = gc .\1.txt
   
2. $n = 0
   
3. gci *.jpg | %{rni $_ ($a[$n++%$a.Count] + $_.Name)}

复制代码

aloha20200628

回复 1# zxy0199

楼主须明确要求处理结果是否如下：
   在源文件 *.jpg 所在的目录中生成一个新文件如 2.txt ？
   其中奇数行 手机1xxxxxxxxxxxx.jpg 对应源文件列表中的奇数行 ？
   偶数行 手机2xxxxxxxxxxxx.jpg 对应源文件列表中的偶数行 ？

zxy0199

回复 3# aloha20200628

不需要生成新的2.txt，bat文件和1.txt以及需要被执行的图片都在同一目录中，执行脚本之后读取1.txt文件的行数按照图片默认排序自动循环命名，生成一个result文件夹并把结果放进去。

aloha20200628

回复 4# zxy0199

以下代码存为 test.bat 运行，与 *.jpg 和 1.txt 同目录...

1. 
   
2. @echo off &set "d=result" &setlocal enabledelayedexpansion
   
3. set/a "n=0, k=0" &md "%d%" 2>nul
   
4. for /f "delims=" %%a in (1.txt) do set/a "n+=1" &set "_#!n!=%%a"
   
5. for /f "delims=" %%F in ('dir /b/a-d *.jpg') do (
   
6.    set/a "k+=1" &if not defined _#!k! set "k=1"
   
7.    for %%v in (!k!) do move /y "%%F" "%d%\!_#%%v!-%%F" )
   
8. pause&exit/b
   

复制代码