Question

txt文件批量按文本文档内容进行重命名怎么写BAT？TXT文件名字是随机的！文本里面一行一个标题！

文本标题是
深圳福永到东城货运物流公司
深圳福永到西城货运物流公司
深圳福永到崇文货运物流公司
等....

TXT文件的标题是

11321.txt
郁闷.txt
vweweds.txt
等....都是很乱的！

Answer 1

推荐使用 Total Commander 7.02 增强版 , 用起来很顺手，设置>选项>操作>鼠标使用右键选择（像 NC 一样）:

Total Commander (最强的文件更名器) 文件批量重命名操作
--------------------------------------------------------------------------
1)任一窗口打开要更名的目录，
按Ctrl+B，列出所有文件，
按Ctrl+A，选中所有文件，或者点右键选择所需文件，
按Ctrl+M，弹出重命名界面，文件名输入框中，输入新文件名格式，有很多参数、插件可供使用。

2)文件名：[N][C]
[ ]代表变量，[ 用 [ [ ] 表示，] 用[ ] ] (右侧无空格)表示，其余字符原样输出。
除常用变量外，可以通过插件获得丰富变量：如图片、音乐、office文档……的信息。
[N]代表原文件名。
[N1-3]代表取原文件名的左起第1位到第3位,位数可自定义,也可用鼠标选择。
[C]为计数器，代表数字，右侧定义计数器参数。

扩展名：[E]
[E]代表文件扩展名

3)替换文件名中字符
复制要替换的字符到搜索字符串，填写替换字符到替换为；
如果替换为不填写，即删除字符，
搜索、替换支持正则表达式。

4)根据TXT格式的文件来重命名文件
大写小写旁边有列表样子的按钮，点击,选第一个“导入文件名（从文本文件）”……，行数匹配才可重命名,文件名要包括扩展名。

5)文件列表操作
拖动文件，来调整次序,
从列表中删除文件，按Delete键。

6)保存设置
按F2，下拉列表中>保存设置>填入名称>确定，下次按F2，在下拉列表中选中名称，可调用参数。

7)更名
预览合意，按<开始>按钮，完成更名。

8)撤销
调出重命名界面，按<撤销>按钮，撤销上次更名，注意只能撤销一次。
--------------------------------------------------------------------------------------
Total Commander不能完成的：
菲菲更名宝贝8.0（操作繁琐，不易上手）：提取文本文件内容作为标题，提取网页标题，字体文件，office文档，汉字转拼音，繁简转换……
拖把更名器（易上手）：繁体简体转换，提取文本第一行作为标题,提网页标题……Total Commander 文件管理操作
----------------------------------------
1)文件复制
选中文件或文件夹，按复制按钮 或 F5，在弹窗中第一行：填入文件名可使用通配符；第二行文件筛选器，可指定文件扩展名、文件扩展名的各种常用集合、文件的某种属性（例：文件夹属性，可只复制文件夹不复制文件）……，确定执行复制，重复文件有弹窗按需选择操作。

Answer 2

取txt文本第一行为文件名，如果第一行是空行（或只有空格）会出错。如果有这种情况的话需要改进再追问吧。

@echo off
setlcoal enabledelayedexpansion
for /f "tokens=*" %%i in ('dir/b *.txt') do (
set /p f=<"%%i"
ren "%%i" !f!.txt)

追问

不是取第一行，是取指定文本内容的一行一个标题

追答

怎么知道是哪行？

追问

可能我说的不太清楚，就是一个文件夹里面有一个文本内容是标题，其他的是内容文本。目的就是文本的标题给换了！不要重复就好了！！
文本标题是
深圳福永到东城货运物流公司
深圳福永到西城货运物流公司
深圳福永到崇文货运物流公司
等....

TXT文件的标题是

11321.txt
郁闷.txt
vweweds.txt
等....都是很乱的！

追答

深圳福永 开头的就是标题？

追问

是的~

追答

@echo off
setlcoal enabledelayedexpansion
for /f "tokens=*" %%i in ('dir/b *.txt') do (
findstr /b 深圳福永>temp.txt

set /p f=<temp.txt
if not "!f!"=="" ren "%%i" !f!.txt)
del temp.txt

追问

setlcoal 不是内部或外部命令也不是可运行的程序

追答

setlcoal 应为setlocal

Answer 3

可以试试 文件批量处理百宝箱V8.0 主界面的源匹配功能看看。
将你得更名的txt文件加载入列表中，然后将保存这些新文件名的txt源文件指定给程序后，再导入到列表中，即可更名了。