Pregunta: | 3790 - PROPIEDADES DE ARCHIVOS |
Autor: | Daniel Rendon |
Necesito saber las propiedades de un archivo como fecha de modificacion y tamaño de una carpeta de un cliente para comprar el archivo con otro en un servidor y actualizarlo si las fechas son diferentes. |
Respuesta: | Nicolas |
Una forma facil de leer la fecha de modificacion, ultimo acceso y creacion de un archivo, y el tamaño de una carpeta es usando el FileSystemObject. Para usarlo tenes que crear una referencia a "Microsoft Scripting Runtime". El codigo a usar seria mas o menos como este: Dim FS As FileSystemObject, Archivo As File Set FS = New FileSystemObject Set Archivo = FS.GetFile("ruta del archivo") ´esto imprime en la ventana la fecha de su ultima modificacion Print Archivo.DateLastModified Para saber el tamaño de una carpeta: Dim Carpeta As Folder Set Carpeta = FS.GetFolder("ruta de la carpeta") ´imprime en la ventana el tamaño Print Carpeta.Size En cuanto al tema del cliente y el servidor nunca hice ninguna prueba porque no tengo una red para probarlo. Espero que lo demas te sirva. |