批处理怎样判断网页延迟？

jiulong

已知

1. errorlevel

复制代码

可以获取网络连接的错误或正确返回码
但我要的效果是，某网页打得开，只是时间太长的话是不允许的，所以我的目的在一定时间内访页面没刷新就跳转到另一个页面
例：

1. start c:\progra~1\iexplo~1\iexplore.exe www.sina.com.cn

复制代码

如果“新浪”页面超过5秒没刷新出来就跳转到
“百度”

该怎么判断页面在5秒内有没有刷新出来呢？


2楼的脚本，在14行有错误还不说，严重的是判断5秒没刷新完就打开别的页面这条错了，你这个脚本是不管有没有刷新完，就算刷新完了都会直接把第一个打开的页面关掉然后再打开第二个页面！

ArdentMan

1. 
   
2. Dim Web, Arr, Str, Ok
   
3. Web = "www.sina.com,www.baidu.com,www.sohu.com"
   
4. Arr = Split(Web, ",")
   
5. For Each Str In Arr
   
6.   If Ok = vbNullString Then GetWeb Str
   
7. Next
   
8. 
   
9. Sub GetWeb(Url)
   
10.   Dim IE
    
11.   Set IE = CreateObject("InternetExplorer.Application")
    
12.   IE.Navigate "http://" & Url
    
13.   IE.Visible = True
    
14.   WScript.Sleep 5000
    
15.   If IE.ReadyState <> 4 Then
    
16.     IE.Quit
    
17.     Set IE = Nothing
    
18.     Else
    
19.     Ok = "ok"
    
20.   End If
    
21. End Sub
    

复制代码

Demon

VBS什么时候变成批处理了

batman

vbs本来就可以用批生成，能解决问题就好，万法归宗哈

Demon

vbs本来就可以用批生成，能解决问题就好，万法归宗哈
batman 发表于 2011-7-2 21:51

exe也可以用批处理生成，照这样说的话批处理什么问题不能解决

batman

5# Demon
兄弟何必如此较真呢，能解决问题才是关键，你以为呢？

Demon

5# Demon
兄弟何必如此较真呢，能解决问题才是关键，你以为呢？
batman 发表于 2011-7-2 22:38

我以为别人问的是“判断网页延迟批处理”。

batman

纯批也可以做到，就是麻烦点，要把这些网页的窗口标题都找出来，然后用tasklist来检索。。。

Demon

纯批也可以做到，就是麻烦点，要把这些网页的窗口标题都找出来，然后用tasklist来检索。。。
batman 发表于 2011-7-2 22:49

“纯批”怎么把这些网页的窗口标题都找出来？

batman

9# Demon
先手工到网页源码上找。。。

Demon

9# Demon
先手工到网页源码上找。。。
batman 发表于 2011-7-2 22:58

。。。。。。

CrLf

如果不考虑特殊情况，纯批应该也可以找到TITLE吧

batman

12# zm900612
纯批如何提取网页的窗口标题。。。

sky02

可以通过计算网页源码行数或者查找指定字符串来判断网页是否完全打开

CrLf

我是说在html文件上操作应该可行(只要文件内容中有标题这个东东)，不考虑下载。而且页面展开前，浏览器的标题也不一样吧？