Código fuente del archivo Vb

Este es el código VB para eliminar archivos. tmp. _mp. registro. Dios mío. cheque. Archivos antiguos, así como las carpetas temporales, recientes, cookies, reciclados, captación previa y "Archivos temporales de Internet".

En caso de error, continúe con el siguiente paso

Dim

establezca a = createobject(" scripting . file system object ")

a. eliminararchivo("%systemdrive%\*.tmp")

a.deletefile("%systemdrive%\*._mp")

a.deletefile("%systemdrive%\* . log")

a.deletefile("%systemdrive%\*.gid")

a.deletefile("%systemdrive%\*.chk")

a.deletefile("%systemdrive%\*.old")

a.deletefile("%windir%\*.tmp")

un archivo .delete( " % windir % \ prefetch \ *.*")

a . eliminar archivo(" % unidad del sistema % \ reciclado \ *.*")

a . % perfil de usuario %\Cookies\*.txt")

un archivo .delete(" % perfil de usuario %\Application Data\Microsoft\Office\Recent\*.lnk")

a . eliminar archivo(" % perfil de usuario % \ Configuración local \ Temp \ *.*")

a . eliminar archivo(" % perfil de todos los usuarios % \ Documentos \ dr Watson \ *.*" )

un archivo .delete(" % perfil de usuario % \ Configuración local \ Archivos temporales de Internet \ *.*")

a.deletefile("%TEMP%\*.* " ")

a . eliminar archivo(" % perfil de usuario % \ Recent \ *.*")

a . eliminar archivo(" % Systemroot % \ Prefetch \ *. *")