funcion dir() para autoit :D
Publicado: 10 Feb 2011, 22:47
se que es una tontadilla.. pero necesitaba ver todos los archivos que contenia una carpeta, y no e encontrado ninguna funcion especifica para acer esto en au3, si no que tenias k acer unas cuantas virgerias... e unido estas virgerias y e creado esta mini funcion :P
es como el dir de ms-dos, en el unico argumento pones la direccion de la carpeta a examinar, y te devuelve una array con los nombres de todos los archivos, en la pos array[0] viene el numero de archivos que se an encontrado, si esto te da -1 es que no hay ningun archivo
espero ke os sea util ^^
es como el dir de ms-dos, en el unico argumento pones la direccion de la carpeta a examinar, y te devuelve una array con los nombres de todos los archivos, en la pos array[0] viene el numero de archivos que se an encontrado, si esto te da -1 es que no hay ningun archivo
espero ke os sea util ^^
Código: Seleccionar todo
Func dir($dir)
$dir &= "\*.*"
Local $n = 0, $arr[1]
$search = FileFindFirstFile($dir)
If $search = -1 Then
$arr[0] = -1
FileClose($search)
Return $arr
EndIf
While 1
$temp = FileFindNextFile($search)
If @error Then ExitLoop
$n += 1
ReDim $arr[$n+1]
$arr[$n] = $temp
$arr[0] = $n
WEnd
FileClose($search)
Return $arr
EndFunc