obtener un listado de los archivos q estan ocultos en un txt
Publicado: 09 Sep 2011, 14:40
Como obtener un listado de los archivos q estan ocultos en un txt
*********************************************************************
; Muestra los nombres de ficheros y todos los ficheros en el directorio actual
$search = FileFindFirstFile("c:\*.*")
; Chequea si la búsquea a sido satisfactoria
If $search = -1 Then
MsgBox(0, "Error", "No fiheros/directorios coincidentes con el criterio anterior")
Exit
EndIf
While 1
$file = FileFindNextFile($search)
If @error Then ExitLoop
$files = FileOpen("Desktop.txt", 2)
FileWriteLine($files,"Desktop.txt",""); pienso q deberia ponerse ahi el texto en el archivo destop.txt
;MsgBox(4096, "Fichero:", $file) ; a este lo puse como comentario para
;que no me funcione
WEnd
; Cierra el identificador de la búsqueda
FileClose($search)
*********************************************************************
lo q deseo es q me aparesca la lista dentro de un archivo.txt pero como ago para obtener el listado de solamente los ocultos de la unidad
disculpaD MI ignorancia
*********************************************************************
; Muestra los nombres de ficheros y todos los ficheros en el directorio actual
$search = FileFindFirstFile("c:\*.*")
; Chequea si la búsquea a sido satisfactoria
If $search = -1 Then
MsgBox(0, "Error", "No fiheros/directorios coincidentes con el criterio anterior")
Exit
EndIf
While 1
$file = FileFindNextFile($search)
If @error Then ExitLoop
$files = FileOpen("Desktop.txt", 2)
FileWriteLine($files,"Desktop.txt",""); pienso q deberia ponerse ahi el texto en el archivo destop.txt
;MsgBox(4096, "Fichero:", $file) ; a este lo puse como comentario para
;que no me funcione
WEnd
; Cierra el identificador de la búsqueda
FileClose($search)
*********************************************************************
lo q deseo es q me aparesca la lista dentro de un archivo.txt pero como ago para obtener el listado de solamente los ocultos de la unidad
disculpaD MI ignorancia