按键精灵一键网络清理脚本源码

这个脚本是可以自动清理网站痕迹 

只需一个键 

按热键一次，可弹出清理向导 

喜爱脚本和一切有创意的东西，欢迎大家和我交流任何有趣的东东。 ^_^

09.11.7 

注意事项 

在使用过程中请不要点别的地方 

运行环境：分辨率：1280x960 色深：32位 操作系统：Microsoft Windows XP 按键精灵版本：7.12.5013

@鸡腿2009/11/18

MessageBox "欢迎使用一键网络清理v1.0测试版"  
VBSCall RunApp("notepad.exe")  
SayString "欢迎使用一键网络清理"  
Delay 1000  
KeyPress 13,1  
SayString "请问是否清理IE历史记录，临时文件，以及COOKIE"  
KeyPress 13,1  
SayString "按任意键接着"  
WaitKey   
KeyPress 13,1  
SayString "是的话按enter，否的话按其他键"  
WaitKey a  
If a=13  
    KeyPress 13,1  
    SayString "请稍等"  
    //一键清理网络使用痕迹  
    //下面这句是清除IE历史记录  
    Plugin Web.ClearHistory()  
    KeyPress 13,1  
    SayString "IE历史记录清理成功"  
    //下面这句是删除IE临时文件  
    KeyPress 13,1  
    SayString "下面开始IE历史纪录清空，此过程会很长"  
    Plugin Web.ClearTemp()  
    KeyPress 13,1  
    SayString "ie临时文件清理成功"  
    //下面这句是删除IE的Cookie  
    KeyPress 13,1  
    SayString "下面开始IEcookie清理，此过程会很长"  
    Plugin Web.ClearCookie()  
    KeyPress 13,1  
    SayString "ie的COOKIE清楚成功"  
    KeyPress 13,1  
    SayString "成功！按任意键结束"  
    WaitKey   
    KeyDown 18,1  
    KeyPress 115,1  
    KeyUp 18,1  
    KeyPress 39,1  
    KeyPress 13,1  
Else   
    KeyPress 13,1  
    SayString "你按了其它键，终止清理，按任意键结束"  
    WaitKey   
    KeyDown 18,1  
    KeyPress 115,1  
    KeyUp 18,1  
    KeyPress 39,1  
    KeyPress 13,1  
EndIf