[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
  1. @if(0)==(0) echo off
  2. rem 保存为ANSI编码的BAT文件
  3. dir /b *.txt|cscript -nologo -e:jscript "%~0"
  4. pause & exit/b
  5. @end
  6. fso = new ActiveXObject("Scripting.FileSystemObject");
  7. var f = WSH.StdIn.ReadLine();
  8. var Name = f.match(/^(^.+)\.[^\r\n]+/)[1];
  9. var inFile = fso.OpenTextFile(f, 1, false);
  10. var outFile = fso.CreateTextFile(Name + ".log", true);
  11. var dict = {};
  12. while (!inFile.AtEndOfStream) {
  13.   var line = inFile.ReadLine();
  14.   var parts = line.split(/\s+/);
  15.   var key = parts[0];
  16.   var value = parts[1];
  17.   
  18.   if (dict[key] === undefined) {
  19.     dict[key] = 1;
  20.   } else {
  21.     dict[key]++;
  22.   }
  23.   
  24.   var newLine = key + dict[key] + "\t" + value;
  25.   outFile.WriteLine(newLine);
  26. }
  27. inFile.Close();
  28. outFile.Close();
复制代码
1

评分人数

TOP

返回列表