
14/04/2007, 06:29
|
| | 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 |