[文本处理] 求助批处理根据wav时长，找比它长一点的mp3

877

已知：A目录下-多子文件夹内各有一个wav

另外指定的D盘\mp3目录有N个长短不一的mp3文件

想实现用批处理，从D盘\mp3目录各移动一个到相应的A目录下-多子文件夹内。(形成各子文件夹内1个wav和1个mp3)

要求所移动的mp3时长要比wav时长*长一点。

求大佬指教~

czjt1234

怎么样才算是长一点，而不是长了两点

877

回复 2# czjt1234


    大佬好，加1秒~300秒都算，因为mp3文件夹里面太多音频了~

  求大佬帮忙☕

terse

试一下BAT_JS混编呢

@set @x=0 /* @echo off&cscript -nologo -e:jscript %0 "D:\mp3" "E:\data" & pause & exit */
var pad = function (n) { return ('0'+Math.floor(n)).slice(-2)}
var fso=new ActiveXObject("Scripting.FileSystemObject");
var WMP = new ActiveXObject("WMPlayer.OCX");
var i = 0, mediaFiles = [];

var Folder=fso.GetFolder(WScript.Arguments.Item(0));
for(var e=new Enumerator(Folder.Files);!e.atEnd();e.moveNext()){
      var f=e.item();
      var ext = f.Name.split('.').pop().toLowerCase();
      if (ext === 'mp3') {
            mediaFiles[i++] = {file: f, duration: Math.floor(WMP.newMedia(f).GetItemInfo("Duration"))};
      }
}

mediaFiles.sort(function(a, b) { return a.duration - b.duration});

function binarySearch(mediaFiles, t) {
       var left = 0, right = mediaFiles.length - 1;
       while (left < right) {
           var mid = Math.floor((left + right) >> 1);
           if (mediaFiles[mid].duration > t) {
                right = mid;
           } else {
                left = mid + 1;
           }
       }
       return (left < mediaFiles.length) ? left : null;
}

var Folder=fso.GetFolder(WScript.Arguments.Item(1));
for(var e=new Enumerator(Folder.SubFolders);!e.atEnd();e.moveNext()){
      var subFolder=e.item();
      for(var f=new Enumerator(subFolder.Files);!f.atEnd();f.moveNext()){
            var file=f.item();
            var ext = file.Name.split('.').pop().toLowerCase();
            if (ext === 'wav') {
                  var t = WMP.newMedia(file).GetItemInfo("Duration");
                  var FileIndex = binarySearch(mediaFiles, t);
                  if (FileIndex !== null) {
                        var ToFile = mediaFiles[FileIndex];
                        fso.CopyFile(ToFile.file, subFolder+'\\');
                        mediaFiles.splice(FileIndex, 1);
                  }
            }
      }
}
复制代码

877

回复 4# terse


    感谢大佬，虽然看不懂，但是还是想问下，单独bat代码可以实现吗？

terse

回复 5# 877
保存为BAT文件 第一排这里的路径 自己修改一下  "D:\mp3" "E:\data"

877

回复 6# terse


    感谢大佬，测试成功了！万分感谢！