碎片IT资讯

[code]' 技术中国 http://www.mstc.com.cn/
' Made by 付林.
' 系统垃圾清理脚本
' ***********************************************
strComputer = "."
Set objShell = CreateObject ("Wscript.Shell")
objShell.Run("%comspec% /c del /f /s /q %systemdrive%*.tmp"),1 ,TRUE
objShell.Run("%comspec% /c del /f /s /q %systemdrive%*._mp"),1 ,TRUE
objShell.Run("%comspec% /c del /f /s /q %systemdrive%*.log"),1 ,TRUE
objShell.Run("%comspec% /c del /f /s /q %systemdrive%*.gid"),1 ,TRUE
objShell.Run("%comspec% /c del /f /s /q %systemdrive%*.chk"),1 ,TRUE
objShell.Run("%comspec% /c del /f /s /q %systemdrive%*.old"),1 ,TRUE
objShell.Run("%comspec% /c del /f /s /q %systemdrive%recycled*.*"),1 ,TRUE
objShell.Run("%comspec% /c del /f /s /q %windir%prefetch*.*"),1 ,TRUE
objShell.Run("%comspec% /c rd /s /q %windir%temp & md %windir%temp"),1 ,TRUE
objShell.Run("%comspec% /c del /f /q %userprofile%cookies*.*"),1 ,TRUE
objShell.Run("%comspec% /c del /f /q %userprofile%recent*.*"),1 ,TRUE
objShell.Run("%comspec% /c del /f /s /q %userprofile%Local SettingsTemporary Internet Files*.*"),1 ,TRUE
objShell.Run("%comspec% /c del /f /s /q %userprofile%Local SettingsTemp*.*"),1 ,TRUE
objShell.Run("%comspec% /c del /f /s /q %userprofile%recent*.*"),1 ,TRUE
if err = 0 then
Wscript.echo " 系统垃圾清理成功！By 碎片 "
end if
[/code]