[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
本帖最后由 flashercs 于 2022-9-21 10:14 编辑
  1. 0<1/*,:
  2. @echo off
  3. cd /d "%~dp0"
  4. cscript -nologo -e:jscript "%~f0" "1.csv" "1.txt"
  5. pause
  6. exit /b
  7. */;
  8. if (WScript.Arguments.length < 2) WScript.Quit();
  9. var fso = new ActiveXObject('Scripting.FileSystemObject');
  10. var re = /(?:")([^"]*\.(?:txt|ini|bat|vbs))[^"]*"$/igm;
  11. try {
  12.   var tsread = fso.OpenTextFile(WScript.Arguments(0), 1, false, -2);
  13.   var str = tsread.ReadAll();
  14.   tsread.Close();
  15.   var tswrite = fso.OpenTextFile(WScript.Arguments(1), 2, true, -2);
  16.   var arr;
  17.   while (null != (arr = re.exec(str))) {
  18.     tswrite.WriteLine(arr[1]);
  19.   }
  20.   tswrite.Close();
  21. } catch (e) {
  22. }
复制代码
1

评分人数

微信:flashercs
QQ:49908356

TOP

返回列表