[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
Test.js
  1. var srcFile = '1.txt';
  2. var dstFile = '2.txt';
  3. var obj = {}
  4. var fso = new ActiveXObject('Scripting.FileSystemObject');
  5. var str = fso.OpenTextFile(srcFile, 1).ReadAll();
  6. str = str.replace(
  7.     /^[a-z]+\b/mig,
  8.     function(s){
  9.         if( !obj.hasOwnProperty(s) ) obj[s] = 1;
  10.         return s + obj[s]++;
  11.     }
  12. );
  13. fso.OpenTextFile(dstFile, 2, true).Write(str);
  14. WSH.Echo('Done');
复制代码

TOP

返回列表