[已解决]如何获取指定文件夹下全部MP3文件的播放时长的总和

a1999zqw

求某个文件夹下全部MP3文件的播放时长的总和，谢谢老师

pcl_test

1. //&cls&dir /b *.mp3|cscript -nologo -e:jscript "%~f0"&pause&exit
   
2. 
   
3. function addZero(n){return n<10?'0'+n:n}
   
4. 
   
5. function formatSum(t){
   
6.     var r = t.split('.');
   
7.     r[1]=r[1]?r[1]:'0'
   
8.     var hour = parseInt(r[0]/3600);
   
9.     var minute = parseInt((r[0]-hour*3600)/60);
   
10.     var second = parseInt((r[0]-hour*3600)%60);
    
11.     return addZero(hour)+':'+addZero(minute)+':'+addZero(second)+'.'+r[1]
    
12. }
    
13. 
    
14. var s=0, wo = new ActiveXObject('WMPlayer.OCX');
    
15. while (!WScript.StdIn.AtEndOfStream){
    
16.     var f = WScript.StdIn.ReadLine();
    
17.     var t = wo.newMedia(f).GetItemInfo("Duration");
    
18.     //WScript.StdOut.WriteLine(f+'|'+t);
    
19.     s = Number((s+parseFloat(t)).toFixed(3));
    
20. }
    
21. WScript.StdOut.WriteLine(formatSum(s.toString()));

复制代码

a1999zqw

感谢版主，哪里输入或替换成我要的文件夹，谢谢？

pcl_test

回复 3# a1999zqw

把批处理文件跟mp3文件放一起运行或修改//&cls&pushd "D:\指定目录\"&dir /b……

happy886rr

码率折算法，参数可自由设置，跟mp3放一起

1. 
   
2. @echo off&setlocal enabledelayedexpansion
   
3. ::***************************
   
4. REM 设置阈值
   
5. set Thrs=6000000
   
6. REM 设置主流码率
   
7. set pop=128   ^kbps
   
8. REM 设置加权码率
   
9. set weig=256  ^kbps
   
10. ::***************************
    
11. for %%a in (*.mp3) do (
    
12.         set size=%%~za
    
13.         if !size! gtr !Thrs! (set bps=!weig!) else (set bps=!pop!)
    
14.         set /a sec=size/bps*8/1024+sec
    
15. )
    
16. set /a min=sec/60
    
17. echo 总计 !sec!秒
    
18. echo 约合 !min!分钟
    
19. pause>nul
    

复制代码

回复 3# a1999zqw

WHY

第三方 tag.exe
http://batch-cn.qiniudn.com/s/tool/?key=tag

1. @echo off
   
2. setlocal enabledelayedexpansion
   
3. for /f "tokens=8" %%i in ('tag E:\音乐\*.mp3 2^>^&1^|findstr /b "Details:"')do (
   
4.     set "t=%%i"
   
5.     set /a "s+=(1!t::=-100)*60+1!-100"
   
6. )
   
7. set /a hh=s/3600+100, mm=s%%3600/60+100, ss=s%%60+100
   
8. echo !hh:~1!:!mm:~1!:!ss:~1!
   
9. pause

复制代码

a1999zqw

感谢各位老师，谢谢啦

a1999zqw

2楼代码如何输出到指定文本？

gawk

我也是瞎猜的，随便试试吧。

//&cls&dir /b *.mp3|cscript -nologo -e:jscript "%~f0" > "C:\1.txt" &pause&exit
……

ddrwin

pcl_test 发表于 2016-3-26 17:52

    这个脚本也可以处理视频文件时长，真是太好了！谢谢大大！

609980218

又学一招，谢谢大大！