目前我使用的是 IE 11,我打开了 4 个显示器。我想在特定时间间隔的选项卡之间切换。我们希望此设置用于监控目的。我需要这个任务的脚本。
问问题
1824 次
1 回答
0
请参考以下代码:
set shellApp = createobject("shell.application")
do
for each sTitle in Array("v9", "Google", "Gmail", "ETC")
ShowIEWindow sTitle, shellApp, 10 ' sec
next
loop ' forever
sub ShowIEWindow(sTitle, oShell, nWaitsec)
for each w in oShell.windows
with w
if lCase(.LocationName) = lcase(sTitle) and InStr(lCase(.FullName),"iexplore") > 0then
w.Refresh
'w.visible = true ' show
wsh.sleep nWaitsec * 1000 ' milliseconds
' w.visible = false ' hide
end if
end with
next
end sub
如果它们在 Internet Explorer 中打开,上面的代码将刷新数组中指定的选项卡。
现在,您需要找到在不同选项卡之间切换的方法,而不是刷新窗口。
我还测试了上面的代码并为我工作。希望这会有所帮助!:)
于 2016-01-12T06:20:07.683 回答