Comprobar archivo en carpeta
Publicado por Didac (27 intervenciones) el 25/04/2017 15:56:55
Hola a todos, estoy intentando crear una rutina para ver si existe un fichero en una carpeta y a si poder moverlo o no.
El tema de mover archivos ya lo tengo controlado, pero el tema de la comprobacion no me funciona con este codigo-
Alguien sabe si es la opcion correcta?
Muchas gracias
El tema de mover archivos ya lo tengo controlado, pero el tema de la comprobacion no me funciona con este codigo-
Alguien sabe si es la opcion correcta?
1
2
3
4
5
6
7
8
9
10
11
Private Sub Comando36_Click()
Dim ruta As String
ruta = "\\serverproduccio\Factory\BTC\DAT\Final\ccpt.dat"
If File.Exists(ruta) Then
MsgBox ("archivo existe")
Else
MsgBox ("archivo no existe")
End If
End Sub
Muchas gracias
Valora esta pregunta
0
