[系统相关] [已解决]批处理限制弹窗口个数

qq76020500

有时候上网老是跳出很多网页窗口或者系统窗口，CUP吃不消死机。
，
不知道有没有弹窗BAT或vbs能监视窗口数量进行控制的代码。
，
或请老师编写一个供我等菜鸟免受弹窗之苦。
，
1,要求运行代码bat或vbs 的时候该程序最小化进行监视。

2.当窗口大于12个的时候进行有效的‘阻止’。


yij

[ 本帖最后由 qq76020500 于 2009-11-2 03:18 编辑 ]

zqz0012005

' 2>nul&@start wscript.exe -e:vbs "%~f0"&exit/b

on error resume next
set sh = CreateObject("Shell.Application")
do
set wnds = sh.windows
for i=13 to wnds.count-1
    wnds.item(i).quit
next
wsh.sleep 1000*10
loop
复制代码

zqz0012005

差点忘了。请把i=13改成i=12

zqz0012005

如果不想把资源管理器窗口也关掉，用下面这句：
if typename(wnds(i).document) = "HTMLDocument" then wnds.item(i).quit

PS：maxthon中的窗口无法关闭，估计对其他基于IE的三方浏览器也不行。

qq76020500

先谢谢版主！

如何应对跳动很快的IE窗口呢？
以前知道一个可以禁止跳出而不是跳出才关闭。
很小的程序找不到了。

是禁止弹出不是发现才关闭