[文本处理] [已解决]批处理如何在文本中多个指定重复的字符串后面加上系列数字？

wzf1024

如题，比如有文本：
alkdfjalsdfj兰朵alsdkfj兰朵
alsdkfjad兰朵asdfjlasdjfljasd……

想给“兰朵”这个词后面加序号，从3开始，递增1，处理后得到
alkdfjalsdfj兰朵_3alsdkfj兰朵_4
alsdkfjad兰朵_5asdfjlasdjfljasd……

pcl_test

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

function reStr(file){
    var f = fso.opentextfile(file, 1);
    var n=3, str = f.ReadAll().replace(/兰朵/g, function($0){
        var t = $0+'_'+n;n++;return t
    });
    f.Close();
    WSH.echo(str);
    /*覆盖写入原文件
    var f = fso.opentextfile(file, 2);
    f.Write(str);
    */
}
var fso = new ActiveXObject('Scripting.FileSystemObject');
while(!WScript.StdIn.AtEndOfStream)reStr(WScript.StdIn.ReadLine());
复制代码

wzf1024

回复 2# pcl_test


    老大，源文件没有变化

pcl_test

回复 3# wzf1024

输出到新文件或是去掉注释符，别问我具体怎么做

wzf1024

回复 4# pcl_test


   只能处理bat所在文件夹的文件，子文件夹下的文件如何处理？

wzf1024

喔，知道了，加个/s
谢谢pcl_test ！！
明天给你分，今天用完了，呵呵