Hoje vou mostrar como buscar informações de duração de arquivos via Prompt de Comando sem instalar programas terceiros.
Para realizar essa operação, é necessário criar um script em VB, porém ressalto que existem ferramentas de terceiros onde é possível fazer também esses procedimentos, aqui quis demonstrar da maneira mais padrão possível no Windows.
Para ter uma base, peguei uma pasta que eu tenho em meu OneDrive, vejam abaixo o print da duração dos arquivos:
Exemplo dos arquivos
1 – Crie um arquivo com o nome com extensão vbs, por exemplo, myscript.vbs
2 – Dentro desse arquivo, coloque o seguinte código:
Set objFS = CreateObject("Scripting.FileSystemObject")
Set objPlayer = createobject("wmplayer.ocx.7")
strFolder=CreateObject("Scripting.FileSystemObject").GetParentFolderName(WScript.ScriptFullName)
Set objFolder = objFS.GetFolder(strFolder)
For Each strFile In objFolder.Files
If objFS.GetExtensionName(strFile) = "mp4" Then
strFileName = strFile.Path
WScript.Echo ConvertTime(objPlayer.mediaCollection.add(strFileName).duration)
End If
Next
objPlayer.close
'************************************************************
Function ConvertTime(intTotalSecs)
Dim intHours,intMinutes,intSeconds,Time
intHours = intTotalSecs \ 3600
intMinutes = (intTotalSecs Mod 3600) \ 60
intSeconds = intTotalSecs Mod 60
ConvertTime = LPad(intHours) & ":" & LPad(intMinutes) & ":" & LPad(intSeconds) & ""
End Function
'************************************************************
Function LPad(v)
LPad = Right("0" & v, 2)
End Function
'************************************************************
3 – Na linha 6, mude de mp4 para qualquer outra extensão que você queira testar
4 – Coloque esse script dentro da pasta que tem os arquivos que você quer retornar o tamanho
5 – Via prompt de comando, acesse a pasta que tem o script, e execute ele com o comando cscript //nologo myscript.vbs
6 – O resultado será uma lista com todas as durações, conforme abaixo:
Pegando a duração via comando
Referências:
Bom pessoal, por hoje é só.
Abraços e até a próxima.
