[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
BAT+js 练手
不显示文件名的话 去掉代码15行 处 “f,”
  1. @if(0)==(0) echo off
  2. dir/b *.mp3|cscript -nologo -e:jscript %0
  3. pause & exit
  4. @end
  5. pad = function(tbl) {  
  6.   return function(num, n) {  
  7.     return (0 >= (n = n-num.toString().length)) ? num : (tbl[n] || (tbl[n] = Array(n+1).join(0))) + num;  
  8.   }  
  9. }([]);
  10. WMP = new ActiveXObject("WMPlayer.OCX");
  11. while (!WScript.StdIn.AtEndOfStream) {
  12.     var f = WScript.StdIn.ReadLine();
  13.     var t = WMP.newMedia(f).GetItemInfo("Duration");
  14.     var h = parseInt(t/3600),m = parseInt(t%60),t = parseInt(t%3600/60);
  15.     WSH.Echo(f,[pad(h,2),pad(t,2),pad(m,2)].join(':'))
  16. }
复制代码

TOP

返回列表