Question

求批处理! 批量读取每个TXT文本的第四行双引号中的内容作为文件名.

RT，100财富值求高手帮忙！
文本第四行内容格式如下：
#198341903 name :: string : "AAABBBCCC";
需要提取双引号中的AAABBBCCC作为文件名。
QQQ

Answer 1

@echo off
setlocal enabledelayedexpansion
for /a "tokens=*" %%a in ('dir/b *.txt') do (
for /f "tokens=*" %%i in ('type "%%a"') do (
set /a n+=1
if !n!==4 (
set s=%%i
for /f "tokens=3 delims=;:" %%j in ('echo !s!') do set fn=%%~j))
move "%%a" !fn!)

追问

试了一下，不好用啊~

追答

@echo off
setlocal enabledelayedexpansion
for /f "tokens=*" %%a in ('dir/b *.txt') do (
set n=
for /f "tokens=*" %%i in ('type "%%a"') do (
set /a n+=1
if !n!==4 (
set s=%%i
for /f "tokens=3 delims=;:" %%j in ('echo !s!') do set fn=%%~j))
move "%%a" !fn!)

sorry ，有两个小手误

追问

还是不好用...

追答

这个测试过了

Answer 2

用vba做成吧？

追问

想用cmd做批处理脚本

追答

那叫bat文件

Answer 3

是用提取出来的文件名重命名每个txt文件么？

追问

是的~是的。
每个txt文件格式都是一样的，只是引号中内容不一样。需要批处理提取出来引号的内容，再命名每个文件。