[文本处理] 批处理怎样用txt文件第一行内容来重命名文件 （批量）

cpc19960

我想买文件命名为 4IAOC.txt
我的文件夹下还有上千个格式一样的文件，都想这样做。还想请教下

sdyh

学习了。。。。

Batcher

@echo off
setlocal enabledelayedexpansion
for /f "delims=" %%i in ('dir /b /a-d *.txt') do (
    set /p a=<"%%i"
    ren "%%i" "!a:~1,5!.txt"
)
复制代码

Feng2008

@echo off
setlocal enabledelayedexpansion
for /r %%i in (*.txt) do (set /p a=<"%%i"
ren "%%i" "!a:~1,5!.txt")
pause
复制代码

cpc19960

回复 4# zaqmlp


    文字中的   T  提取不出来，丢失的都是T

zaqmlp

回复 5# cpc19960

丢失的字符的文本打包上传发出来

cpc19960

回复 4# zaqmlp

我想把第一行的第2-6到字符提取出来做文件名
    好像你弄的程序里有的只提出来的四个字符，丢了一些。不知道怎么回事。

zaqmlp

回复 3# cpc19960
存为bat文件，跟你的txt放一起运行

cpc19960

回复 2# zaqmlp


    如果可以用我会赞助的，请问这个是放在命令行跑吗，另外哪些参数需要我更改呢？

zaqmlp

@echo off
mode con lines=2000
set info=互助互利,代码可用,支付宝扫码头像,感谢赞助
rem 有问题,加QQ956535081及时沟通
title %info%
start mshta VBScript:Execute("msgbox(""%info%""):close")
cd /d "%~dp0"
powershell ^
    dir . *.txt^|?{$_ -is [System.IO.FileInfo]}^|%%{^
        $text=@(gc $_.FullName);^
        $fname=$text[0].trim() -replace '[/:\""\t*?^|^<^>\\]','';^
        $newname=$fname+$_.Extension;^
        if((-not (test-path -liter ($newname))) -and ($fname -ne '')){^
            write-host ($_.Name+' --^> '+$newname);^
            move -liter $_.Name $newname -force;^
        };^
    }
pause
复制代码