Sub Clear_Temp_Files()
Shell "RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 8 "
End Sub
Sub Clear_Cookies()
Shell "RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 2"
End Sub
Sub Clear_History()
Shell "RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 1"
End Sub
Sub Clear_Form_Data()
Shell "RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 16"
End Sub
Sub Clear_Saved_Passwords()
Shell "RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 32"
End Sub
Sub Clear_All()
Shell "RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 255"
End Sub
Sub Clear_Clear_Add_ons_Settings()
Shell "RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 4351"
End Sub
使用的时候记得适当的处理,不要把需要的 Cookie 都删掉!
或者一次性执行都可以:
Shell "RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 1 "
Shell "RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 2 "
Shell "RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 8 "
Shell "RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 16 "
Shell "RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 32 "
Shell "RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 255 "
Shell "RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 4351 "
有了这个清除缓存的方法,也许你接到 使用WebBrower控件的用户给你的电话都少很多了!
本文介绍了一组VBA脚本,用于自动化清除Internet Explorer浏览器中的各种缓存数据,包括临时文件、Cookies、历史记录、表单数据、保存的密码及插件设置等。这些脚本通过调用系统的ClearMyTracksByProcess接口实现不同类型的缓存清理。
566

被折叠的 条评论
为什么被折叠?



