Autoit.ES

Publicado: **30 Mar 2017, 00:36**

Hola otra ves resulta que estoy usando el comando

 FileFindFirstFile ()

para listar el contenido de una carpeta pero solo lo ques videos el problema es que no todos los videos son ".mp4" tanbiem existen ".avi" y otros formatos. y no logro aserlo funcionar . les dejo un ejemplo.

Código: Seleccionar todo

Local $hSearch = FileFindFirstFile ("*.mp4","*.avi","*.wmv")

	; Check if the search was successful, if not display a message and return False.
	If $hSearch = -1 Then
		MsgBox($MB_SYSTEMMODAL, "", "Error: No files/directories matched the search pattern.")
		Return False
	EndIf
Local $sFileName = "", $iResult = 0
While 1
		$sFileName = FileFindNextFile($hSearch)
		; If there is no more file matching the search.
		If @error Then ExitLoop
WEnd

el codigo en si da error .

otra duda es como octener el nombre del video sin su extencion ejemplo "casa.avi" a solo "casa"
espero su ayuda gracias

Publicado: **30 Mar 2017, 01:29**

Hola. AutoIt contiene una serie de funciones prescritas que te pueden ayudar mucho. En tu caso puedes usar algo así:

Código: Seleccionar todo

#include <File.au3>
#include <Array.au3>
#include <File.au3>

Local $sDirectory = "D:\Musica\"

Local $aFiles= _FileListToArrayRec($sDirectory, "*.wmv;*.mp4;*.avi", $FLTAR_FILES, $FLTAR_NORECUR,$FLTAR_NOSORT,$FLTAR_FULLPATH)
_ArrayDisplay( $aFiles, "Videos") ;Just for debug


;Escribir Obetener El nombre del video
Local $sDrive = "", $sDir = "", $sFileName = "", $sExtension = ""
Local $aPathSplit = ""
For $i=1 to  $aFiles[0]
	$aPathSplit=_PathSplit($aFiles[$i], $sDrive, $sDir, $sFileName, $sExtension)
	ConsoleWrite("FileName: " & $sFileName & @TAB  & "FileName without Extension: " & $sFileName & $sExtension  & @CRLF)
Next

Saludos

Autoit.ES

listar videos dentro de una carpeta usando FileFindFirstFile

listar videos dentro de una carpeta usando FileFindFirstFile

Re: listar videos dentro de una carpeta usando FileFindFirst