如果想命令行方式来清除ie缓冲,可以使用借助rundll32.exe 来运行internet选项的对应功能。
temporary internet files (internet临时文件)
rundll32.exe inetcpl.cpl,clearmytracksbyprocess 8
cookies
rundll32.exe inetcpl.cpl,clearmytracksbyprocess 2
history (历史记录)
rundll32.exe inetcpl.cpl,clearmytracksbyprocess 1
form data (表单数据)
rundll32.exe inetcpl.cpl,clearmytracksbyprocess 16
passwords (密码)
rundll32.exe inetcpl.cpl,clearmytracksbyprocess 32
delete all (全部删除)
rundll32.exe inetcpl.cpl,clearmytracksbyprocess 255
delete all - "also delete files and settings stored by add-ons"
rundll32.exe inetcpl.cpl,clearmytracksbyprocess 4351
想通过编程方式清除ie缓存, 调用win32 api函数 shellexecute 或者 createprocess 来执行以上的命令行就可以了。
例子:shellexecute(null, _t("open"), _t("rundll32.exe"), _t("inetcpl.cpl,clearmytracksbyprocess 4351"), null, sw_shownormal);
TR代码段 哦呼呼 ~~
--------------------------------------------------------------------------------------------------------------------------------------------
procedure TForm1.Button1Click(Sender: TObject);
begin
ShellExecute(0,'open','rundll32.exe','inetcpl.cpl,ClearMyTracksByProcess 8',nil,1); //IE缓存
//ShellExecute(0,'open','rundll32.exe','inetcpl.cpl,ClearMyTracksByProcess 2',nil,1); //IE cookies
ShellExecute(0,'open','rundll32.exe','inetcpl.cpl,ClearMyTracksByProcess 1',nil,1); //IE history
ShellExecute(0,'open','rundll32.exe','inetcpl.cpl,ClearMyTracksByProcess 16',nil,1); //form
ShellExecute(0,'open','rundll32.exe','inetcpl.cpl,ClearMyTracksByProcess 32',nil,1); //auto save pass
//ShellExecute(0,'open','rundll32.exe','inetcpl.cpl,ClearMyTracksByProcess 255',nil,1); //all
//ShellExecute(0,'open','rundll32.exe','inetcpl.cpl,ClearMyTracksByProcess 4351',nil,1); //all & addons
end;