[BAT/CMD/VBS] Wissen van files ouder dan een maand

[DaMoUsYs]

Beste Mensen,
Ik moet zeggen dat ik verrekte wijnig verstand heb van scripting.
maar ik zoek een script wat alle wav files wist van ouder dan een maand
maar er is een probleem ik moet ook een lijstje met woorden op kunnen geven die niet verwijderd mogen worden.

ik heb al wel een script dat bestanden ouder als een maand verwijderd, maar die verwijderd iedere extentie en dat is ook niet de bedoeling

VBScript:

iDaysOld = 30
strPath = "D:\mapje" 

Set objFSO = CreateObject("Scripting.FileSystemObject")  
Set objFolder = objFSO.GetFolder(strPath)  
Set colSubfolders = objFolder.Subfolders  
Set colFiles = objFolder.Files  

For Each objFile in colFiles  
   If objFile.DateLastModified < (Date() - iDaysOld) Then  
       objFile.Delete  
   End If  
Next  


For Each objSubfolder in colSubfolders  
   Set colFiles = objSubfolder.Files  
   For Each objFile in colFiles  
       If objFile.DateLastModified < (Date() - iDaysOld) Then  
           objFile.Delete  
       End If  
   Next  
Next

[RobIII]

Je kunt het script toch aanpassen naar je wens? Feitelijk is je topic een scriptrequest en daar doen we hier niet aan We zien graag wat je zélf hebt geprobeerd, gezocht, gevonden, etc. Nu plaats je een 'geleend' script en verwacht je dat wij 't voor je aanpassen en dat is dus niet de bedoeling

Als je niet thuis bent in scripting neem je de documentatie er bij (of je besteed het uit aan iemand die wél thuis is in de materie )

[ Voor 36% gewijzigd door RobIII op 08-10-2009 11:55 ]