Dim fso Set fso = Createobject("Scripting.FileSystemObject") Dim MyVar MyVar = MsgBox ("Deleting C:\WINDOWS\Prefetch. This is a typical maintenance job, does not affect the stability of the system", 0, "Note: Deleting Prefetch") fso.DeleteFile("C:\WINDOWS\Prefetch\*.*")