VBS如何执行按顺序循环打开一个有规律的网页的操作
就是按顺序打开有规律的网页一个网页,然后再关掉打开下一个网页,比如第一次打开http://www.baidu.com/1打开后10秒钟关闭,再打开http://www.b...
就是按顺序打开有规律的网页一个网页,然后再关掉打开下一个网页,比如第一次打开http://www.baidu.com/1 打开后10秒钟关闭,再打开http://www.baidu.com/2 打开后10秒钟关闭,再打开http://www.baidu.com/3 如此循环到设定的值N。
程序很合我心意有加分,谢谢各位^_^
您的方法只能支持到3个网页的正常打开,怎么样能按照1、2、3、4、5……一直循环下去? 展开
程序很合我心意有加分,谢谢各位^_^
您的方法只能支持到3个网页的正常打开,怎么样能按照1、2、3、4、5……一直循环下去? 展开
1个回答
展开全部
注释里面说了啊,想增加网页,自己填写就行了。如:
URL(4) = "http://www.baidu.com/4"
URL(5) = "http://www.baidu.com/5"
#######################
下面代码验证通过,可以自己添加网址,酌情加分,谢谢!
########################
ReDim URL(1)
dim i,N
N = 3 '网页个数
redim Preserve URL(N)
URL(1) = "http://www.baidu.com/1"
URL(2) = "http://www.baidu.com/2"
URL(3) = "http://www.baidu.com/3"
'上面列出3个网址,你可以在后面自己加网页,格式就是URL(4) = "http://www.baidu.com/4"
for i = 1 to N
set ie=createobject("internetexplorer.application")
ie.visible=1
ie.navigate URL(i)
wscript.sleep 10*1000 '延迟10秒
ie.quit
next
##################################
mark,等会帮你做
URL(4) = "http://www.baidu.com/4"
URL(5) = "http://www.baidu.com/5"
#######################
下面代码验证通过,可以自己添加网址,酌情加分,谢谢!
########################
ReDim URL(1)
dim i,N
N = 3 '网页个数
redim Preserve URL(N)
URL(1) = "http://www.baidu.com/1"
URL(2) = "http://www.baidu.com/2"
URL(3) = "http://www.baidu.com/3"
'上面列出3个网址,你可以在后面自己加网页,格式就是URL(4) = "http://www.baidu.com/4"
for i = 1 to N
set ie=createobject("internetexplorer.application")
ie.visible=1
ie.navigate URL(i)
wscript.sleep 10*1000 '延迟10秒
ie.quit
next
##################################
mark,等会帮你做
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询