DevAdmin Blog

Blog di Ermanno Goletto (Microsoft MVP Directory Services - MCITP - MCTS - MCSA - MCP)
posts - 975, comments - 549, trackbacks - 8

My Links

News

Avatar

Curriculum Vitae

Visualizza il profilo di Ermanno Goletto su LinkedIn

Follow ermannog on Twitter


Il contenuto di questo blog e di ciascun post viene fornito “così come é”, senza garanzie, e non conferisce alcun diritto. Questo blog riporta il mio personale pensiero che non riflette necessariamente il pensiero del mio datore di lavoro.

Logo Creative Commons Deed


Server Infrastructure Days 2013 - Milano - 18 e 19 Giugno


Logo SysAdmin.it SysAdmin.it Staff


Logo TechNet Forum TechNet Italia @ForumTechNetIt Follow TechNet Forum on Twitter


Logo MVP

Article Categories

Archives

Post Categories

Blogs

Friends

Knowledge Base

MVP Sites

Resources

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

Print | posted on Tuesday, April 22, 2008 7:02 PM | Filed Under [ Links Code, Snippets & Scripts IT ]

Feedback

No comments posted yet.

Post Comment

Title  
Name  
Email
Url
Comment   
Please add 1 and 8 and type the answer here:

Powered by:
Powered By Subtext Powered By ASP.NET