Access - Buscar todas las carpetas o archivos que se parezcan a

   
Vista:

Buscar todas las carpetas o archivos que se parezcan a

Publicado por Genaro lslaser@gmail.com (2 intervenciones) el 28/06/2016 03:51:55
Hola a todos.....

Quiero que me ayuden con esto. Perdonen si parezco estúpido, pero soy nuevo en programación, aunque ME ENCANTA!!!!

Tengo que buscar en un directorio todos los archivos que contegan un string. Yo tengo este que me funciona de perlas, pero solo me muestra 1 resultado. Si hubiesen más, quisiera que me los presentara.

a = Left(Identificador, 4)
B = Right(Identificador, 4)
Carpeta = Dir("S:\Google Drive\TuToner\Cutupu\" & "*" & a & "*" & "*" & B & "*", vbDirectory)
MsgBox Carpeta

Alguna ayuda? Por fa......
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

Buscar todas las carpetas o archivos que se parezcan a

Publicado por Enrique Heliodoro (1663 intervenciones) el 28/06/2016 20:26:50
La primera vez se necesita indicarle 'donde' comenzar la búsqueda, el resto (mientras no devuelva una cadena vacía) basta con 'Dir':


1
2
3
4
5
6
7
......
Carpeta = Dir("S:\Google Drive\TuToner\Cutupu\" & "*" & a & "*" & "*" & B & "*", vbDirectory)
Do
  IF carpeta ="" Then exit DO
  MsgBox Carpeta
  Carpeta = Dir
  Loop
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Buscar todas las carpetas o archivos que se parezcan a

Publicado por Genaro (2 intervenciones) el 28/06/2016 23:12:22
Gracias!!!!

Lo intentaré en unas horas y te diré como me ha ido, pero gracias de antemano por tu ayuda!!!!!
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar