191问答库 > vbs怎么实现批量打开网页，要求在打开一个新网页的同时关掉已经打开的网页？

vbs怎么实现批量打开网页，要求在打开一个新网页的同时关掉已经打开的网页？

2025-04-06 18:29:24

推荐回答（1个）

回答1：

set ie = CreateObject("InternetExplorer.Application")
sub open(url)
ie.Navigate url,4
do until 4=ie.readyState
    WScript.sleep 200
    waittime  = waittime + 200
    if waittime > 15000 then exit do
loop
if 4<>ie.readyState then
    ie.quit
    WScript.quit
end if
end sub
open "http://www.baidu.com/"
wscript.sleep 2000 ''等待2秒后打开新的网页
open "http://www.qq.com/"