Clear dei file temporanei dell’utente in Windows XP

Se è necessario fare pulizia in modo schedulato dei file temporanei dell’utente è possibile utilizzare due approcci:

Il primo basato sul comando CleanMGR il cui utilizzo è spiegato nel seguente:
Automazione dello strumento Pulitura disco in Windows XP

Il secondo approccio è quello di utilizzare un vbscript per eliminare i file e scedularlo. Il seguente script elimina i file temporanei la cui data di modifica differisce da quella attuale di un numero di giorni impostabile tramite la costante days:

Option Explicit
On Error Resume Next

Const days = 3
Dim fso, folder, file, shell, count

Set fso = CreateObject(“Scripting.FileSystemObject”)
Set shell=CreateObject(“WScript.Shell”)

Set folder = fso.GetFolder(Shell.ExpandEnvironmentStrings(“%TEMP%”))

count=0
For Each file in folder.Files
  If DateDiff(“d”, file.DateLastModified, Now) >= days Then
    file.Delete
    If Not fso.FileExists(file.Path) Then
      count=count+1
    End If
  End If
Next

msgbox count & ” temporary files deleted.”

Set shell = Nothing
Set fso = Nothing
Set folder = Nothing
Set file = Nothing