Visual Basic - Buscar archivo en el disco

Life is soft - evento anual de software empresarial
   
Vista:

Buscar archivo en el disco

Publicado por manuel (2 intervenciones) el 13/06/2017 11:50:45
Hola a todos.

Me gustaría saber como podría saber si existe una carpeta con un Codigo + nombre del producto del tipo 30011 - XXXXXX,
donde XXX puede ser cualquier nombre. Utilizando la función dir para buscar el nombre completo, pero si hay una pequeña variación nombre no lo encuentra. ¿Como podría hacerlo? He probado a poner un * y elminando el nombre dejando solo el código*, pero no funciona. Necesito ayhuda...por favor. Dejo el código abajo

Gracias!

1
2
3
4
5
6
7
Ruta = "Z:\Especificaciones\" & Cliente & "\Productos\" & Cod & "*"
 
If Dir(Ruta, vbDirectory) <> "" Then
MsgBox ("Existe")
Else
MsgBox ("Vacio")
End If
GoTo Exit_salir_Click
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
Imágen de perfil de Antoni Masana

Buscar archivo en el disco

Publicado por Antoni Masana (258 intervenciones) el 14/06/2017 06:52:32
Prueba esto: Buscar *código* o *código*.*

1
2
3
4
5
6
7
Ruta = "Z:\Especificaciones\" & Cliente & "\Productos\*" & Cod & "*"
 
If Dir(Ruta, vbDirectory) <> "" Then
MsgBox ("Existe")
Else
MsgBox ("Vacio")
End If
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar

Buscar archivo en el disco

Publicado por manuel (2 intervenciones) el 14/06/2017 11:11:47
Muchisimas gracias.

Funcionó con el *código*.*

Un saludo!
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