[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
回复 29# aloha20200628

支持哪些媒体文件?

TOP

回复 31# newswan

类同资源管理器各种媒体文件文件属性列表中的时长。可修改29楼代码中的*.mp4(扩展名),验证结果...

TOP

本帖最后由 qd2024 于 2024-1-29 23:04 编辑

回复 31# newswan


    常见 MP4  MOV   WMV  FLV  AVI  刚刚加了MP3文件测试成功 感谢

TOP

回复 27# aloha20200628

谢谢 MP4 测试成功
我尝试加上MP3的扩展名没有成功,
能否让代码支持更多这视频格式,包括音频mp3

TOP

回复  newswan


    这样   被拖到BAT上的文件夹A里 不包含 视频文件  A下有B C D等文件夹 B C D等文件 ...
qd2024 发表于 2024-1-29 20:02


这个题目有点意思,我也来练练手,欢迎测试。
1、增加了同时识别多种音频视频格式。
2、增加了文件个数统计。
3、需第3方FFmpeg,比系统自带识别格式更多。
4、避开08 09无效数字的bug
  1. @echo off
  2. setlocal enabledelayedexpansion
  3. set folder=%~1
  4. REM 请修改自己的实际路径
  5. set ffpath=D:\FFmpeg\ffmpeg.exe
  6. for /f "delims=" %%f in ('dir /b /ad "%~1"') do (
  7.     set /a  foldermin=0
  8.     set /a n=0
  9.     pushd "%~1"
  10.     REM 可添加多种格式,适用于一个文件夹内有多种格式的视频。
  11.     for /f "delims=" %%i in ('dir /b /s /a-d "%%f" ^| findstr /i ".mp3$ .mp4$ .avi$ .mkv$ .rmvb$ .wmv$ .flac$ .flv$"') do (
  12.         for /f "tokens=2 delims=, " %%a in ('%ffpath% -i "%%i" 2^>^&1 ^| findstr "Duration:"') do set "str=%%a"
  13.         set str=!str:~0,-3!
  14.         for /f "tokens=1-3 delims=:" %%x in ("!str!") do (
  15.             set "hh=%%x"
  16.             set "mm=%%y"
  17.             set "ss=%%z"
  18.             set /a minutes=1!hh!*60-6000
  19.             set /a minutes+=1!mm!-100
  20.             if !ss! neq 0 (set /a minutes+=1)
  21.         )
  22.         ::echo   !str!      !minutes!
  23.         set /a  foldermin+=!minutes!  
  24.         set /a n+=1
  25.     )
  26.     REM 执行更名,请去除 echo
  27.     echo ren "%%~f" "%%~nf【共!n!个视频,总时长!foldermin!分钟】"
  28.     set /a Totalmin+=!foldermin!
  29.     set /a Totaln+=!n!
  30.     popd
  31. )
  32. REM 执行更名,请去除 echo
  33. echo ren "%~1" "%~n1【共!Totaln!个视频,总时长!Totalmin!分钟】"
  34. pause
复制代码

TOP

回复 34# qd2024

27楼或29楼代码中的第5行》修改 *.mp4 为 *.mp? 即可包括 mp4/mp3 音视频文件
如果子目录中全是常见类型的音视频文件(mp4/mkv/avi/wmv/vob/ts/mpg/mp3/flac/wav/...),可修改为 *.* 通配符涵盖所有文件。

TOP

支持多级文件夹
  1. @echo off
  2. setlocal ENABLEDELAYEDEXPANSION
  3. chcp 936
  4. set ffPath=D:\Program Files
  5. set folderPath=%~dp1
  6. set folderName=%~nx1
  7. pushd "%folderPath%"
  8. call :C_get-Duration "%folderName%" time
  9. popd
  10. pause
  11. exit/b
  12. Usage: %0 <folder> <return:duration>
  13. :C_get-Duration
  14. setlocal
  15. set folderName=%~1
  16. pushd "%folderName%"
  17. set/a level+=1
  18. echo,
  19. echo ----  %level%  %CD%  ----
  20. set timeSubfolderAll=0
  21. for /f "usebackq tokens=* delims=" %%a in (` 2^>nul dir /b /ad . `) do (
  22. echo "%%a"
  23. if not "%%a" == "" (
  24. call :C_get-Duration "%%a" timeSubfolder
  25. set/a timeSubfolderAll+=!timeSubfolder!
  26. )
  27. )
  28. echo "--1--"
  29. set time=0
  30. for /f "usebackq tokens=* delims=" %%a in (` 2^>nul dir /b *.mp4 `) do (
  31. for /f "usebackq" %%i in (`" "%ffpath%\ffprobe.exe" -v error -show_entries format=duration -of default=noprint_wrappers=1:nokey=1 "%%a" "`) do (
  32. set time=!time! + %%i
  33. )
  34. )
  35. for /f "usebackq" %%a in (` powershell -command " [math]::Ceiling( (%time%) / 60 ) " `) do (
  36. set time=%%a
  37. )
  38. echo %time%
  39. echo "--2--"
  40. set/a time=0
  41. for /f "usebackq tokens=* delims=" %%a in (` 2^>nul dir /b *.mp4 `) do (
  42. for /f "usebackq tokens=1,2 delims=." %%i in (`" "%ffpath%\ffprobe.exe" -v error -show_entries format=duration -of default=noprint_wrappers=1:nokey=1 "%%a" "`) do (
  43. set/a time+=%%i
  44. )
  45. )
  46. set/a time/=60
  47. set/a q=%time%%60
  48. if %q% gtr 0 (set/a time+=1)
  49. echo %time%
  50. echo "--3--"
  51. set/a time=0
  52. for /f "usebackq tokens=* delims=" %%a in (` 2^>nul dir /b *.mp4 `) do (
  53. for /f "usebackq tokens=2,3,4 delims=:. " %%i in (` ""%ffpath%\ffprobe.exe" "%%a" 2>&1 | findstr Duration" `) do (
  54. set/a time+=1%%i*3600+1%%j*60+1%%k-100*3600-100*60-100
  55. )
  56. )
  57. set/a time/=60
  58. set/a q=%time%%60
  59. if %q% gtr 0 (set/a time+=1)
  60. echo %time%
  61. set/a time+=%timeSubfolderAll%
  62. popd
  63. set/a level-=1
  64. echo,
  65. echo ----  %level%  %CD%  ----
  66. echo ren "%folderName%" "%folderName%[%time%]"
  67. echo,
  68. (
  69. endlocal
  70. set %2=%time%
  71. )
  72. goto :eof
复制代码

TOP

第二种比较合适这个需求

TOP

返回列表