tips om dos-sletting av filer

[macro]

er det noen som kan gi meg oppskriften på en batch kommando som sletter filer som er eldre enn f.eks 7 dager i en gitt mappe? Jeg har en kopi mappe som jeg gjerne vil unngå at vokser over sine bredder. Trenger derfor en automatisk løsning på problemet.

[dirr]

Tror dette er enklere med et vbscript. Klipp og lim inn i notepad, lagre som etellerannet.vbs. Kan kjøres daglig med task scheduler.

 

KEEP_DAYS bestemmer hvor mange dager du vil beholde (eks. 14 dager), alt eldre blir slettet.

PATH er vel selvforklarende, men ikke avslutt med "\" - altså "c:\temp" ikke "c:\temp\"

 

 

'***************************************************************

KEEP_DAYS = 14

PATH = "c:\temp"

 

On Error Resume Next

 

Dim strPath, datFrom

Set objFSO = CreateObject("Scripting.FileSystemObject")

 

datFrom = Now - KEEP_DAYS

 

If objFSO.FolderExists(PATH) Then

Set fld = objFSO.GetFolder(PATH)

set colFiles = fld.Files

For Each fl In colFiles

If fl.DateCreated < datFrom Then

objFSO.DeleteFile(PATH & "\" & fl.name)

End If

Next

End If

 

Set objFSO = Nothing

'***************************************************************

[Mr.Elendig]

Les her