使用脚本在IE浏览器选项卡之间切换特定时间间隔

时间:2016-01-11 11:48:46

标签: vbscript scripting browser-automation ie11-developer-tools

目前我使用的是IE 11,我打开了4个显示器。我想在标签之间切换特定的时间间隔。我们希望将此设置用于监控目的。我需要一个脚本来完成这项任务。

1 个答案:

答案 0 :(得分: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中打开的。

现在,您需要找到在不同标签之间切换的方法,而不是刷新窗口。

我也测试了上面的代码并为我工作。希望这会有所帮助!! :)