Visual Basic - Mejorar un bucle Do while para hacer referencia de imagenes

Life is soft - evento anual de software empresarial
   
Vista:

Mejorar un bucle Do while para hacer referencia de imagenes

Publicado por Gonzalo gonzalo-castillo@hotmail.es (6 intervenciones) el 28/10/2015 16:46:51
Hola buenas tardes comunidad mi duda sustancial en este caso como se podría referenciar la imagen envede copiarla para mejorar el proceso de importación de mi aplicación. Cualquier posible solución sera bien recibida
saludos.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
MyPath = "C:\Estafeta\Sync_Google_Drive\Firmas\"
   MyFile = Dir(MyPath)
 
   Do While MyFile <> ""
         If MyFile Like "*.png" Then
            FileCopy path_modo_ruta_importar & MyFile, var_Ruta_Deposito_Docs & MyFile
         End If
         MyFile = Dir
    Loop
 
    MyPath = "C:\Estafeta\Sync_Google_Drive\Firmas\"
    MyFile = Dir(MyPath)
 
    Do While MyFile <> ""
         If MyFile Like "*.txt" Then
            FileCopy path_modo_ruta_importar & MyFile, var_Ruta_Deposito_Docs & MyFile
         End If
         MyFile = Dir
    Loop
End If
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