leer un archivo especifico dentro de una carpeta en donde hay mas de ese tipo

loquillo7 · #1 (**permalink**) 19/03/2007, 10:41

buenas amigos una pegunta quisera leer un archivo .dat el objetivo es este:

En una carpeta por decir "Ejemplos" tengo varios archivos .dat pero siempre va haber uno que empieze con "MC.." por ejemplo "MC7411102006.dat" y quisera leer los datos de adentro.

Como podria escoger justo ese archivo de todos los que existen dentro de esa carpeta muchas gracias.

Insomnia · #2 (**permalink**) 20/03/2007, 01:47

Hola

Puedes utilizar un FileListBox en el cual le dices que el .Pattern sea MC*.*, luego comprueba que solo exista un archivo en el FileListBox y luego obtienes su ruta con .Path y .List. Te dejo un ejemplo:

Código:

With File1
        .Path = "D:\MisDoc\Ejemplo"
        .Pattern = "MD*.*"
        If .List(0) = "" Then
            MsgBox "No se encontro el archivo"
        ElseIf .List(1) <> "" Then
            MsgBox "Existe mas de un archivo"
            Else
                Ruta = .Path & "\" & .List(0)
                AbrirDoc Ruta
        End If
   End With

--Saludos--

loquillo7 · #3 (**permalink**) 20/03/2007, 09:45

Estupendo funciono bien gracias.