RENOMBRAR FICHEROS AÑADIENDO FECHA DEL SISTEMA AL COPIARLOS A OTRA CARPETA
Publicado por Azul33 (2 intervenciones) el 18/05/2016 17:08:32
Hola a todos, amigos necesito ayuda, el problema lo planteo a través del siguiente ejemplo:
Necesito copiar TODOS los ficheros de distintas extensiones .pdf, .docx .txt .xlsx etc) de CARPETA1 a CARPETA2 con el nombre de los ficheros renombrados, solamente añadiendo al nombre de los ficheros la fecha actual del sistema. Es decir, C:\CARPETA1\ARCHIVO.txt "copiado a" C:\CARPETA2\ARCHIVO18-05-2016.txt
fso.CopyFile "C:\CARPETA1\*.*", "C:\CARPETA2\" 'acá copia TODOS los archivos pero no añade la fecha a los nombres de los archivos.
Se que con la función Format$(Date, "dd-mm-yyyy") tal ves se pueda pero no la he podido utilizar correctamente pues he echo cosas como:
fso.CopyFile "C:\CARPETA1\*.*", "C:\CARPETA2\" & Format$(Date, "ddmmyyyy") 'pero me genera errores (no se ha encontrado la ruta de aceso)
De Antemano Gracias por sus Ayudas... Estoy aprendiendo : )
Necesito copiar TODOS los ficheros de distintas extensiones .pdf, .docx .txt .xlsx etc) de CARPETA1 a CARPETA2 con el nombre de los ficheros renombrados, solamente añadiendo al nombre de los ficheros la fecha actual del sistema. Es decir, C:\CARPETA1\ARCHIVO.txt "copiado a" C:\CARPETA2\ARCHIVO18-05-2016.txt
fso.CopyFile "C:\CARPETA1\*.*", "C:\CARPETA2\" 'acá copia TODOS los archivos pero no añade la fecha a los nombres de los archivos.
Se que con la función Format$(Date, "dd-mm-yyyy") tal ves se pueda pero no la he podido utilizar correctamente pues he echo cosas como:
fso.CopyFile "C:\CARPETA1\*.*", "C:\CARPETA2\" & Format$(Date, "ddmmyyyy") 'pero me genera errores (no se ha encontrado la ruta de aceso)
De Antemano Gracias por sus Ayudas... Estoy aprendiendo : )
Valora esta pregunta
0