Programación General > VBA

 Búsqueda De Archivos

(1/1)

jgaleasm:
Hola a todos:
Necesito, desde VB6, recuperar todos los archivos con una extensión conocida (ejemplo m*.bak), que se ubiquen en un directorio y todos sus sub-directorios.
Estuve revisando los métodos del Filesystemobject, pero al parecer no tiene esa función.
¿alguien sabe cómo hacerlo?
Agradecido de antemano.

ArKaNtOs:
a que te refieres con recuperar?, saber si existen? lo puedes hacer con el comando dir


--- Código: Text ---if dir(ruta, vbDirectory) = "" then   msgbox el archivo no se encuentraelse   msgbox el archivo existeend if  :kicking:  :hola:

jgaleasm:
Se agradece de todos modos, pero lo que necesito es saber los nombres de todos los archivos (con una extensión conocida) que se encuentren bajo un directorio (también conocido) o sus subdirectorios.

Nebire:
monta un control file en el formulario (es como un listbox),

entonces le dices:

file1.path=ruta a la carpeta que quieres
file1.pattern= "archivo*.*a"  'se admiten comodines en cualquier parte
 de modo que si es bak haces "*.bak"

numFich=file1.listcount-1

numfich te indica todos los archivos que pasaron el filtro. si quieres que te aparezcan archivos ocultos y de sistema, tendrás que activar los atributos...

Navegación

[0] Índice de Mensajes