Ver Mensaje Individual
  #1 (permalink)  
Antiguo 14/04/2007, 06:29
ignacioel
 
Fecha de Ingreso: abril-2007
Mensajes: 18
Antigüedad: 18 años
Puntos: 0
Eliminar ficheros que no sean de fecha hoy mediante fso

Teniendo este codigo, esta bien la comparacion de fechas?Se eliminaria asi cada fichero si no cumple la condicion de ser modificado los ultimos dos dias?


If folder.Size > 0 Then
For Each file In folder.Files
if Date>left(file.DateLastModified+2,10) then
file.Delete
end if
Next


Gracias

Última edición por ignacioel; 14/04/2007 a las 08:46