批处理之家 - Powered by Discuz! Board

标题: [文本处理] [已解决]批处理如何在txt每行特定相同位置插入相同字符 [打印本页]

作者: IGOfilm 时间: 2022-1-16 00:22 标题: [已解决]批处理如何在txt每行特定相同位置插入相同字符

本帖最后由 IGOfilm 于 2022-1-16 14:58 编辑

比如我原txt为
【221】归乡」.NARUTO-ナルト-疾風伝.mkv
【222】晓之始动」.NARUTO-ナルト-疾風伝.mkv
【223】修行的成果」.NARUTO-ナルト-疾風伝.mkv
【224】砂之人柱力」.NARUTO-ナルト-疾風伝.mkv
【225】作为风影」.NARUTO-ナルト-疾風伝.mkv
.....
现在需要在每行编号后面插入一个「字符
【221】「归乡」.NARUTO-ナルト-疾風伝.mkv
【222】「晓之始动」.NARUTO-ナルト-疾風伝.mkv
【223】「修行的成果」.NARUTO-ナルト-疾風伝.mkv
【224】「砂之人柱力」.NARUTO-ナルト-疾風伝.mkv
【225】「作为风影」.NARUTO-ナルト-疾風伝.mkv
.....
求大佬给个批处理方法

作者: flashercs 时间: 2022-1-16 00:47

@echo off
cd /d "%~dp0"
set src="a.txt"
set dst="b.txt"
(
  for /f "usebackq tokens=1* delims=】" %%A in (%src%) do (
    echo.%%A「%%B
  )
)>%dst%
pause
exit /b
复制代码

作者: xp3000 时间: 2022-1-16 19:51

//&cls&dir /b *.txt|cscript -nologo -e:jscript "%~f0"&pause&exit

function reStr(file){
    var f = fso.opentextfile(file, 1);
    str = f.ReadAll().replace(/(】)([^「])/g, '$1「$2');
    f.Close();
    var f = fso.opentextfile(file, 2);
    f.Write(str);
}
var fso = new ActiveXObject('Scripting.FileSystemObject');
while(!WScript.StdIn.AtEndOfStream)reStr(WScript.StdIn.ReadLine());
复制代码

直接替换的，ANSI编码

欢迎光临批处理之家 (http://www.bathome.net/)