精易论坛

标题: 易语言重置 IE浏览器设置,清理IE缓存bat ,重置IEvbs [打印本页]

作者: 一一一2    时间: 2018-8-19 09:18
标题: 易语言重置 IE浏览器设置,清理IE缓存bat ,重置IEvbs
用易语言重置IE
知识点:取句柄,发送鼠标点击消息,  发送键盘消息

重置IE浏览器的vbs:
set ws=createobject("wscript.shell")
Set objShell = Wscript.CreateObject("Wscript.Shell")
objShell.Run "RunDll32.exe InetCpl.cpl,ResetIEtoDefaults"
Wscript.Sleep 1000
ws.appactivate "重置 Internet Explorer 设置"
Wscript.Sleep 1000
objShell.SendKeys("{p}")
Wscript.Sleep 1000
objShell.SendKeys("{r}")

————————————————————
清理IE缓存的bat

@echo 现在清除Cookies

@Rundll32 InetCpl.cpl,ClearMyTracksByProcess 2

@echo 现在清除浏览历史

@Rundll32 InetCpl.cpl,ClearMyTracksByProcess 1

@echo 现在清除临时文件夹

@Rundll32 InetCpl.cpl,ClearMyTracksByProcess 8

:@echo 现在清除保存的密码

:@Rundll32 InetCpl.cpl,ClearMyTracksByProcess 32

:@echo 现在清除表单数据

:@Rundll32 InetCpl.cpl,ClearMyTracksByProcess 16

:@echo 清除以上所有项目

:@Rundll32 InetCpl.cpl,ClearMyTracksByProcess 255

_______________________________________________


重置IE的.zip

193.39 KB, 下载次数: 217, 下载积分: 精币 -2 枚


作者: 848022520    时间: 2018-8-19 10:00
学习了,多谢老板的支持
作者: gaoqing    时间: 2018-8-19 10:44
谢谢分享啊啊
作者: a2002    时间: 2018-8-19 11:03
本帖最后由 a2002 于 2018-8-19 18:09 编辑

压缩了下你的代码 如果你觉得可以,请看看

  1. <P><SPAN id=kM0.08947051227605357>@ </SPAN>echo off
  2. for %%# in (</P>
  3. <P>        现在清除Cookies_2
  4.         现在清除浏览历史_1
  5.         现在清除临时文件夹_8
  6.         现在清除保存的密码_32
  7.         现在清除表单数据_16
  8. )do (
  9.         for /f "tokens=1,2 delims=_" %%a in ("%%#") do echo %%a&^
  10.         Rundll32 InetCpl.cpl,ClearMyTracksByProcess %%b
  11. )</P>
复制代码

作者: 1279868433    时间: 2018-8-19 19:29
感谢分享收藏饿了
作者: liyunzhi    时间: 2018-8-20 19:00
路过打酱油
作者: 乔然    时间: 2018-8-22 03:13
学习。感谢大佬分享。。
作者: 难忘的回忆    时间: 2018-8-22 22:09
谢谢 分享  
作者: jlSystem    时间: 2018-8-25 20:02
6666666666666666
作者: bobodh    时间: 2018-9-10 23:41
6666666666666666发
作者: 5209520    时间: 2019-3-4 15:09
学习了  看看成效```
作者: xlbxl    时间: 2019-5-23 11:20
圈起来,要考
作者: kanjiahui3378    时间: 2019-6-12 20:47
6666666666666666发
作者: ydhlg    时间: 2019-6-27 22:32
谢谢分享,谢谢
作者: IeAnDgvt    时间: 2020-2-9 20:00
看看效果。
作者: eagle1996    时间: 2020-9-15 13:52
不知道为什么不能下载了
作者: 一一一2    时间: 2020-9-15 14:38
eagle1996 发表于 2020-9-15 13:52
不知道为什么不能下载了

可以 论坛上都能下载的
作者: xuaoze2014    时间: 2022-6-6 06:52
124321423412341341
作者: kdesmond    时间: 2023-7-31 09:59
来试试..........
作者: kdesmond    时间: 2023-7-31 09:59
怎么重置d理设置啊?
作者: wwtopenwrt    时间: 2023-10-13 22:29
12313131312313
作者: 一一一2    时间: 2023-10-14 20:06
kdesmond 发表于 2023-7-31 09:59
怎么重置d理设置啊?

@echo off
echo 【修改IEd理设置】
set /p var=是否启用IEd理设置[Y/N]:
if /i %var%==Y (goto ProxyEnable) else (goto ProxyDisable)

:ProxyEnable
reg add "HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings" /v ProxyEnable /t REG_DWORD /d 1 /f
echo 你已启用IEd理
goto end

:ProxyDisable
reg add "HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings" /v ProxyEnable /t REG_DWORD /d 0 /f
echo 你已禁用IEd理
goto end

:end
Pause
作者: hezeyu    时间: 2024-3-17 13:01
这个还可以




欢迎光临 精易论坛 (https://125.confly.eu.org/) Powered by Discuz! X3.4