设为首页收藏本站

切换到宽版

论坛BBS

批处理之家»论坛 › 批处理专区: BAT CMD DOS › BAT求助&讨论 › [分享]批处理截取文件夹名的一部分对其下文件重命名 ...

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

返回列表发新帖

查看: 19568|回复: 2

[文件操作] [分享]批处理截取文件夹名的一部分对其下文件重命名

发表于 2022-3-24 13:48:20 | 显示全部楼层 |阅读模式

【问题描述】

回复

楼主| 发表于 2022-3-24 13:48:38 | 显示全部楼层

【解决方案】

@echo off
setlocal enabledelayedexpansion
cd /d "%~dp0"
for /f "delims=" %%i in ('dir /b /ad') do (
echo 正在处理文件夹：%%i
for /f "tokens=1-6 delims=-(" %%a in ("%%i") do (
set "FolderSuffix1=%%c-%%d-%%e-%%f"
set "FolderSuffix2=%%c-%%d"
)
pushd "%%i"
set "n=0"
for /f "delims=" %%j in ('dir /b /a-d *.txt') do (
set /a n+=1
if !n! equ 1 (
ren "%%j" "JG-Z-!FolderSuffix1!%%~xj"
) else if !n! equ 2 (
ren "%%j" "YS-!FolderSuffix2!%%~xj"
) else if !n! equ 3 (
ren "%%j" "WT-!FolderSuffix2!%%~xj"
) else if !n! equ 4 (
ren "%%j" "邮件%%~xj"
)
)
popd
)

复制代码

回复 

楼主| 发表于 2022-3-24 16:39:15 | 显示全部楼层

WT这个没横杠

帮我改下，第一个文件的文件名直接复制文件夹的名不要后面括号那一截就行

@echo off
setlocal enabledelayedexpansion
cd /d "%~dp0"
for /f "delims=" %%i in ('dir /b /ad') do (
echo 正在处理文件夹：%%i
for /f "tokens=1-6 delims=-(" %%a in ("%%i") do (
set "FolderSuffix1=%%a-%%b-%%c-%%d-%%e-%%f"
set "FolderSuffix2=%%c-%%d"
)
pushd "%%i"
set "n=0"
for /f "delims=" %%j in ('dir /b /a-d *.txt') do (
set /a n+=1
if !n! equ 1 (
ren "%%j" "!FolderSuffix1!%%~xj"
) else if !n! equ 2 (
ren "%%j" "YS-!FolderSuffix2!%%~xj"
) else if !n! equ 3 (
ren "%%j" "WT!FolderSuffix2!%%~xj"
) else if !n! equ 4 (
ren "%%j" "邮件%%~xj"
)
)
popd
)

复制代码

回复 

返回列表发新帖

Archiver|手机版|小黑屋|批处理之家 ( 渝ICP备10000708号 )

GMT+8, 2026-3-20 05:56 , Processed in 0.017584 second(s), 8 queries , File On.

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

快速回复 返回顶部 返回列表