- 帖子
- 8
- 积分
- 119
- 技术
- 0
- 捐助
- 0
- 注册时间
- 2009-8-27
|
VBS如何能同时打开多个隐藏页面?
set ws=createobject("wscript.shell")
url="www.baidu.com"
do
ws.run"iexplore.exe "&url,0
wscript.sleep 3000
call kill_IE(url)
loop
private sub kill_IE(url)
set bag=getobject("winmgmts:\\.\root\cimv2")
set pipe=bag.execquery("select * from win32_process where name='iexplore.exe'")
For Each id In pipe
if instr(1,id.commandline,url)<>0 then
id.terminate()
end if
Next
end sub
我想实现同时打开5个网页如何编辑?
谢谢 |
|