Jump to content

View duration of video file.

Belini
 Share

Recommended Posts

Belini Universalist

Belini

Posted
Posted

I can not see the duration of MP4 and AVI files, only works with MPG files can anyone help?

#include <Sound.au3>
$sFile = FileOpenDialog("", @ScriptDir, "Musicas (*.mpg;*.mp4;*.avi)", 1 + 4)
$musica = StringTrimLeft($sFile,StringInStr($sFile,"\",2,-1))
$sound = _SoundOpen($sFile)
$FileName = '"' & $sFile & '"'
mciSendString("Open " & $FileName & " alias MediaFile")
mciSendString("Set MediaFile time format milliseconds")
$tempo_miliseg = mciSendString("Status MediaFile length")
mciSendString("Close MediaFile")
$Mins = Int($tempo_miliseg / 60000)
$segundos = Int($tempo_miliseg / 1000)
$Segs = Int($segundos - ($Mins * 60))
MsgBox(0, "Time", $Mins & " minutes and " & $Segs & " seconds")
Func mciSendString($string)
$ret = DllCall(".\winmm.dll", "int", "mciSendString", "str", $string, "str", "", "int", 65534, "hwnd", 0)
If Not @error Then Return $ret[2]
EndFunc

My Codes:

 

Virtual Key Code UDF: http://www.autoitscript.com/forum/topic/138246-virtual-key-code-udf/

GuiSplashTextOn.au3: http://www.autoitscript.com/forum/topic/143542-guisplashtexton-udf/

Menu versions of Autoit: http://www.autoitscript.com/forum/topic/137435-menu-versions-of-autoit/#entry962011

Selects first folder of letters: ]http://www.autoitscript.com/forum/topic/144780-select-folders-by-letter/#entry1021708/spoiler]

List files and folders with long addresses.: http://www.autoitscript.com/forum/topic/144910-list-files-and-folders-with-long-addresses/#entry102   2926

Program JUKEBOX made in Autoit:

some functions:http://www.youtube.com/watch?v=WJ2tC2fD5Qs

Navigation to search:http://www.youtube.com/watch?v=lblwOFIbgtQ

 

 

Link to comment
Share on other sites
Belini Universalist

Belini

Posted
  • Author
Posted

UDF returns only duration of MP3 files, video does not show duration.

My Codes:

 

Virtual Key Code UDF: http://www.autoitscript.com/forum/topic/138246-virtual-key-code-udf/

GuiSplashTextOn.au3: http://www.autoitscript.com/forum/topic/143542-guisplashtexton-udf/

Menu versions of Autoit: http://www.autoitscript.com/forum/topic/137435-menu-versions-of-autoit/#entry962011

Selects first folder of letters: ]http://www.autoitscript.com/forum/topic/144780-select-folders-by-letter/#entry1021708/spoiler]

List files and folders with long addresses.: http://www.autoitscript.com/forum/topic/144910-list-files-and-folders-with-long-addresses/#entry102   2926

Program JUKEBOX made in Autoit:

some functions:http://www.youtube.com/watch?v=WJ2tC2fD5Qs

Navigation to search:http://www.youtube.com/watch?v=lblwOFIbgtQ

 

 

Link to comment
Share on other sites
Belini Universalist

Belini

Posted
  • Author
Posted (edited)

Thank matwachich and wakillon I used the example posted by wakillon and it worked perfectly.

Where can I thank you click?

Edited by Belini

My Codes:

 

Virtual Key Code UDF: http://www.autoitscript.com/forum/topic/138246-virtual-key-code-udf/

GuiSplashTextOn.au3: http://www.autoitscript.com/forum/topic/143542-guisplashtexton-udf/

Menu versions of Autoit: http://www.autoitscript.com/forum/topic/137435-menu-versions-of-autoit/#entry962011

Selects first folder of letters: ]http://www.autoitscript.com/forum/topic/144780-select-folders-by-letter/#entry1021708/spoiler]

List files and folders with long addresses.: http://www.autoitscript.com/forum/topic/144910-list-files-and-folders-with-long-addresses/#entry102   2926

Program JUKEBOX made in Autoit:

some functions:http://www.youtube.com/watch?v=WJ2tC2fD5Qs

Navigation to search:http://www.youtube.com/watch?v=lblwOFIbgtQ

 

 

Link to comment
Share on other sites
guinness Universalist

guinness

Posted
Posted

OR this >> (Not tested.)

I posted in the wrong forum. Sorry.

UDF List:

 
_AdapterConnections() • _AlwaysRun() • _AppMon() • _AppMonEx() • _ArrayFilter/_ArrayReduce • _BinaryBin() • _CheckMsgBox() • _CmdLineRaw() • _ContextMenu() • _ConvertLHWebColor()/_ConvertSHWebColor() • _DesktopDimensions() • _DisplayPassword() • _DotNet_Load()/_DotNet_Unload() • _Fibonacci() • _FileCompare() • _FileCompareContents() • _FileNameByHandle() • _FilePrefix/SRE() • _FindInFile() • _GetBackgroundColor()/_SetBackgroundColor() • _GetConrolID() • _GetCtrlClass() • _GetDirectoryFormat() • _GetDriveMediaType() • _GetFilename()/_GetFilenameExt() • _GetHardwareID() • _GetIP() • _GetIP_Country() • _GetOSLanguage() • _GetSavedSource() • _GetStringSize() • _GetSystemPaths() • _GetURLImage() • _GIFImage() • _GoogleWeather() • _GUICtrlCreateGroup() • _GUICtrlListBox_CreateArray() • _GUICtrlListView_CreateArray() • _GUICtrlListView_SaveCSV() • _GUICtrlListView_SaveHTML() • _GUICtrlListView_SaveTxt() • _GUICtrlListView_SaveXML() • _GUICtrlMenu_Recent() • _GUICtrlMenu_SetItemImage() • _GUICtrlTreeView_CreateArray() • _GUIDisable() • _GUIImageList_SetIconFromHandle() • _GUIRegisterMsg() • _GUISetIcon() • _Icon_Clear()/_Icon_Set() • _IdleTime() • _InetGet() • _InetGetGUI() • _InetGetProgress() • _IPDetails() • _IsFileOlder() • _IsGUID() • _IsHex() • _IsPalindrome() • _IsRegKey() • _IsStringRegExp() • _IsSystemDrive() • _IsUPX() • _IsValidType() • _IsWebColor() • _Language() • _Log() • _MicrosoftInternetConnectivity() • _MSDNDataType() • _PathFull/GetRelative/Split() • _PathSplitEx() • _PrintFromArray() • _ProgressSetMarquee() • _ReDim() • _RockPaperScissors()/_RockPaperScissorsLizardSpock() • _ScrollingCredits • _SelfDelete() • _SelfRename() • _SelfUpdate() • _SendTo() • _ShellAll() • _ShellFile() • _ShellFolder() • _SingletonHWID() • _SingletonPID() • _Startup() • _StringCompact() • _StringIsValid() • _StringRegExpMetaCharacters() • _StringReplaceWholeWord() • _StringStripChars() • _Temperature() • _TrialPeriod() • _UKToUSDate()/_USToUKDate() • _WinAPI_Create_CTL_CODE() • _WinAPI_CreateGUID() • _WMIDateStringToDate()/_DateToWMIDateString() • Au3 script parsing • AutoIt Search • AutoIt3 Portable • AutoIt3WrapperToPragma • AutoItWinGetTitle()/AutoItWinSetTitle() • Coding • DirToHTML5 • FileInstallr • FileReadLastChars() • GeoIP database • GUI - Only Close Button • GUI Examples • GUICtrlDeleteImage() • GUICtrlGetBkColor() • GUICtrlGetStyle() • GUIEvents • GUIGetBkColor() • Int_Parse() & Int_TryParse() • IsISBN() • LockFile() • Mapping CtrlIDs • OOP in AutoIt • ParseHeadersToSciTE() • PasswordValid • PasteBin • Posts Per Day • PreExpand • Protect Globals • Queue() • Resource Update • ResourcesEx • SciTE Jump • Settings INI • SHELLHOOK • Shunting-Yard • Signature Creator • Stack() • Stopwatch() • StringAddLF()/StringStripLF() • StringEOLToCRLF() • VSCROLL • WM_COPYDATA • More Examples...

Updated: 22/04/2018

Link to comment
Share on other sites
Belini Universalist

Belini

Posted
  • Author
Posted

Thanks I will test guinness.

My Codes:

 

Virtual Key Code UDF: http://www.autoitscript.com/forum/topic/138246-virtual-key-code-udf/

GuiSplashTextOn.au3: http://www.autoitscript.com/forum/topic/143542-guisplashtexton-udf/

Menu versions of Autoit: http://www.autoitscript.com/forum/topic/137435-menu-versions-of-autoit/#entry962011

Selects first folder of letters: ]http://www.autoitscript.com/forum/topic/144780-select-folders-by-letter/#entry1021708/spoiler]

List files and folders with long addresses.: http://www.autoitscript.com/forum/topic/144910-list-files-and-folders-with-long-addresses/#entry102   2926

Program JUKEBOX made in Autoit:

some functions:http://www.youtube.com/watch?v=WJ2tC2fD5Qs

Navigation to search:http://www.youtube.com/watch?v=lblwOFIbgtQ

 

 

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share
Go to topic listing

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...